ObjFHandle.st
changeset 302 e5c0efc943e6
parent 299 33a154508328
child 304 4f44c64cb245
--- a/ObjFHandle.st	Fri Jul 12 16:53:40 1996 +0200
+++ b/ObjFHandle.st	Fri Jul 12 17:21:16 1996 +0200
@@ -307,10 +307,10 @@
 isFunctionObjectHandle
     "return true, if I am a handle for a c-code (or other) function object file"
 
-    handleType := #functionObject
+    handleType == #functionObject
 
-    "Modified: 12.7.1996 / 15:34:29 / cg"
     "Created: 12.7.1996 / 15:35:33 / cg"
+    "Modified: 12.7.1996 / 17:20:47 / cg"
 !
 
 isMethodHandle
@@ -342,5 +342,5 @@
 !ObjectFileHandle  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.15 1996-07-12 13:54:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.16 1996-07-12 15:21:16 cg Exp $'
 ! !