hg/stx-goodies-xmlsuite: xquery/XQuery__TypeXSBoolean.st@bad21c4f64bf (annotated)

0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"{ Package: 'stx:goodies/xmlsuite/xquery' }"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3	"{ NameSpace: XQuery }"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5	TypeXSAnyAtomicType subclass:#TypeXSBoolean
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	6	instanceVariableNames:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	classVariableNames:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	poolDictionaries:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	category:'XQuery-Types'
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12
232 9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	13	!TypeXSBoolean methodsFor:'type value - accessing'!
0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15	typeName
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16	"Superclass says that I am responsible to implement this method"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18	^'xs:boolean'
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20	"Created: / 05-12-2007 / 20:52:53 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	21	! !
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	22
232 9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	23	!TypeXSBoolean methodsFor:'type value - converting'!
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	24
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	25	toCanonicalLexicalForm:value
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	26	^ value asString.
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	27
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	28	"Modified: / 24-10-2009 / 20:21:19 / Jan Kurs <kursj1@fel.cvut.cz>"
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	29	! !
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	30
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	31	!TypeXSBoolean methodsFor:'type value - testing'!
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	32
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	33	checkLexicalForm:form
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	34	^ (form = 'true') or: [ form = 'false'] or: [ form = '0'] or: [ form = '1']
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	35
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	36	"Created: / 15-10-2009 / 17:36:18 / Jan Kurs <kursj1@fel.cvut.cz>"
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	37	"Modified: / 17-11-2009 / 14:29:07 / Jan Kurs <kursj1@fel.cvut.cz>"
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	38	! !
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	39
0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	40	!TypeXSBoolean class methodsFor:'documentation'!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	41
232 9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	42	version_SVN
9d8fd28b99b0 branch datatypes reintegrated Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	43	^ '$Id$'
0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	44	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Mon, 02 Jul 2018 08:46:01 +0200
changeset 305	bad21c4f64bf
parent 296	ea3dbc023c80
permissions	-rw-r--r--