date and time created 88/10/07 16:35:45 by marc
[unix-history] / usr / src / lib / libmp / gcd.c
index 8da4970..160abaf 100644 (file)
@@ -1,11 +1,5 @@
-/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
- */
-
 #ifndef lint
 #ifndef lint
-static char sccsid[] = "@(#)gcd.c      5.1 (Berkeley) %G%";
+static char sccsid[] = "@(#)gcd.c      5.3 (Berkeley) %G%";
 #endif not lint
 
 #include <mp.h>
 #endif not lint
 
 #include <mp.h>
@@ -31,7 +25,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);