--- a/compiler/tests/PPCCodeGeneratorTest.st	Fri Jul 24 15:37:23 2015 +0100
+++ b/compiler/tests/PPCCodeGeneratorTest.st	Fri Jul 24 19:42:09 2015 +0100
@@ -917,48 +917,6 @@
     "Created: / 22-05-2015 / 11:47:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-testSequenceOptInlined1
-    | a b bOpt |
-
-    a := $a asParser asCompilerNode.
-    b := $b asParser asCompilerNode.
-    bOpt := PPCOptionalNode new
-                child:  b ;
-                markForInline;
-                yourself.
-    node := PPCSequenceNode new
-        children: { a . bOpt };
-        yourself.
-    self compileTree: node.
-    
-    self assert: parser parse: 'ab' to: #($a $b ) end: 2.
-    self assert: parser parse: 'a' to: #( $a nil ) end: 1.
-
-    "Created: / 22-05-2015 / 11:47:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-testSequenceOptInlined2
-    | a b bOpt |
-
-    a := $a asParser asCompilerNode.
-    a markForInline.
-    b := $b asParser asCompilerNode.
-    b markForInline.
-    bOpt := PPCOptionalNode new
-                child:  b ;
-                markForInline;
-                yourself.
-    node := PPCSequenceNode new
-        children: { a . bOpt };
-        yourself.
-    self compileTree: node.
-    
-    self assert: parser parse: 'ab' to: #($a $b ) end: 2.
-    self assert: parser parse: 'a' to: #( $a nil ) end: 1.
-
-    "Created: / 22-05-2015 / 11:47:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 testStarAnyNode
     arguments cacheFirstFollow: false.
     node := PPCStarAnyNode new