VariableNode.st
changeset 2420 914eb1c66bda
parent 2126 c2a51040dadc
child 2507 5877a8f74784
--- a/VariableNode.st	Thu Aug 05 13:53:34 2010 +0200
+++ b/VariableNode.st	Fri Aug 06 15:22:22 2010 +0200
@@ -9,6 +9,8 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+'From Smalltalk/X, Version:6.1.1 on 02-08-2010 at 14:02:55'                     !
+
 "{ Package: 'stx:libcomp' }"
 
 PrimaryNode subclass:#VariableNode
@@ -723,8 +725,8 @@
         nameSym notNil ifTrue:[
             ^ JAVA at:name
         ].
-        ^ nil.
-        ^ Parser::UndefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
+"/        ^ nil.
+        ^ Parser undefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
     ].
     (type == #GlobalVariable) ifTrue:[
         nameSym := name asSymbolIfInterned.
@@ -733,8 +735,8 @@
                 ^ Smalltalk at:name
             ]
         ].
-        ^ nil.
-        ^ Parser::UndefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
+"/        ^ nil.
+        ^ Parser undefinedVariableError raiseRequestWith:name errorString:('undefined: ',name).
     ].
     (type == #ClassVariable) ifTrue:[
         ^ value classVarAt:name asSymbol
@@ -975,5 +977,5 @@
 !VariableNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.75 2008-10-31 14:25:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.76 2010-08-06 13:22:22 stefan Exp $'
 ! !