xmlreaderimpl/trunk/stx_goodies_xmlsuite_xmlreaderimpl.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 31 Mar 2009 13:32:01 +0000
changeset 81 8fa696900058
parent 80 74abee163e5e
child 84 938f18ef8d6e
permissions -rw-r--r--
stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     1
"{ Package: 'stx:goodies/xmlsuite/xmlreaderimpl' }"
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
LibraryDefinition subclass:#stx_goodies_xmlsuite_xmlreaderimpl
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
	instanceVariableNames:''
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
	classVariableNames:''
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
	poolDictionaries:''
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	category:'* Projects & Packages *'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
!stx_goodies_xmlsuite_xmlreaderimpl class methodsFor:'description'!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
9
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    12
preLoadAction
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    13
	ObjectFileLoader searchedLibraries:
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    14
	        (ObjectFileLoader searchedLibraries asOrderedCollection
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    15
			add: '/usr/lib/libexpat.so';
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    16
			yourself) asArray
a46f1c55c2c3 added preLoadAction
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    17
16
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    18
!
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    19
postLoadAction
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    20
81
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    21
    | packageDir expatXMLReaderLib |
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    22
    packageDir := Smalltalk getPackageDirectoryForPackage: self package. 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    23
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    24
    expatXMLReaderLib := packageDir construct: 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    25
                                    ('XMLv2__ExpatXMLReader' , 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    26
                                    ObjectFileLoader sharedLibraryExtension , 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    27
                                    '.' , Smalltalk versionString).
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    28
    expatXMLReaderLib exists ifFalse:
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    29
        [expatXMLReaderLib := packageDir construct: 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    30
                                        ('XMLv2__ExpatXMLReader' , 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    31
                                        ObjectFileLoader sharedLibraryExtension)].
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    32
    expatXMLReaderLib exists ifTrue:
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    33
        [Transcript showCR:'Loading precompiled ExpatXMLReader class from: ' , expatXMLReaderLib nameString.
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    34
        ObjectFileLoader loadObjectFile: expatXMLReaderLib nameString].
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    35
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    36
    "
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    37
        self postLoadAction   
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    38
    "
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    39
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    40
    "Modified: / 25-03-2009 / 13:46:27 / Martin Plicka <plickm1@fel.cvut.cz>"
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    41
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    42
!
16
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    43
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    44
preRequisites
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    45
    ^ #(
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    46
        #'stx:goodies/xml/vw'    "XML::XMLParser - superclass of XMLv2::VWXMLReader::XMLParser "
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    47
        #'stx:goodies/xmlsuite/core'    "XMLv2::XMLReader - superclass of XMLv2::ExpatXMLReader "
16
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    48
        #'stx:libbasic'    "Object - superclass of XMLv2::VWXMLReader "
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    49
        #'stx:libcomp'    "ObjectFileLoader - referenced by stx_goodies_xmlsuite_xmlreaderimpl class>>preLoadAction "
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    50
    )
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    51
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    52
    "Modified: / 02-06-2008 / 22:37:47 / Jan Vrany <vranyj1@fel.cvut.cz>"
4
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
! !
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
!stx_goodies_xmlsuite_xmlreaderimpl class methodsFor:'description - contents'!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
classNamesAndAttributes
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
    ^ #(
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    59
        "<className> or (<className> attributes...) in load order"
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    60
        (#'XMLv2::ExpatXMLReader' autoload)
80
74abee163e5e Added XercesCXMLReader as autoloaded
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 76
diff changeset
    61
	(#'XMLv2::XercesCXMLReader' autoload)
4
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
        #'XMLv2::VWSAXBuilder'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
        #'XMLv2::VWXMLReader'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
        #'stx_goodies_xmlsuite_xmlreaderimpl'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
    )
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    66
!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    67
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
extensionMethodNames
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
    ^ #(
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
    )
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    71
! !
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
!stx_goodies_xmlsuite_xmlreaderimpl class methodsFor:'description - project information'!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
companyName
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
    "Return a companyname which will appear in <lib>.rc"
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
    ^ 'eXept Software AG'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
description
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
    "Return a description string which will appear in vc.def / bc.def"
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
    ^ 'Smalltalk/X Class library'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
legalCopyright
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
    "Return a copyright string which will appear in <lib>.rc"
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
    ^ 'Copyright Claus Gittinger 1988-2008\nCopyright eXept Software AG 1998-2008'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
!
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
productName
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
    "Return a product name which will appear in <lib>.rc"
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
    ^ 'Smalltalk/X'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97
! !
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98