examples/STComparator.st
author Claus Gittinger <cg@exept.de>
Wed, 03 Apr 2019 08:32:45 +0200
branchcvs_MAIN
changeset 3895 eb9b49155bf8
parent 3412 df11bb428463
child 3508 622620308fee
permissions -rw-r--r--
#REFACTORING by cg class: JavaMapInspectorView added: #hasAllNumericKeys removed: #allNumericKeys changed: #indexList (send #hasAllNumericKeys instead of #allNumericKeys)

"{ Package: 'stx:libjava/examples' }"

Object subclass:#STComparator
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Languages-Java-Examples'
!


!STComparator class methodsFor:'initialization'!

initialize

    self lookupObject: JavaLookup instance

    "Created: / 13-05-2012 / 17:24:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!STComparator methodsFor:'comparing'!

compare: o1 and: o2
    ^ o1 = o2 ifTrue:[ 
        0 
    ] ifFalse: [
        o1 < o2 ifTrue:[
            -1
        ] ifFalse:[
            1
        ]            
    ]

    "
        STComparator new compare: 1 and: 1
    "

    "Created: / 21-08-2012 / 10:44:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!STComparator class methodsFor:'documentation'!

version_CVS
    ^ '$Header: /cvs/stx/stx/libjava/examples/STComparator.st,v 1.5 2015-03-20 12:08:02 vrany Exp $'
!

version_HG

    ^ '$Changeset: <not expanded> $'
!

version_SVN
    ^ '$Id: STComparator.st,v 1.5 2015-03-20 12:08:02 vrany Exp $'
! !


STComparator initialize!