--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ObjectFileHandle.st	Tue Aug 29 00:45:44 1995 +0200
@@ -0,0 +1,80 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+Object subclass:#ObjectFileHandle
+       instanceVariableNames:'sysHandle1 sysHandle2 pathName id'
+       classVariableNames:''
+       poolDictionaries:''
+       category:'System-Compiler'
+!
+
+ObjectFileHandle comment:'
+COPYRIGHT (c) 1995 by Claus Gittinger
+	     All Rights Reserved
+
+$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.1 1995-08-28 22:45:34 claus Exp $
+'!
+
+!ObjectFileHandle class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+version
+"
+$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.1 1995-08-28 22:45:34 claus Exp $
+"
+!
+
+documentation
+"
+    A support class for the ObjectFileLoader
+    not for public use.
+"
+! !
+
+!ObjectFileHandle methodsFor:'accessing'!
+
+sysHandle1:h1 sysHandle2:h2 pathName:path id:i
+    sysHandle1 := h1.
+    sysHandle2 := h2.
+    pathName := path.
+    id := i
+!
+
+sysHandle1
+    ^ sysHandle1
+!
+
+sysHandle2
+    ^ sysHandle2
+!
+
+pathName
+    ^ pathName
+!
+
+id
+    ^ id
+! !
+