ExternalStructure.st
changeset 22896 0a1a1f40be28
parent 21770 02cbb05d3aa4
equal deleted inserted replaced
22895:711322e64257 22896:0a1a1f40be28
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2006 by eXept Software AG
     4  COPYRIGHT (c) 2006 by eXept Software AG
     3 	      All Rights Reserved
     5 	      All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
   107                    remembers this pointer, bad things may happen ...."
   109                    remembers this pointer, bad things may happen ...."
   108 
   110 
   109     ^ super unprotectedNew:(self sizeof)
   111     ^ super unprotectedNew:(self sizeof)
   110 ! !
   112 ! !
   111 
   113 
       
   114 !ExternalStructure class methodsFor:'Squeak compatibility'!
       
   115 
       
   116 externalNew
       
   117     ^ self new:self byteSize
       
   118 ! !
       
   119 
   112 !ExternalStructure class methodsFor:'queries'!
   120 !ExternalStructure class methodsFor:'queries'!
   113 
   121 
   114 cType
   122 cType
   115     ^ cType
   123     ^ cType
   116 !
   124 !