void CreateDicEntryC( ExecToken XT, const char *CName, ucell_t Flags )\r
{\r
ForthString FName[40];\r
- CStringToForth( FName, CName );\r
+ CStringToForth( FName, CName, sizeof(FName) );\r
CreateDicEntry( XT, FName, Flags );\r
}\r
\r
cell_t ffFindC( const char *WordName, ExecToken *pXT )\r
{\r
DBUG(("ffFindC: %s\n", WordName ));\r
- CStringToForth( gScratch, WordName );\r
+ CStringToForth( gScratch, WordName, sizeof(gScratch) );\r
return ffFind( gScratch, pXT );\r
}\r
\r
static void CreateDeferredC( ExecToken DefaultXT, const char *CName )\r
{\r
char FName[40];\r
- CStringToForth( FName, CName );\r
+ CStringToForth( FName, CName, sizeof(FName) );\r
ffStringDefer( FName, DefaultXT );\r
}\r
#endif\r