X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/8e9db35f299d8f606ba003d3cd8fa9e2c868c880..f75485364a6ebbc1a166a6687503c003bfa97313:/csrc/pfcompil.c

diff --git a/csrc/pfcompil.c b/csrc/pfcompil.c
index 9397fa3..2f0c04e 100644
--- a/csrc/pfcompil.c
+++ b/csrc/pfcompil.c
@@ -661,7 +661,7 @@ void ffDefer( void )
 }
 
 /* Unsmudge the word to make it visible. */
-void ffUnSmudge( void )
+static void ffUnSmudge( void )
 {
     *(char*)gVarContext &= ~FLAG_SMUDGE;
 }
@@ -737,7 +737,7 @@ void ffFPLiteral( PF_FLOAT fnum )
 #endif /* PF_SUPPORT_FP */
 
 /**************************************************************/
-ThrowCode FindAndCompile( const char *theWord )
+static ThrowCode FindAndCompile( const char *theWord )
 {
     cell_t Flag;
     ExecToken XT;
@@ -831,7 +831,7 @@ ThrowCode ffInterpret( void )
     {
 
         pfDebugMessage("ffInterpret: calling ffWord(()\n");
-        theWord = ffWord( BLANK );
+        theWord = ffLWord( BLANK );
         DBUG(("ffInterpret: theWord = 0x%x, Len = %d\n", theWord, *theWord ));
 
         if( *theWord > 0 )