Initial revision
[ssr] / 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