experiments/FooLookup.st
author Claus Gittinger <cg@exept.de>
Thu, 24 Nov 2011 12:54:24 +0100
changeset 2290 cd61fd0b66ac
parent 2152 1cbdfbcc685c
permissions -rw-r--r--
fixed: #version_SVN ($ to ยง)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     1
"{ Package: 'stx:libjava/experiments' }"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     3
Lookup subclass:#FooLookup
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     4
	instanceVariableNames:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     5
	classVariableNames:'Instance'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     6
	poolDictionaries:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     7
	category:'Languages-Java-Lookup'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     8
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     9
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    10
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    11
!FooLookup class methodsFor:'instance creation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    12
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    13
instance
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    14
    Instance ifNil: [
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    15
        Instance := self basicNew.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    16
    ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    17
    ^ Instance.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    18
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    19
    "Modified: / 25-02-2011 / 14:45:03 / kursjan <kursjan@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    20
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    21
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    22
new
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    23
    ^ self instance.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    24
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    25
    "Created: / 25-02-2011 / 14:44:43 / kursjan <kursjan@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    26
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    27
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    28
!FooLookup methodsFor:'lookup'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    29
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    30
lookupMethodForSelector:selector directedTo:initialSearchClass for:aReceiver withArguments:argArrayOrNil from:sendingContext
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    31
    ^ Lookup builtin lookupMethodForSelector:selector directedTo:initialSearchClass for:aReceiver withArguments:argArrayOrNil from:sendingContext
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    32
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    33
    "Created: / 21-02-2011 / 13:38:55 / kursjan <kursjan@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    34
    "Modified: / 25-02-2011 / 20:23:01 / kursjan <kursjan@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    35
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    36
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    37
!FooLookup class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    38
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    39
version_SVN
2152
1cbdfbcc685c Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 749
diff changeset
    40
    ^ '$Id: FooLookup.st,v 1.1 2011-08-18 19:06:54 vrany Exp $'
1cbdfbcc685c Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 749
diff changeset
    41
! !