tests/PPExtensionTest.st
changeset 409 7b13d5560783
parent 405 0470a5e6e712
child 427 a7f5e6de19d2
--- a/tests/PPExtensionTest.st	Mon Nov 03 12:47:37 2014 +0000
+++ b/tests/PPExtensionTest.st	Mon Nov 03 11:33:28 2014 +0000
@@ -53,17 +53,6 @@
 	self assert: parser asParser equals: parser
 !
 
-testOrdered
-	| parser |
-	parser := #(1 2) asParser.
-	self assert: parser parse: #(1 2) to: #(1 2).
-	self assert: parser parse: #(1 2 3) to: #(1 2) end: 2.
-	self assert: parser fail: #().
-	self assert: parser fail: #(1).
-	self assert: parser fail: #(1 1).
-	self assert: parser fail: #(1 1 2)
-!
-
 testParser
 	| parser |
 	parser := $a asParser.