--- a/PPToken.st	Mon Nov 03 11:28:44 2014 +0000
+++ b/PPToken.st	Mon Nov 03 11:30:59 2014 +0000
@@ -28,12 +28,6 @@
 	^ self on: aSequenceableCollection start: 1 stop: aSequenceableCollection size value: nil
 !
 
-on: aSequenceableCollection start: aStartInteger stop: aStopInteger
-	^ self basicNew 
-		initializeOn: aSequenceableCollection
-		start: aStartInteger stop: aStopInteger
-!
-
 on: aSequenceableCollection start: aStartInteger stop: aStopInteger value: anObject
 	^ self basicNew 
 		initializeOn: aSequenceableCollection
@@ -104,12 +98,6 @@
 
 !PPToken methodsFor:'initialization'!
 
-initializeOn: aSequenceableCollection start: aStartInteger stop: aStopInteger
-	collection := aSequenceableCollection.
-	start := aStartInteger.
-	stop := aStopInteger
-!
-
 initializeOn: aSequenceableCollection start: aStartInteger stop: aStopInteger value: anObject
 	collection := aSequenceableCollection.
 	start := aStartInteger.