PackageLoader fileInPackage: #Compiler; fileInPackage: #Sockets

Here is a quick fix. It loses some optimization, but better correct than fast. :)

Paolo
diff --git a/packages/stinst/parser/GSTParser.st b/packages/stinst/parser/GSTParser.st
index 1ed87b0..c84410a 100644
--- a/packages/stinst/parser/GSTParser.st
+++ b/packages/stinst/parser/GSTParser.st
@@ -248,15 +248,11 @@ STInST.STFileInParser subclass: GSTFileInParser [
         argument := self parsePrimitiveObject.
         self skipExpectedToken: #>.
         
-        argument isVariable
-            ifTrue: [stmt := RBMessageNode
-    	                     receiver: taggee
-    	                     selector: selector
-    	                     arguments: { argument }.
-                     self evaluateStatement: stmt]
-            ifFalse: [self evaluateMessageOn: taggee
-                           selector: selector
-                           argument: argument value]
+        stmt := RBMessageNode
+    	             receiver: taggee
+    	             selector: selector
+    	             arguments: { argument }.
+        self evaluateStatement: stmt.
     ]
     
     parseClassVariable [ 
_______________________________________________
help-smalltalk mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/help-smalltalk

Reply via email to