# HG changeset patch # User Claus Gittinger # Date 1393943520 -3600 # Node ID 0a53379a12148541a2dedd7213d00ed07db57dc6 # Parent 6e8ec5d71ae751d4a706b2c23dceaa19025fb416 class: PPStream added: #collection diff -r 6e8ec5d71ae7 -r 0a53379a1214 PPStream.st --- a/PPStream.st Tue Mar 04 15:03:22 2014 +0100 +++ b/PPStream.st Tue Mar 04 15:32:00 2014 +0100 @@ -10,6 +10,12 @@ !PPStream methodsFor:'accessing'! +collection + "Answer the underlying collection." + + ^ collection +! + next: anInteger "Answer up to anInteger elements of my collection. Overridden for efficiency." @@ -58,13 +64,14 @@ !PPStream class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPStream.st,v 1.3 2012-05-04 22:06:11 vrany Exp $' + ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPStream.st,v 1.4 2014-03-04 14:32:00 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPStream.st,v 1.3 2012-05-04 22:06:11 vrany Exp $' + ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPStream.st,v 1.4 2014-03-04 14:32:00 cg Exp $' ! version_SVN - ^ '§Id: PPStream.st 2 2010-12-17 18:44:23Z vranyj1 §' + ^ '$Id: PPStream.st,v 1.4 2014-03-04 14:32:00 cg Exp $' ! ! +