X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/970d32b553a44051cedd2caf34267b7b1cdbab78..1cb310e62eaf4422ee298d9d87c35f9dd6b4c71c:/csrc/pf_cglue.h diff --git a/csrc/pf_cglue.h b/csrc/pf_cglue.h index 530c2f4..c3ddc87 100644 --- a/csrc/pf_cglue.h +++ b/csrc/pf_cglue.h @@ -19,21 +19,21 @@ ** ***************************************************************/ -typedef cell (*CFunc0)( void ); -typedef cell (*CFunc1)( cell P1 ); -typedef cell (*CFunc2)( cell P1, cell P2 ); -typedef cell (*CFunc3)( cell P1, cell P2, cell P3 ); -typedef cell (*CFunc4)( cell P1, cell P2, cell P3, cell P4 ); -typedef cell (*CFunc5)( cell P1, cell P2, cell P3, cell P4, cell P5 ); +typedef cell_t (*CFunc0)( void ); +typedef cell_t (*CFunc1)( cell_t P1 ); +typedef cell_t (*CFunc2)( cell_t P1, cell_t P2 ); +typedef cell_t (*CFunc3)( cell_t P1, cell_t P2, cell_t P3 ); +typedef cell_t (*CFunc4)( cell_t P1, cell_t P2, cell_t P3, cell_t P4 ); +typedef cell_t (*CFunc5)( cell_t P1, cell_t P2, cell_t P3, cell_t P4, cell_t P5 ); #ifdef __cplusplus extern "C" { #endif -Err CreateGlueToC( const char *CName, uint32 Index, int32 ReturnMode, int32 NumParams ); +Err CreateGlueToC( const char *CName, ucell_t Index, cell_t ReturnMode, int32_t NumParams ); Err CompileCustomFunctions( void ); Err LoadCustomFunctionTable( void ); -int32 CallUserFunction( int32 Index, int32 ReturnMode, int32 NumParams ); +cell_t CallUserFunction( cell_t Index, int32_t ReturnMode, int32_t NumParams ); #ifdef __cplusplus }