--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ExternalStructure.st	Fri May 05 11:41:08 2006 +0200
@@ -0,0 +1,74 @@
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+              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.
+"
+
+"{ Package: 'stx:libbasic' }"
+
+ExternalAddress subclass:#ExternalStructure
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Support'
+!
+
+ExternalStructure class instanceVariableNames:'cType'
+
+"
+ No other class instance variables are inherited by this class.
+"
+!
+
+!ExternalStructure class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+              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.
+"
+!
+
+documentation
+"
+    Instances of this class represent external (non-Smalltalk) data,
+    typically C-structs or C++ instances.
+    They are only useful to represent handles as returned by C functions as smalltalk objects. 
+
+    ExternallStructures are much like ExternalBytes - however, the latter
+    allow you to access bytes via indexed at:/at:put: messages, whilst instances of subclasses of me
+    allow access via the corresponding getter/setter methods of my C-type.
+
+    [author:]
+        Claus Gittinger
+
+    [see also:]
+        ExternalBytes ExternalAddress
+        ( how to write primitive code :html: programming/primitive.html )
+"
+! !
+
+!ExternalStructure class methodsFor:'queries'!
+
+cType
+    ^ cType
+! !
+
+!ExternalStructure class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStructure.st,v 1.1 2006-05-05 09:41:08 cg Exp $'
+! !