X-Git-Url: https://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/46fcda16ac30c5555e21d11ea8e2089c657bf1d6..e14f25331be47e565ff6ae8cd7fb372fd329aff1:/csrc/pf_text.c

diff --git a/csrc/pf_text.c b/csrc/pf_text.c
index e48e457..03430a7 100644
--- a/csrc/pf_text.c
+++ b/csrc/pf_text.c
@@ -222,7 +222,7 @@ DBUGX(("ffCompareText: return 0x%x\n", Result ));
 ** Compare two strings, case sensitive.
 ** Return zero if they match, -1 if s1<s2, +1 is s1>s2;
 */
-cell_t ffCompare( const char *s1, cell_t len1, const char *s2, int32_t len2 )
+cell_t ffCompare( const char *s1, cell_t len1, const char *s2, cell_t len2 )
 {
     cell_t i, result, n, diff;