changed: #declareUndefinedVariable:as:
authorJan Vrany <jan.vrany@fit.cvut.cz>
Tue, 03 Jul 2012 11:34:15 +0200
changeset 2879 7cc70ba5c71e
parent 2878 ef7056fca2c3
child 2880 0951a74f6668
changed: #declareUndefinedVariable:as: fixed multiple declaration of locals with blank-around-temporaries setting on
Parser.st
--- a/Parser.st	Mon Jul 02 21:28:22 2012 +0200
+++ b/Parser.st	Tue Jul 03 11:34:15 2012 +0200
@@ -3251,12 +3251,12 @@
                 atCharacterPosition:posToInsert.
 
             endLocalsPos notNil ifTrue:[
-                localVarDefPosition at:2 put:(endLocalsPos + varName size + 1).
+                localVarDefPosition at:2 put:(endLocalsPos + varName size + 1 + (space ifTrue:[2] ifFalse:[0])).
 
                 methodVarNames := methodVarNames copyWith:varName.
                 methodVars := methodVars copyWith:(var := Variable new name:varName).
             ] ifFalse:[
-                localVarDefPosition := Array with:posToInsert with:posToInsert+varName size+1.
+                localVarDefPosition := Array with:posToInsert with:posToInsert+varName size+1+(space ifTrue:[2] ifFalse:[0]).
 
                 methodVarNames := Array with:varName.
                 methodVars := Array with:(var := Variable new name:varName).
@@ -3277,7 +3277,7 @@
 
     "Created: / 14-10-2010 / 11:04:27 / cg"
     "Modified: / 20-10-2010 / 18:36:32 / cg"
-    "Modified: / 02-07-2012 / 20:25:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 03-07-2012 / 10:31:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 defineAsUndeclaredVariable:aName
@@ -10783,11 +10783,11 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.717 2012-07-02 19:28:22 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.718 2012-07-03 09:34:15 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.717 2012-07-02 19:28:22 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.718 2012-07-03 09:34:15 vrany Exp $'
 !
 
 version_SVN