--- a/Parser.st	Tue Feb 20 09:34:46 2007 +0100
+++ b/Parser.st	Wed Feb 21 12:25:49 2007 +0100
@@ -2678,7 +2678,6 @@
         localVarDefPosition at:2 put:(localDefsStop - (stop-start+1)).
         ^ self.
     ].
-    self halt.
     ^ self
 !
 
@@ -4240,7 +4239,7 @@
                 ((tokenType == $_) or:[tokenType == #':=']) ifTrue:[
                     self nextToken.
                     "/ Q: should we allow literals only, or arbitrary expressions ?
-                    self halt:'unimplemented feature'.
+                    self shouldImplement.
                 ]
             ].
             parserFlags allowDomainVariables == true ifTrue:[
@@ -4723,7 +4722,7 @@
                 ((tokenType == $_) or:[tokenType == #':=']) ifTrue:[
                     self nextToken.
                     "/ Q: should we allow literals only, or arbitrary expressions ?
-                    self halt:'unimplemented feature'.
+                    self shouldImplement.
                 ]
             ].
             parserFlags allowDomainVariables == true ifTrue:[
@@ -5755,13 +5754,12 @@
     ].
     sel := self selectorCheck:sel for:receiver positions:positions.
 
-    ignoreErrors ifFalse:[
+    ignoreWarnings ifFalse:[
         (Class definitionSelectors includes:sel) ifTrue:[
-            receiver isVariable ifTrue:[
-                receiver isUndeclared ifTrue:[
-                    self parseError:('undefined superclass: ' , receiver name) position:pos1 to:pos2.
-                ].
-            ]
+            (receiver isVariable and:[receiver isUndeclared]) ifTrue:[
+                "this is not an error - the undefined class may be loaded after this code!!"
+                self warning:('as yet undefined superclass: ' , receiver name) position:pos1 to:pos2.
+            ].
         ].
     ].
 
@@ -6113,7 +6111,7 @@
         self parseError:'must be representable as a literal (for now)' position:pos.
         ^ #Error
     ].
-self halt:'unimplemented'.
+self shouldImplement.
 "/    "/ make it an array creation expression ...
 "/    expr := MessageNode 
 "/            receiver:(VariableNode globalNamed:#Array)
@@ -8993,7 +8991,7 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.539 2007-02-20 08:34:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.540 2007-02-21 11:25:49 stefan Exp $'
 ! !
 
 Parser initialize!