V25 with 64-bit support

[pforth] / csrc / pfcustom.c

diff --git a/csrc/pfcustom.c b/csrc/pfcustom.c
index 7aa8ff4..ca42f61 100644 (file)
--- a/csrc/pfcustom.c
+++ b/csrc/pfcustom.c
@@ -28,20 +28,20 @@
 \r
 #include "pf_all.h"\r
 \r
 \r
 #include "pf_all.h"\r
 \r

-static int32 CTest0( int32 Val );\r
-static void CTest1( int32 Val1, cell Val2 );\r
+static cell_t CTest0( cell_t Val );\r
+static void CTest1( cell_t Val1, cell_t Val2 );\r

 \r
 /****************************************************************\r
 ** Step 1: Put your own special glue routines here\r
 **     or link them in from another file or library.\r
 ****************************************************************/\r
 \r
 /****************************************************************\r
 ** Step 1: Put your own special glue routines here\r
 **     or link them in from another file or library.\r
 ****************************************************************/\r

-static int32 CTest0( int32 Val )\r
+static cell_t CTest0( cell_t Val )\r

 {\r
        MSG_NUM_D("CTest0: Val = ", Val);\r
        return Val+1;\r
 }\r
 \r
 {\r
        MSG_NUM_D("CTest0: Val = ", Val);\r
        return Val+1;\r
 }\r
 \r

-static void CTest1( int32 Val1, cell Val2 )\r
+static void CTest1( cell_t Val1, cell_t Val2 )\r

 {\r
 \r
        MSG("CTest1: Val1 = "); ffDot(Val1);\r
 {\r
 \r
        MSG("CTest1: Val1 = "); ffDot(Val1);\r