BSD 4_4 release
[unix-history] / usr / src / lib / libmp / gcd.c
index cedad0a..f7b0a54 100644 (file)
@@ -1,3 +1,13 @@
+/*-
+ * This module is believed to contain source code proprietary to AT&T.
+ * Use and redistribution is subject to the Berkeley Software License
+ * Agreement and your Software Agreement with AT&T (Western Electric).
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)gcd.c      8.1 (Berkeley) 6/4/93";
+#endif /* not lint */
+
 #include <mp.h>
 gcd(a,b,c) MINT *a,*b,*c;
 {      MINT x,y,z,w;
 #include <mp.h>
 gcd(a,b,c) MINT *a,*b,*c;
 {      MINT x,y,z,w;
@@ -21,7 +31,7 @@ invert(a, b, c) MINT *a, *b, *c;
        int i = 0;
        x.len = y.len = z.len = w.len = Aold.len = 0;
        Anew.len = 1;
        int i = 0;
        x.len = y.len = z.len = w.len = Aold.len = 0;
        Anew.len = 1;
-       Anew.val = xalloc(1);
+       Anew.val = xalloc(1, "invert");
        *Anew.val = 1;
        move(b, &x);
        move(a, &y);
        *Anew.val = 1;
        move(b, &x);
        move(a, &y);