--- a/ExternalStructure.st	Wed Mar 23 14:25:59 2016 +0100
+++ b/ExternalStructure.st	Wed Mar 23 14:35:58 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2006 by eXept Software AG
 	      All Rights Reserved
@@ -149,17 +151,19 @@
 
 !ExternalStructure methodsFor:'private'!
 
-fromExternalAddress:anExternalAddress
-    self setAddress:(anExternalAddress address) size:(anExternalAddress size).
+fromExternalAddress:anExternalAddressOrExternalStructure
+    self 
+        setAddress:(anExternalAddressOrExternalStructure address) 
+        size:(anExternalAddressOrExternalStructure size).
 ! !
 
 !ExternalStructure class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStructure.st,v 1.6 2015-02-09 11:52:18 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStructure.st,v 1.6 2015-02-09 11:52:18 cg Exp $'
+    ^ '$Header$'
 ! !