changed: #declareUndefinedVariable:as:
fixed multiple declaration of locals with blank-around-temporaries
setting on
--- 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