--- a/stx_goodies_petitparser.st	Fri Oct 03 02:45:16 2014 +0100
+++ b/stx_goodies_petitparser.st	Fri Oct 03 03:11:33 2014 +0100
@@ -195,6 +195,7 @@
         Symbol value:
         Text asPetitStream
         UndefinedObject asParser
+        PositionableStream peekTwice
     )
 ! !