X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/8e9db35f299d8f606ba003d3cd8fa9e2c868c880..7d169e32d0619ecf128abe042ec5ef6a2655e1a1:/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;