1 "{ Package: 'stx:goodies/xmlsuite/xquery' }"

     2 

     3 "{ NameSpace: XQuery }"

     4 

     5 TypeXSDecimal subclass:#TypeXSInteger

     6 	instanceVariableNames:''

     7 	classVariableNames:''

     8 	poolDictionaries:''

     9 	category:'XQuery-Types'

    10 !

    11 

    12 

    13 !TypeXSInteger methodsFor:'accessing'!

    14 

    15 typeName

    16     "Superclass says that I am responsible to implement this method"

    17 

    18     ^'xs:integer'

    19 

    20     "Created: / 05-12-2007 / 20:52:53 / janfrog"

    21 ! !

    22 

    23 !TypeXSInteger class methodsFor:'documentation'!

    24 

    25 version

    26     ^ '$Header: /opt/data/cvs/stx/goodies/xmlsuite/xquery/XQuery__TypeXSInteger.st,v 1.1 2007-12-05 21:12:15 vranyj1 Exp $'

    27 ! !