X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/22bab86c9df047bdd258283c6567821319ba7a6f..95ccefe3ce59a0773f915aca6948d5b6f1f7c882:/mpint.c diff --git a/mpint.c b/mpint.c index 8988ac9..7c1b8cc 100644 --- a/mpint.c +++ b/mpint.c @@ -1,13 +1,13 @@ /* -*-c-*- * - * $Id: mpint.c,v 1.3 2000/10/08 12:11:22 mdw Exp $ + * $Id: mpint.c,v 1.4 2004/04/08 01:36:15 mdw Exp $ * * Conversion between MPs and standard C integers * * (c) 1999 Straylight/Edgeware */ -/*----- Licensing notice --------------------------------------------------* +/*----- Licensing notice --------------------------------------------------* * * This file is part of Catacomb. * @@ -15,32 +15,18 @@ * it under the terms of the GNU Library General Public License as * published by the Free Software Foundation; either version 2 of the * License, or (at your option) any later version. - * + * * Catacomb is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Library General Public License for more details. - * + * * You should have received a copy of the GNU Library General Public * License along with Catacomb; if not, write to the Free * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, * MA 02111-1307, USA. */ -/*----- Revision history --------------------------------------------------* - * - * $Log: mpint.c,v $ - * Revision 1.3 2000/10/08 12:11:22 mdw - * Use @MP_EQ@ instead of @MP_CMP@. - * - * Revision 1.2 1999/12/10 23:22:53 mdw - * Support for uint32. - * - * Revision 1.1 1999/11/25 11:38:31 mdw - * Support for conversions between MPs and C integers. - * - */ - /*----- Header files ------------------------------------------------------*/ #include "mpint.h" @@ -142,7 +128,7 @@ static int touint(dstr *v) unsigned j = mp_touint(m); int ok = 1; - if (i != j) { + if ((unsigned)i != j) { fputs("\n*** touint failed.\n", stderr); fputs("m = ", stderr); mp_writefile(m, stderr, 10); fprintf(stderr, "\nexpect = %lu; result = %u\n", i, j);