From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Mon, 29 Jul 2019 19:55:59 +0000 (+0300)
Subject: replace SYSTEM.ADDRESS with SYSTEM.INTADR
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=40872c64fb10eeb0864a6819923504a02a225c19;p=cpc.git

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 40300f1..d14bf4f 100644
--- 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 9297a39..907635b 100644
--- 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 1ca2f72..4e26722 100644
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 9c128c6..0fbf6c0 100644
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 9b80075..e97b833 100644
Binary files a/src/generic/Dev/Mod/CPT.odc and b/src/generic/Dev/Mod/CPT.odc differ