# HG changeset patch
# User Jan Vrany <jan.vrany@fit.cvut.cz>
# Date 1235580561 0
# Node ID 203df4f28793351392d0d7a91ac4ae4a7e728046
# Parent  0de2eaa86456f8936f76873228e3f65979beb64b
instVarStore instruction fixed

diff -r 0de2eaa86456 -r 203df4f28793 IRInstVarStore.st
--- a/IRInstVarStore.st	Tue Dec 02 09:43:42 2008 +0000
+++ b/IRInstVarStore.st	Wed Feb 25 16:49:21 2009 +0000
@@ -12,11 +12,12 @@
 
 executeOn: interpreter
 
-	Preferences compileBlocksAsClosures 
-		ifFalse: [interpreter storeInstVar: number] 
-		ifTrue: [interpreter pushLiteral: number.
-				interpreter send: #privStoreIn:instVar:].
-		
+        "Preferences compileBlocksAsClosures"false
+                ifFalse: [interpreter storeInstVar: number] 
+                ifTrue: [interpreter pushLiteral: number.
+                                interpreter send: #privStoreIn:instVar:].
+
+    "Modified: / 25-02-2009 / 15:24:03 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !IRInstVarStore methodsFor:'testing'!
diff -r 0de2eaa86456 -r 203df4f28793 stx_goodies_newcompiler.st
--- a/stx_goodies_newcompiler.st	Tue Dec 02 09:43:42 2008 +0000
+++ b/stx_goodies_newcompiler.st	Wed Feb 25 16:49:21 2009 +0000
@@ -21,8 +21,6 @@
         #'stx:libcompat'    "Preferences - referenced by IRDecompiler>>removeClosureCreation: "
         #'stx:libwidg'    "ScrollableView - referenced by IRMethod>>inspector2TabIRCode "
     )
-
-    "Modified: / 02-12-2008 / 10:42:50 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !stx_goodies_newcompiler class methodsFor:'description - contents'!
@@ -64,8 +62,6 @@
         IRTempRead
         IRTempStore
     )
-
-    "Modified: / 02-12-2008 / 10:42:49 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 extensionMethodNames
@@ -74,8 +70,6 @@
         Class binding
         Class bindingOf:
     )
-
-    "Modified: / 02-12-2008 / 10:42:50 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !stx_goodies_newcompiler class methodsFor:'description - project information'!