--- a/compiler/PPCMethod.st	Mon Jun 01 22:02:17 2015 +0100
+++ b/compiler/PPCMethod.st	Mon Jun 01 23:15:52 2015 +0100
@@ -100,6 +100,37 @@
     ^ ''
 ! !
 
+!PPCMethod methodsFor:'code generation'!
+
+code: aStringOrBlock
+    buffer code: aStringOrBlock.
+
+    "Created: / 01-06-2015 / 22:31:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+codeBlock: contents
+    | outerBlock innerBlock |
+
+    outerBlock := buffer.
+    innerBlock := PPCCodeBlock new.
+    innerBlock indentationLevel: outerBlock indentationLevel + 1.  
+    [ 
+        buffer addOnLine:'['.
+        buffer := innerBlock.
+        self code: contents.
+    ] ensure:[
+        buffer := outerBlock.
+        buffer 
+            code: (String streamContents:[:s | innerBlock codeOn: s]);
+            nl;
+            codeIndent.
+
+        buffer addOnLine:']'.
+    ]
+
+    "Created: / 01-06-2015 / 22:33:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !PPCMethod methodsFor:'code generation - indenting'!
 
 dedent