?login_element?

Subversion Repositories NedoOS

Rev

Rev 126 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ; this test does not only test newly added "DEFARRAY+", but also tests syntax error reports
  2.     DEFARRAY    myarray 'A', 'B', 'C'
  3.     DEFARRAY+   myarray 'D', 'E', 'F'
  4.  
  5.     OUTPUT 'defarray_add.bin'           ; emit all six items into file to check content
  6. CNT=0
  7.     DUP 6
  8.     db  myarray[CNT]
  9. CNT=CNT+1
  10.     EDUP
  11.  
  12.     ; error tests (also for regular DEFARRAY, as it was not tested much before)
  13.     DEFARRAY
  14.     DEFARRAY+
  15.     DEFARRAY    myarray 'X', 'Y', 'Z'   ; duplicate definition
  16.     DEFARRAY+   noneId 'D', 'E', 'F'    ; undefined id
  17.     DEFARRAY    noneId                  ; empty values
  18.     DEFARRAY+   myarray                 ; empty values
  19.     db          myarray[3]
  20.     db          myarray[-1]
  21.     db          noneId[0]
  22.     DEFARRAY    myarray+48              ; enforce white space between ID and first value
  23.     DEFARRAY+   myarray+49              ; enforce white space between ID and first value
  24.