Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     IF & : IFN &    ; syntax errors
  2.     IF 0 < fwdLabel : ENDIF
  3.     IFN 0 < fwdLabel : ENDIF
  4. fwdLabel:
  5.     IF 0 < fwdLabel : ENDIF     ; should be OK here
  6.     IFN 0 < fwdLabel : ENDIF    ; should be OK here
  7.  
  8.     ELSE
  9.     ENDIF
  10.  
  11.     ; create "AHOY!" in "coverage1.bin" by using all output modes
  12.     OUTPUT "coverage1.bin",T    : DB "xx"
  13.     OUTPUT "coverage1.bin",A    : DB "xY"
  14.     OUTPUT "coverage1.bin",R
  15.     DB "y" : FPOS 2 : DB  "O" : FPOS -2 : DB  "H" : FPOS +2 : DB  "!" : FPOS &
  16.     OUTPUT "coverage1.bin", R   ; try with space after comma (new bugfix)
  17.     DB "A"
  18.     ; syntax errors (should not fallback to "truncate", would destroy current output)
  19.     OUTPUT "coverage1.bin",
  20.     OUTPUT "coverage1.bin",     ; with spaces after comma
  21.     OUTPUT "coverage1.bin",&
  22.     OUTEND
  23.  
  24.     DEFINE 1nvalidId value
  25.     UNDEFINE 1nvalidId
  26.  
  27.     DEFINE validDefine 1nvalidId
  28.     UNDEFINE validDefine
  29.     UNDEFINE validDefine        ; warning not found (second undefine)
  30.  
  31.     UNDEFINE fwdLabel           ; labels can't be removed any more (since v1.14.0)
  32.         ; not that it worked correctly before?? (removed because IMO broken beyond repair + undocumented!)
  33.         ; makes little sense in 3-pass, fix the source to not rely on such weird feature
  34.  
  35.     ; bomb everything with "UNDEFINE *"
  36.     IFDEF _SJASMPLUS    ; still defined
  37.         DB 1
  38.     ENDIF
  39.     UNDEFINE *
  40.     IFNDEF _SJASMPLUS   ; and it's gone
  41.         DB 2
  42.     ENDIF
  43.  
  44.     ENDS
  45.     ASSERT 1            ; valid
  46.     ASSERT &            ; syntax err
  47.  
  48.     DISPLAY "DISPLAY", /L, " ", /T, "has silently skipped options /L and /T. ", 15, " ", /D, 15
  49.     DISPLAY "
  50.  
  51.    SHELLEXEC "echo -n Ahoy! "
  52.    SHELLEXEC '"echo"', "\ from SHELLEXEC"
  53.    SHELLEXEC "bash", "my_invalid_filename"
  54.