X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/73c0fd67eeb7fe0d6cc573afba798a88c4e86d82..529bb4e23b94186596ca0e3f5d295b0be95d4fad:/csrc/pf_core.c

diff --git a/csrc/pf_core.c b/csrc/pf_core.c
index 1736aa9..a6d7c26 100644
--- a/csrc/pf_core.c
+++ b/csrc/pf_core.c
@@ -170,9 +170,9 @@ nomem:
 ** Dictionary Management
 ***************************************************************/
 
-cell_t pfExecIfDefined( const char *CString )
+ThrowCode pfExecIfDefined( const char *CString )
 {
-    int result = 0;
+    ThrowCode result = 0;
     if( NAME_BASE != (cell_t)NULL)
     {
         ExecToken  XT;
@@ -427,11 +427,11 @@ void pfMessage( const char *CString )
 /**************************************************************************
 ** Main entry point for pForth.
 */
-cell_t pfDoForth( const char *DicFileName, const char *SourceName, cell_t IfInit )
+ThrowCode pfDoForth( const char *DicFileName, const char *SourceName, cell_t IfInit )
 {
     pfTaskData_t *cftd;
     pfDictionary_t *dic = NULL;
-    cell_t Result = 0;
+    ThrowCode Result = 0;
     ExecToken  EntryPoint = 0;
 
 #ifdef PF_USER_INIT