basm 0.5.0

z80 assembler relying on cpclib-asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33



data equ [2, 1, 0]
	print data

	assert data == [2, 1, 0]
	assert list_get(data, 0) == 2
	assert list_get(data, 1) == 1
	assert list_get(data, 2) == 0

data2 = list_sublist(data, 1, 3)
	print data2

	assert data2 == [1, 0]
	assert list_get(data2, 0) == 1
	assert list_get(data2, 1) == 0

data2 = list_set(data2, 1, 3)

	; Test multiline stuff
	assert list_get( data2, 1 ) == 3
	assert list_get( \
		data2, 1 ) == 3
	assert list_get( \
		data2, \
		1 ) == 3


data2 = list_sublist( \
	data, \
	1, \
	3\
	)