chiark - git - mdw - ssr/blob - StraySrc/Libraries/Sapphire/sail/_sh/tokenise

   1 ;
   2 ; tokenise.sh
   3 ;
   4 ; Tokenise a Termite script
   5 ;
   6 ; © 1995 Straylight
   7 ;
   8
   9 ;----- Overview -------------------------------------------------------------
  10 ;
  11 ; Functions provided:
  12 ;
  13 ;  tokenise
  14
  15                 [       :LNOT::DEF:tokenise__dfn
  16                 GBLL    tokenise__dfn
  17
  18 ; --- tokenise ---
  19 ;
  20 ; On entry:     R11 == pointer to Termite upcall block
  21 ;               R12 == pointer to script anchor
  22 ;
  23 ; On exit:      May return an error
  24 ;
  25 ; Use:          Tokenises a Termite script into an output buffer.
  26
  27                 IMPORT  tokenise
  28
  29                 ]
  30
  31 ;----- That's all, folks ----------------------------------------------------
  32
  33                 END