hg/stx-goodies-petitparser: PPMemento.st@553a5456963b (annotated)

4 90de244a7fa2 move to package Claus Gittinger <cg@exept.de> parents: 0 diff changeset	1	"{ Package: 'stx:goodies/petitparser' }"
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	2
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	3	Object subclass:#PPMemento
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	4	instanceVariableNames:'result count context'
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	5	classVariableNames:''
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	6	poolDictionaries:''
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	7	category:'PetitParser-Core'
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	8	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	9
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	10
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	11	!PPMemento class methodsFor:'instance creation'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	12
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	13	new
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	14	^ self basicNew initialize
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	15	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	16
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	17	!PPMemento methodsFor:'accessing'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	18
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	19	contextMemento
6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	20	^ context
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	21	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	22
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	23	contextMemento: aPPContextMemento
6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	24	context := aPPContextMemento
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	25	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	26
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	27	result
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	28	^ result
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	29	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	30
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	31	result: anObject
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	32	result := anObject
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	33	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	34
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	35	!PPMemento methodsFor:'accessing-readonly'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	36
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	37	count
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	38	^ count
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	39	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	40
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	41	!PPMemento methodsFor:'actions'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	42
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	43	increment
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	44	count := count + 1
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	45	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	46
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	47	!PPMemento methodsFor:'initialization'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	48
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	49	initialize
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	50	count := 0
19 4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	51
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	52	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	53
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	54	!PPMemento class methodsFor:'documentation'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	55
19 4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	56	version
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	57	^ '$Header: /cvs/stx/stx/goodies/petitparser/PPMemento.st,v 1.3 2012-05-04 22:00:45 vrany Exp $'
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	58	!
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	59
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	60	version_CVS
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	61	^ '$Header: /cvs/stx/stx/goodies/petitparser/PPMemento.st,v 1.3 2012-05-04 22:00:45 vrany Exp $'
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	62	!
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	63
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	64	version_SVN
19 4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	65	^ '�Id: PPMemento.st 2 2010-12-17 18:44:23Z vranyj1 �'
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	66	! !
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	67

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Sun, 26 Oct 2014 01:03:31 +0000
changeset 391	553a5456963b
parent 377	6112a403a52d
child 405	0470a5e6e712
permissions	-rw-r--r--