equal
deleted
inserted
replaced
33 |
33 |
34 Scanner comment:' |
34 Scanner comment:' |
35 COPYRIGHT (c) 1989 by Claus Gittinger |
35 COPYRIGHT (c) 1989 by Claus Gittinger |
36 All Rights Reserved |
36 All Rights Reserved |
37 |
37 |
38 $Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.30 1995-07-03 02:38:54 claus Exp $ |
38 $Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.31 1995-07-23 02:24:35 claus Exp $ |
39 '! |
39 '! |
40 |
40 |
41 !Scanner class methodsFor:'documentation'! |
41 !Scanner class methodsFor:'documentation'! |
42 |
42 |
43 copyright |
43 copyright |
54 " |
54 " |
55 ! |
55 ! |
56 |
56 |
57 version |
57 version |
58 " |
58 " |
59 $Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.30 1995-07-03 02:38:54 claus Exp $ |
59 $Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.31 1995-07-23 02:24:35 claus Exp $ |
60 " |
60 " |
61 ! |
61 ! |
62 |
62 |
63 documentation |
63 documentation |
64 " |
64 " |
220 ActionArray at:($: asciiValue) put:[:s :char | s nextColonOrAssign] |
220 ActionArray at:($: asciiValue) put:[:s :char | s nextColonOrAssign] |
221 |
221 |
222 " |
222 " |
223 Scanner setupActions |
223 Scanner setupActions |
224 " |
224 " |
|
225 ! ! |
|
226 |
|
227 !Scanner methodsFor:'ST-80 compatibility'! |
|
228 |
|
229 endOfLastToken |
|
230 ^ source position |
225 ! ! |
231 ! ! |
226 |
232 |
227 !Scanner methodsFor:'private'! |
233 !Scanner methodsFor:'private'! |
228 |
234 |
229 initializeFor:aStringOrStream |
235 initializeFor:aStringOrStream |