Subversion Repositories NedoOS

Rev

Rev 129 | Blame | Compare with Previous | Last modification | View Log | Download

  1. ; SYNTAX option "i":
  2. ;   i      Case insensitive instructions/directives (default = same case required)
  3.  
  4. ; verify regular syntax works as expected with default options
  5.     jp  Label1 : JP  Label1     ; regular syntax - instruction
  6.     ex  de,hl                   ; regular syntax - registers
  7.     align 4 : ALIGN 4           ; regular syntax - directive
  8.     Jp  Label1 : jP  Label1     ; 2x error - instruction
  9.     ex  De,Hl                   ; illegal instruction due to registers
  10.     Align 4 : aLiGN 4           ; 2x error - directive
  11.  
  12.     OPT --syntax=i      ; test the syntax options "i"
  13. Label1:
  14.     Jp  Label1 : jP  Label1     ; instructions should be case insensitive
  15.     Align 4 : aLiGN 4           ; directives too
  16.     ex  De,Hl                   ; registers should be also case insensitive
  17.     ld  b,IXl,c,IXh             ; BTW this is actual way how Zilog describes half-ix regs
  18.  
  19.     OPT reset           ; reset syntax to defaults
  20.     Jp  Label1                  ; error - instruction
  21.     ld  b,IXl,c,IXh             ; error - register (label not found)
  22.