Macro: CASE$BREAK

Module location: Case.mac line 67 (view source)

internal. used by CASE

  #IF (!s=0)                         // Mon  04-23-1990
    #CHECK "CASE BREAK" ""
  #ELSE  
    #IFDEF Case$Begin$!s
      #IFSAME !2 BEGIN
        Goto Begin$!s
      #ELSE
        Goto End$!s
      #ENDIF
    #ELSE
      #SET S$ (!s-1)
      Case$Break !1 !2
    #ENDIF
  #ENDIF