replace SYSTEM.ADDRESS with SYSTEM.INTADR

diff --git a/src/cpfront/486/Lib/Mod/FFI.cp b/src/cpfront/486/Lib/Mod/FFI.cp
index 40300f1228be7ec374b385b8b5982b5fd8f7b43e..d14bf4f1a0c3fc0917a2b9881becd90174fa0c71 100644 (file)
--- a/src/cpfront/486/Lib/Mod/FFI.cp
+++ b/src/cpfront/486/Lib/Mod/FFI.cp
@@ -87,6 +87,6 @@ MODULE LibFFI ["ffi.h"];
 
   PROCEDURE [ccall] prep_cif* ["ffi_prep_cif"] (VAR c: cif; a: abi; nargs: types.unsigned_int; rtype: POINTER TO type; atypes: POINTER [untagged] TO ARRAY [untagged] OF POINTER TO type): status;
   PROCEDURE [ccall] prep_cif_var* ["ffi_prep_cif_var"] (VAR c: cif; a: abi; nfixedargs, ntotalargs: types.unsigned_int; rtype: POINTER TO type; atypes: POINTER [untagged] TO ARRAY [untagged] OF POINTER TO type): status;
-  PROCEDURE [ccall] call* ["ffi_call"] (VAR c: cif; fn, rvalue, avalue: SYSTEM.ADDRESS);
+  PROCEDURE [ccall] call* ["ffi_call"] (VAR c: cif; fn, rvalue, avalue: INTEGER);
 
 END LibFFI.

diff --git a/src/cpfront/arm/Lib/Mod/FFI.cp b/src/cpfront/arm/Lib/Mod/FFI.cp
index 9297a393c93006756b0c62de4ddcfa95ae105698..907635b816c832e7e2ab12e61b25faa9ee318f9b 100644 (file)
--- a/src/cpfront/arm/Lib/Mod/FFI.cp
+++ b/src/cpfront/arm/Lib/Mod/FFI.cp
@@ -88,6 +88,6 @@ MODULE LibFFI ["ffi.h"];
 
   PROCEDURE [ccall] prep_cif* ["ffi_prep_cif"] (VAR c: cif; a: abi; nargs: types.unsigned_int; rtype: POINTER TO type; atypes: POINTER [untagged] TO ARRAY [untagged] OF POINTER TO type): status;
   PROCEDURE [ccall] prep_cif_var* ["ffi_prep_cif_var"] (VAR c: cif; a: abi; nfixedargs, ntotalargs: types.unsigned_int; rtype: POINTER TO type; atypes: POINTER [untagged] TO ARRAY [untagged] OF POINTER TO type): status;
-  PROCEDURE [ccall] call* ["ffi_call"] (VAR c: cif; fn, rvalue, avalue: SYSTEM.ADDRESS);
+  PROCEDURE [ccall] call* ["ffi_call"] (VAR c: cif; fn, rvalue, avalue: INTEGER);
 
 END LibFFI.

diff --git a/src/generic/CPfront/Mod/CPC.odc b/src/generic/CPfront/Mod/CPC.odc
index 1ca2f722d5af60c6f6cf348d6d396ae59eb36c76..4e26722387c6c95279a9166fae3517fe71a33640 100644 (file)
Binary files a/src/generic/CPfront/Mod/CPC.odc and b/src/generic/CPfront/Mod/CPC.odc differ

diff --git a/src/generic/CPfront/Mod/CPV.odc b/src/generic/CPfront/Mod/CPV.odc
index 9c128c6b2cdf0a571bd63e2411e32b0cfe81ee5a..0fbf6c0fcabfc80fc9e2d5dc390011a0cf6cff9c 100644 (file)
Binary files a/src/generic/CPfront/Mod/CPV.odc and b/src/generic/CPfront/Mod/CPV.odc differ

diff --git a/src/generic/Dev/Mod/CPT.odc b/src/generic/Dev/Mod/CPT.odc
index 9b8007545ee3129b9f95c55ba4c50e9077e2329d..e97b83337e1ff066d2f6865cde885a8781b781c9 100644 (file)
Binary files a/src/generic/Dev/Mod/CPT.odc and b/src/generic/Dev/Mod/CPT.odc differ