equal
deleted
inserted
replaced
207 |
207 |
208 !Scanner methodsFor:'ST-80 compatibility'! |
208 !Scanner methodsFor:'ST-80 compatibility'! |
209 |
209 |
210 endOfLastToken |
210 endOfLastToken |
211 ^ source position |
211 ^ source position |
|
212 ! ! |
|
213 |
|
214 !Scanner methodsFor:'accessing'! |
|
215 |
|
216 comments |
|
217 ^ currentComments |
|
218 |
|
219 "Created: 20.4.1996 / 20:07:01 / cg" |
|
220 ! |
|
221 |
|
222 saveComments:aBoolean |
|
223 saveComments := aBoolean |
|
224 |
|
225 "Created: 20.4.1996 / 20:03:56 / cg" |
|
226 ! |
|
227 |
|
228 sourceStream |
|
229 ^ source |
|
230 |
|
231 "Created: 20.4.1996 / 19:59:58 / cg" |
212 ! ! |
232 ! ! |
213 |
233 |
214 !Scanner methodsFor:'directives'! |
234 !Scanner methodsFor:'directives'! |
215 |
235 |
216 parseDirective |
236 parseDirective |
1119 ! ! |
1139 ! ! |
1120 |
1140 |
1121 !Scanner class methodsFor:'documentation'! |
1141 !Scanner class methodsFor:'documentation'! |
1122 |
1142 |
1123 version |
1143 version |
1124 ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.39 1996-04-12 16:29:54 cg Exp $' |
1144 ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.40 1996-04-20 18:08:54 cg Exp $' |
1125 ! ! |
1145 ! ! |
1126 Scanner initialize! |
1146 Scanner initialize! |