merge in onyx changes
[unix-history] / usr / src / usr.bin / pascal / libpc / RELEQ.c
index 7d77e41..4703f27 100644 (file)
@@ -1,15 +1,18 @@
 /* Copyright (c) 1979 Regents of the University of California */
 
 /* Copyright (c) 1979 Regents of the University of California */
 
-static char sccsid[] = "@(#)RELEQ.c 1.1 %G%";
+static char sccsid[] = "@(#)RELEQ.c 1.2 %G%";
 
 #include "h00vars.h"
 
 
 #include "h00vars.h"
 
-RELEQ(size, str1, str2)
+bool
+RELEQ(siz, str1, str2)
 
 
-       register int    size;
+       long            siz;
        register char   *str1;
        register char   *str2;
 {
        register char   *str1;
        register char   *str2;
 {
+       register int size = siz;
+
        while (*str1++ == *str2++ && --size)
                /* void */;
        if (size == 0)
        while (*str1++ == *str2++ && --size)
                /* void */;
        if (size == 0)