--- a/compiler/PPCCodeBlock.st Fri Jul 31 14:07:31 2015 +0100
+++ b/compiler/PPCCodeBlock.st Mon Aug 17 12:56:02 2015 +0100
@@ -38,16 +38,9 @@
!PPCCodeBlock methodsFor:'code generation'!
code: aStringOrBlockOrRBParseNode
- aStringOrBlockOrRBParseNode isString ifTrue:[
- self emitCodeAsString: aStringOrBlockOrRBParseNode
- ] ifFalse:[
- (aStringOrBlockOrRBParseNode isKindOf: RBProgramNode) ifTrue:[
- self emitCodeAsRBNode: aStringOrBlockOrRBParseNode.
- ] ifFalse:[
- self emitCodeAsBlock: aStringOrBlockOrRBParseNode
- ].
- ].
-
+ self codeNl.
+ self codeOnLine: aStringOrBlockOrRBParseNode
+
"Created: / 01-06-2015 / 21:07:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 03-06-2015 / 05:52:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
@@ -66,6 +59,22 @@
].
"Created: / 01-06-2015 / 22:58:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+codeNl
+ self add: ''.
+!
+
+codeOnLine: aStringOrBlockOrRBParseNode
+ aStringOrBlockOrRBParseNode isString ifTrue:[
+ self emitCodeAsString: aStringOrBlockOrRBParseNode
+ ] ifFalse:[
+ (aStringOrBlockOrRBParseNode isKindOf: RBProgramNode) ifTrue:[
+ self emitCodeAsRBNode: aStringOrBlockOrRBParseNode.
+ ] ifFalse:[
+ self emitCodeAsBlock: aStringOrBlockOrRBParseNode
+ ].
+ ].
! !
!PPCCodeBlock methodsFor:'code generation - variables'!
@@ -178,7 +187,7 @@
!
emitCodeAsString: aString
- buffer nextPutAll: aString
+ self addOnLine: aString
!
formatRBNode: anRBNode