?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     ; this is UGLY example, doing machine code generation in last pass, which is sort of "wrong"
  2.     ; but for convenience sometimes the DEFL labels in last pass are handy, for example for DISPLAY or data checks
  3.     IF 3 == __PASS__
  4. p3_defl = 'A'
  5. p3_defl = p3_defl + 1
  6. p3_defl2 DEFL 'a'
  7. p3_defl2 DEFL p3_defl2 + 1
  8.         DB p3_defl, p3_defl2    ; expected 'B','b'
  9. p3_equ  EQU 123     ; error
  10. p3_label:           ; error
  11. .p3_local:          ; error
  12. 3       jr  3B      ; error
  13.     ENDIF
  14.