Macro: ELSE

Module location: FMAC line 685 (view source)

  #$ !A [] $41 |CI0 //jump over else code.
  #XPOP !n S$ // GET GOTO LINE NUMBER FROM LAST IF.
  #XPUSH 1 !a // Save line number of ELSE jump.
  #XPUSH 0 !n // Save static nest level.
  #FREF (!a+1) !s // Modify goto line number with ELSE command
  !1 !2 !3 !4 !5 !6 !7 !8 !9
  #XPOP 0 Q$  // Restore static nest level to Q.
  #XPOP 1 S$  // Restore line number of else jump.
  #IF (!n>!q)
    #FREF END$!r !s // Modify ELSE jump to after BEGIN block.
  #ELSE
    #FREF (!a+1) !s // Modify ELSE jump to after the ELSE command.
  #ENDIF