ExternalLibraryFunction.st
changeset 19364 4bf0b2b33b65
parent 19357 3e007f7f1969
child 19365 83a120bf2212
child 19406 faccbadf3034
--- a/ExternalLibraryFunction.st	Mon Mar 14 18:47:20 2016 +0100
+++ b/ExternalLibraryFunction.st	Mon Mar 14 21:04:35 2016 +0100
@@ -938,6 +938,10 @@
 # endif
 # if defined(__BORLANDC__) || defined(__VISUALC__)
 #  define HAS_INT64
+#  ifndef __LO32
+#   define __LO32(ll) ((ll) & 0xFFFFFFFFL)
+#   define __HI32(ll) (((ll)>>32) & 0xFFFFFFFFL)
+#  endif
 # endif
 
     ffi_cif __cif;