--- a/SourceFileLoader.st	Mon Mar 08 13:00:31 1999 +0100
+++ b/SourceFileLoader.st	Wed Mar 10 15:20:49 1999 +0100
@@ -182,11 +182,12 @@
 !SourceFileLoader methodsFor:'error handling'!
 
 correctableError:aMessage position:position to:endPos from:aCompiler
-    "error notification during fileIn.
-     This is sent by the compiler/evaluator if it detects errors."
+    "correctable error notification during fileIn.
+     This is sent by the compiler/evaluator if it detects undefined variables-errors."
 
-    Transcript show:'**  '; showCR:aMessage.
-    self showWherePosition:position to:endPos from:aCompiler.
+    "/ Transcript show:'**  '; showCR:aMessage.
+    "/ self showWherePosition:position to:endPos from:aCompiler.
+
     ^ false
 
     "Modified: 8.11.1996 / 18:53:17 / cg"
@@ -239,7 +240,7 @@
         Transcript show:'      while reading '; showCR:myStream pathName.
     ].
     (where := aCompiler lastTokenLineNumber) notNil ifTrue:[
-        Transcript show:'      at or near line '; showCR:where.
+        Transcript show:'      at or near line '; show:where; showCR:' [relative to chunk start]'.
     ].
 
     "Created: 8.11.1996 / 18:49:08 / cg"
@@ -263,5 +264,5 @@
 !SourceFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.22 1997-01-31 13:29:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.23 1999-03-10 14:20:49 cg Exp $'
 ! !