--- a/ExternalLibraryFunction.st	Fri May 11 09:56:43 2018 +0200
+++ b/ExternalLibraryFunction.st	Fri May 11 09:57:06 2018 +0200
@@ -568,7 +568,7 @@
     "/ aType == #hresult         ifTrue:[^ #uint32 ].  -- keep this; it is translated later (in invoke)
     aType == #boolean         ifTrue:[^ #bool ].
     "/ care for 64bit machines
-    aType == #ulongReturn     ifTrue:[^ ExternalAddress pointerSize == 8 ifTrue:[#uint64] ifFalse:[#uint32]].
+    aType == #ulongReturn     ifTrue:[^ ExternalBytes sizeofPointer == 8 ifTrue:[#uint64] ifFalse:[#uint32]].
     aType == #none            ifTrue:[^ #void ].
     aType == #struct          ifTrue:[^ #pointer ].
     aType == #structIn        ifTrue:[^ #pointer ].
@@ -588,7 +588,7 @@
     aType == #BSTR            ifTrue:[^ #wcharPointer].
 
     "/ care for 64bit machines
-    aType == #SIZE_T          ifTrue:[^ ExternalAddress pointerSize == 8 ifTrue:[#uint64] ifFalse:[#uint32]].
+    aType == #SIZE_T          ifTrue:[^ ExternalBytes sizeofPointer == 8 ifTrue:[#uint64] ifFalse:[#uint32]].
 
     (aType isString or:[aType isSymbol]) ifFalse:[
         CType isNil ifTrue:[