hg/stx-goodies-xmlsuite: xquery/XQuery__XQueryFocus.st@ea3dbc023c80 (annotated)

235 e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"{ Package: 'stx:goodies/xmlsuite/xquery' }"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3	"{ NameSpace: XQuery }"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5	Object subclass:#XQueryFocus
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	6	instanceVariableNames:'contextItem contextPosition contextSize'
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	classVariableNames:''
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	poolDictionaries:''
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	category:'XQuery-Runtime'
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13	!XQueryFocus methodsFor:'accessing'!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15	contextItem
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16	^ contextItem
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	21	contextItem:something
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	22	contextItem := something.
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	23
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	27	contextPosition
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28	^ contextPosition ? 0
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	30	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	31	"Modified: / 21-03-2007 / 17:22:59 / janfrog"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	32	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	33
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	34	contextPosition:something
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	35	contextPosition := something.
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	36
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	37	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	38	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	39
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	40	contextPositionAdvance
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	41	^ contextPosition := self contextPosition + 1.
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	42
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	43	"Created: / 21-03-2007 / 20:21:36 / janfrog"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	44	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	45
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	46	contextSize
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	47	^ contextSize
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	48
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	49	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	50	!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	51
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	52	contextSize:something
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	53	contextSize := something.
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	"Created: / 17-11-2006 / 11:59:42 / ked"
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56	! !
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58	!XQueryFocus class methodsFor:'documentation'!
e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59
241 e28ef0f20186 Branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 235 diff changeset	60	version_SVN
e28ef0f20186 Branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 235 diff changeset	61	^ '$Id$'
235 e2a2fac1f45f Restore /trunk from r231 Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	62	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Tue, 12 May 2015 12:20:53 +0100
changeset 296	ea3dbc023c80
parent 241	xquery/trunk/XQuery__XQueryFocus.st@e28ef0f20186
permissions	-rw-r--r--