--- a/compiler/tests/PetitCompilerTest.st	Thu Oct 30 11:35:27 2014 +0000
+++ b/compiler/tests/PetitCompilerTest.st	Thu Oct 30 23:01:54 2014 +0000
@@ -14,6 +14,19 @@
 	^ context := PPCProfilingContext new
 ! !
 
+!PetitCompilerTest methodsFor:'running'!
+
+tearDown
+    | parserClass |
+
+    parserClass := (Smalltalk at: #PPGeneratedParser).
+    parserClass notNil ifTrue:[ 
+        parserClass removeFromSystem
+    ].
+
+    "Created: / 30-10-2014 / 22:56:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !PetitCompilerTest methodsFor:'test support'!
 
 assert: p parse: whatever