ObjFHandle.st
changeset 368 26e9268bde0f
parent 367 87d4673fbd06
child 388 067d7de615f5
--- a/ObjFHandle.st	Fri Oct 18 14:35:41 1996 +0200
+++ b/ObjFHandle.st	Fri Oct 18 22:02:45 1996 +0200
@@ -18,7 +18,7 @@
 	category:'System-Compiler'
 !
 
-!ObjectFileHandle  class methodsFor:'documentation'!
+!ObjectFileHandle class methodsFor:'documentation'!
 
 copyright
 "
@@ -260,9 +260,6 @@
     f setName:aString moduleHandle:self.
 
     slot := weakFunctionRefs identityIndexOf:nil.
-    slot == 0 ifTrue:[
-	slot := weakFunctionRefs identityIndexOf:0
-    ].
     slot ~~ 0 ifTrue:[
         weakFunctionRefs at:slot put:f.
         ^ f.
@@ -277,7 +274,7 @@
     ^ f
 
     "Created: 12.7.1996 / 14:59:09 / cg"
-    "Modified: 12.7.1996 / 15:52:07 / cg"
+    "Modified: 18.10.1996 / 20:59:54 / cg"
 !
 
 hasUndefinedSymbols
@@ -356,8 +353,8 @@
     "Modified: 12.7.1996 / 15:42:21 / cg"
 ! !
 
-!ObjectFileHandle  class methodsFor:'documentation'!
+!ObjectFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.18 1996-10-18 12:35:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.19 1996-10-18 20:02:45 cg Exp $'
 ! !