X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/blobdiff_plain/0f4556f12c8f75078501c9d1338ae7648a97f975..95f51977ddc18faa2e212f30c00a39540b39f325:/usr/src/usr.lib/libmp/gcd.c diff --git a/usr/src/usr.lib/libmp/gcd.c b/usr/src/usr.lib/libmp/gcd.c index df3e0ef1e1..aa283dfe98 100644 --- a/usr/src/usr.lib/libmp/gcd.c +++ b/usr/src/usr.lib/libmp/gcd.c @@ -1,4 +1,6 @@ -/* @(#)gcd.c 4.1 12/25/82 */ +#ifndef lint +static char sccsid[] = "@(#)gcd.c 5.3 (Berkeley) 3/2/87"; +#endif not lint #include gcd(a,b,c) MINT *a,*b,*c; @@ -23,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; - Anew.val = xalloc(1); + Anew.val = xalloc(1, "invert"); *Anew.val = 1; move(b, &x); move(a, &y);