X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/1cb310e62eaf4422ee298d9d87c35f9dd6b4c71c..f53726febc36028ff9d524cda6e3ea7b90140c85:/csrc/pf_cglue.c

diff --git a/csrc/pf_cglue.c b/csrc/pf_cglue.c
index 2e6f52d..0ec1e70 100644
--- a/csrc/pf_cglue.c
+++ b/csrc/pf_cglue.c
@@ -85,7 +85,7 @@ Err CreateGlueToC( const char *CName, ucell_t Index, cell_t ReturnMode, int32_t
 	ucell_t Packed;
 	char FName[40];
 	
-	CStringToForth( FName, CName );
+	CStringToForth( FName, CName, sizeof(FName) );
 	Packed = (Index & 0xFFFF) | 0 | (NumParams << 24) |
 		(ReturnMode << 31);
 	DBUG(("Packed = 0x%8x\n", Packed));