equal
deleted
inserted
replaced
21 |
21 |
22 !SourceFileLoader class methodsFor:'documentation'! |
22 !SourceFileLoader class methodsFor:'documentation'! |
23 |
23 |
24 version |
24 version |
25 " |
25 " |
26 $Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.4 1995-07-03 02:38:59 claus Exp $ |
26 $Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.5 1995-07-23 02:24:40 claus Exp $ |
27 " |
27 " |
28 ! |
28 ! |
29 |
29 |
30 documentation |
30 documentation |
31 " |
31 " |
80 warning:aMessage position:position to:endPos from:aCompiler |
80 warning:aMessage position:position to:endPos from:aCompiler |
81 "warning notification during fileIn - ignore it. |
81 "warning notification during fileIn - ignore it. |
82 This is sent by the compiler/evaluator if it detects errors." |
82 This is sent by the compiler/evaluator if it detects errors." |
83 |
83 |
84 ^ self |
84 ^ self |
|
85 ! |
85 |
86 |
|
87 insertAndSelect:aString at:aCharacterPosition |
|
88 "ST-80 compatible error notification during fileIn." |
|
89 |
|
90 " |
|
91 will eventually open a TextBox here, showing the error .... |
|
92 " |
|
93 Transcript show:'===> '; showCr:aString. |
|
94 ^ false |
86 ! ! |
95 ! ! |
87 |
96 |
88 !SourceFileLoader methodsFor:'private access'! |
97 !SourceFileLoader methodsFor:'private access'! |
89 |
98 |
90 reader:aStream wantChangeLog:aBoolean |
99 reader:aStream wantChangeLog:aBoolean |