kickc/src/test/ref/array-length-symbolic-min.asm

// Illustrates symbolic array lengths
.pc = $801 "Basic"
:BasicUpstart(main)
.pc = $80d "Program"
  .const SZ = $f
// Fills the array item by item with $is, where i is the item# and s is the sub#
main: {
    ldx #0
  __b1:
    txa
    sta items,x
    inx
    cpx #SZ+1
    bne __b1
    rts
}
  items: .fill SZ, 0
Added support for block comments. 2019-02-17 23:12:29 +00:00			`// Illustrates symbolic array lengths`
Fixed arrays with fixed size defined by a simple named constant. 2018-07-23 14:24:44 +00:00			`.pc = $801 "Basic"`
			`:BasicUpstart(main)`
			`.pc = $80d "Program"`
			`.const SZ = $f`
Added support for block comments. 2019-02-17 23:12:29 +00:00			`// Fills the array item by item with $is, where i is the item# and s is the sub#`
Fixed arrays with fixed size defined by a simple named constant. 2018-07-23 14:24:44 +00:00			`main: {`
			`ldx #0`
Added underscores to compiler-generated ASM-symbols to avoid clashes with C-symbols. Closes #329 2019-09-29 21:13:37 +00:00			`__b1:`
Fixed arrays with fixed size defined by a simple named constant. 2018-07-23 14:24:44 +00:00			`txa`
			`sta items,x`
			`inx`
			`cpx #SZ+1`
Added underscores to compiler-generated ASM-symbols to avoid clashes with C-symbols. Closes #329 2019-09-29 21:13:37 +00:00			`bne __b1`
Fixed arrays with fixed size defined by a simple named constant. 2018-07-23 14:24:44 +00:00			`rts`
			`}`
			`items: .fill SZ, 0`