|
PROCEDURE Insert(hash: Hash; object: Objects.Object); (* precondition: object must be acceptable for hash adds object to hash *) VAR ok: BOOLEAN; hashval: HashValue; entry, predecessor: Entry; BEGIN ok := ~Find(hash, object, hashval, entry, predecessor); ASSERT(ok); NEW(entry); entry.object := object; entry.next := hash.bucket[hashval]; hash.bucket[hashval] := entry; END Insert; |
Analog zu SortedBinaryTrees wird hier darauf
bestanden, daß Schlüssel eindeutig sind.
| |
Genauso wie bei den Stapeln werden neu hinzukommende
Einträge vor dem ersten Eintrag eingefügt.
|
Copyright © 1999, 2004 Andreas F. Borchert, in HTML konvertiert am 28.01.2005 |