SMALLTALK K1ex127-.45ex51275ahler/Bothner

15.1 Prüfung von Direktverbindungen 305
Suchverfahren
Klassen−Variablen:
PfadDic PfadSammler
Station
Instanz−Variablen:
Klassen−Methoden:
Instanz−Methoden:
name
direktVerbindung
koordinaten
erzeugenInstanzen
eintragenName:
eintragenDirektverbindung:
bereitstellenDirektverbindung
printOn:
Abbildung 15.3: Die Klassen “Suchverfahren” und “Station”
Auf dieser Basis richten wir die Stationen “Ham”, “Koe”, “Kar”, “Stu”, “Mai”,
“Fra”, “Mue”, “Ful”, “Ber” und “Dre” als Instanzen der Klasse “Station” durch
die folgende Anforderung ein:
Station erzeugenInstanzen
Somit haben wir z.B. für die globale Variable “Ham” die folgende Situation:
Ham
name ’Hamburg’
direktVerbindung
koordinaten nil
(Koe Ful Ber)
Abbildung 15.4: Attribute der Station “Ham”
Auskunft über Direktverbindungen
Zur Prüfung, ob eine Direktverbindung von einem Abfahrtsort zu einem Ankunftsort
besteht, vereinbaren wir in der Klasse “Suchverfahren” die Instanz-Methode
“direkt:” in der folgenden Form:
direkt: ankunft
(self bereitstellenDirektverbindung includes: ankunft)
ifTrue: [Transcript cr;show:’Direktverbindung existiert’]
ifFalse: [Transcript cr;show:’Direktverbindung existiert nicht’]
Als Ergebnis der Anforderung
Ham direkt: Koe