hg/stx-goodies-petitparser: PPMemento.st@65da3a4195b6 (annotated)

642 77d5fddb6462 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 405 diff changeset	1	"{ Encoding: utf8 }"
77d5fddb6462 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 405 diff changeset	2
4 90de244a7fa2 move to package Claus Gittinger <cg@exept.de> parents: 0 diff changeset	3	"{ Package: 'stx:goodies/petitparser' }"
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	4
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	5	Object subclass:#PPMemento
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	6	instanceVariableNames:'result count context'
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	7	classVariableNames:''
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	8	poolDictionaries:''
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	9	category:'PetitParser-Core'
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
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	!PPMemento class methodsFor:'instance creation'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	14
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	15	new
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	16	^ self basicNew initialize
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	17	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	18
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	19	!PPMemento methodsFor:'accessing'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	20
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	21	contextMemento
6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	22	^ context
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	23	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	24
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	25	contextMemento: aPPContextMemento
6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	26	context := aPPContextMemento
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	27	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	28
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	29	result
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	30	^ result
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	31	!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	32
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	33	result: anObject
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	34	result := anObject
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	35	! !
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	!PPMemento methodsFor:'accessing-readonly'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	38
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	39	count
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	40	^ count
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	41	! !
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	!PPMemento methodsFor:'actions'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	44
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	45	increment
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	46	count := count + 1
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	47	! !
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	!PPMemento methodsFor:'initialization'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	50
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	51	initialize
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	52	count := 0
19 4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	53
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	54	! !
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	55
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	56	!PPMemento class methodsFor:'documentation'!
739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	57
19 4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	58	version
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	59	^ '$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	60	!
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	61
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	62	version_CVS
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	63	^ '$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	64	!
4247b85d8584 Checkin from browser Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4 diff changeset	65
405 0470a5e6e712 Merged PetitParser and PetitTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 377 diff changeset	66	version_HG
0470a5e6e712 Merged PetitParser and PetitTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 377 diff changeset	67
0470a5e6e712 Merged PetitParser and PetitTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 377 diff changeset	68	^ '$Changeset: <not expanded> $'
0470a5e6e712 Merged PetitParser and PetitTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 377 diff changeset	69	!
0470a5e6e712 Merged PetitParser and PetitTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 377 diff changeset	70
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	71	version_SVN
642 77d5fddb6462 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 405 diff changeset	72	^ '§Id: PPMemento.st 2 2010-12-17 18:44:23Z vranyj1 §'
0 739fe9b7253e * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	73	! !
377 6112a403a52d Updated to latest version from Moose repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	74

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Wed, 24 Jul 2019 21:13:30 +0000
changeset 643	65da3a4195b6
parent 642	77d5fddb6462
permissions	-rw-r--r--