xmlreaderimpl/trunk/stx_goodies_xmlsuite_xmlreaderimpl.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 02 Apr 2009 11:00:00 +0000
changeset 84 938f18ef8d6e
parent 81 8fa696900058
child 122 44903fb09c08
permissions -rw-r--r--
Loading of precompiled binary classes reworked, now it should no longer cause segfault on image restart
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
84
938f18ef8d6e Loading of precompiled binary classes reworked, now it should no longer cause segfault on image restart
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 81
diff changeset
    24
    expatXMLReaderLib := ((packageDir construct: 'precompiled') construct: Smalltalk versionString) construct:
81
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    25
                                    ('XMLv2__ExpatXMLReader' , 
84
938f18ef8d6e Loading of precompiled binary classes reworked, now it should no longer cause segfault on image restart
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 81
diff changeset
    26
                                    ObjectFileLoader sharedLibraryExtension). 
81
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    27
    expatXMLReaderLib exists ifFalse:
84
938f18ef8d6e Loading of precompiled binary classes reworked, now it should no longer cause segfault on image restart
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 81
diff changeset
    28
        [expatXMLReaderLib := ((packageDir construct: 'precompiled') construct: 'common') construct:
81
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    29
                                        ('XMLv2__ExpatXMLReader' , 
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    30
                                        ObjectFileLoader sharedLibraryExtension)].
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    31
    expatXMLReaderLib exists ifTrue:
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    32
        [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
    33
        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
    34
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
        self postLoadAction   
8fa696900058 stx_goodies_xmlsuite_xmlreaderimpl>>postLoadAction restored as of r71
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 80
diff changeset
    37
    "
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
    "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
    40
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    41
!
16
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    42
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    43
preRequisites
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    44
    ^ #(
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    45
        #'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
    46
        #'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
    47
        #'stx:libbasic'    "Object - superclass of XMLv2::VWXMLReader "
1bda271d9ca2 fixed namespace parsing in VWXMLReader
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 9
diff changeset
    48
        #'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
    49
    )
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    50
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    51
    "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
    52
! !
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
!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
    55
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
classNamesAndAttributes
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
    ^ #(
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
        "<className> or (<className> attributes...) in load order"
76
f04099416924 reverted to the state before 25.3.
plickm1
parents: 70
diff changeset
    59
        (#'XMLv2::ExpatXMLReader' autoload)
80
74abee163e5e Added XercesCXMLReader as autoloaded
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 76
diff changeset
    60
	(#'XMLv2::XercesCXMLReader' autoload)
4
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
        #'XMLv2::VWSAXBuilder'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
        #'XMLv2::VWXMLReader'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
        #'stx_goodies_xmlsuite_xmlreaderimpl'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
    )
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
extensionMethodNames
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
    ^ #(
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
!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
    73
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
companyName
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
    "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
    76
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
    ^ 'eXept Software AG'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
!
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
description
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
    "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
    82
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
    ^ 'Smalltalk/X Class library'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
!
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
legalCopyright
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
    "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
    88
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
    ^ '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
    90
!
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
productName
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
    "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
    94
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
    ^ 'Smalltalk/X'
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
! !
9bcb9d9f5d25 Loaded into & commited from 5.3.6
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97