Remove Mauve tests
See previous commit for explanation.
"{ Package: 'stx:libjava/examples' }"
"{ NameSpace: Smalltalk }"
Object subclass:#CDDatabaseHandler1
instanceVariableNames:'index title artist tag'
classVariableNames:''
poolDictionaries:''
category:'Languages-Java-Examples'
!
!CDDatabaseHandler1 class methodsFor:'documentation'!
documentation
"
A simple XML CD database parser - a demonstration
of stx:libjava capabilities. See JavaExamples>>example_1
[author:]
Jan Vrany <jan.vrany@fit.cvut.cz>
[instance variables:]
[class variables:]
[see also:]
"
! !
!CDDatabaseHandler1 class methodsFor:'initialization'!
initialize
self lookupObject: JavaLookup instance
"Created: / 13-05-2012 / 17:24:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!CDDatabaseHandler1 methodsFor:'SAX2 interface'!
characters: string offset: off length: len
tag = 'title' ifTrue:[
title := string copyFrom: off + 1 to: off + len.
tag := nil.
].
tag = 'artist' ifTrue:[
artist := string copyFrom: off + 1 to: off + len.
tag := nil.
].
"Created: / 13-05-2012 / 17:27:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
endDocument
"Created: / 16-04-2005 / 12:28:31 / janfrog"
!
endDocumentFragment
"Created: / 10-08-2007 / 09:22:12 / janfrog"
!
endElement:namespace localName:localName qName:qName
qName = 'cd' ifTrue:[
index := index + 1.
Transcript showCR:
(index printString , '. ', title , ' - ' , artist)
]
"Created: / 13-05-2012 / 17:38:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
endPrefixMapping:prefix
"Created: / 16-04-2005 / 12:29:45 / janfrog"
!
ignorableWhitespace:aString
"Created: / 16-04-2005 / 12:30:04 / janfrog"
!
processingInstruction:target data:data
"Created: / 16-04-2005 / 12:31:04 / janfrog"
!
setDocumentLocator:aLocator
"Created: / 16-04-2005 / 12:30:37 / janfrog"
"Modified: / 13-05-2012 / 17:26:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
skippedEnrity:aString
"Created: / 16-04-2005 / 12:31:18 / janfrog"
!
startDocument
index := 0
"Created: / 16-04-2005 / 12:31:25 / janfrog"
"Modified: / 13-05-2012 / 17:30:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
startDocumentFragment
"Created: / 10-08-2007 / 09:22:07 / janfrog"
!
startElement:namespace localName:localName qName:qName attributes:attributes
tag := qName.
"Created: / 13-05-2012 / 17:37:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
startPrefix:prefix mappingTo:uri
"Created: / 17-04-2005 / 08:47:18 / janfrog"
! !
!CDDatabaseHandler1 class methodsFor:'documentation'!
version_CVS
^ '$Header: /cvs/stx/stx/libjava/examples/CDDatabaseHandler1.st,v 1.5 2015-03-20 12:08:02 vrany Exp $'
!
version_HG
^ '$Changeset: <not expanded> $'
!
version_SVN
^ '$Id: CDDatabaseHandler1.st,v 1.5 2015-03-20 12:08:02 vrany Exp $'
! !
CDDatabaseHandler1 initialize!