merge in onyx changes

[unix-history] / usr / src / usr.bin / pascal / libpc / MULT.c

diff --git a/usr/src/usr.bin/pascal/libpc/MULT.c b/usr/src/usr.bin/pascal/libpc/MULT.c
index 952cf8c..1f3d95c 100644 (file)
--- a/usr/src/usr.bin/pascal/libpc/MULT.c
+++ b/usr/src/usr.bin/pascal/libpc/MULT.c
@@ -1,16 +1,17 @@
 /* Copyright (c) 1979 Regents of the University of California */
 
 /* Copyright (c) 1979 Regents of the University of California */
 

-static char sccsid[] = "@(#)MULT.c 1.1 %G%";
+static char sccsid[] = "@(#)MULT.c 1.2 %G%";

 
 long *
 
 long *

-MULT(result0, left, right, size)
+MULT(result0, left, right, siz)

 
        long            *result0;
        register long   *left;
        register long   *right;
 
        long            *result0;
        register long   *left;
        register long   *right;

-       register int    size;
+       long            siz;

 {
        register long   *result = result0;
 {
        register long   *result = result0;

+       register int    size = siz;

 
        do {
                *result++ = *left++ & *right++;
 
        do {
                *result++ = *left++ & *right++;