--- a/compiler/PPCContextMemento.st	Mon Nov 24 00:09:23 2014 +0000
+++ b/compiler/PPCContextMemento.st	Wed Apr 15 11:28:09 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/petitparser/compiler' }"
 
+"{ NameSpace: Smalltalk }"
+
 Object subclass:#PPCContextMemento
 	instanceVariableNames:'position properties'
 	classVariableNames:''
@@ -43,7 +45,7 @@
 
 propertyAt: aKey ifAbsent: aBlock
         "Answer the property value associated with aKey or, if aKey isn't found, answer the result of evaluating aBlock."
-
+        
         properties isNil
                 ifTrue: [ ^ aBlock value ]
                 ifFalse: [ 
@@ -53,7 +55,7 @@
                         ^ aBlock value
                 ]
 
-    "Created: / 26-10-2014 / 01:23:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-04-2015 / 11:19:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 propertyAt: aKey ifAbsentPut: aBlock