X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/b9b786f596f8c55b91b94ff3b07420e4da36b183..c65df27983057ec76ed0e72bb370f9a5ae7dad28:/mptext-string.c

diff --git a/mptext-string.c b/mptext-string.c
index d5b7248..ac6e94a 100644
--- a/mptext-string.c
+++ b/mptext-string.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: mptext-string.c,v 1.2 1999/12/22 15:56:21 mdw Exp $
+ * $Id: mptext-string.c,v 1.5 2004/04/08 01:36:15 mdw Exp $
  *
  * Reading and writing large integers on strings
  *
@@ -27,17 +27,6 @@
  * MA 02111-1307, USA.
  */
 
-/*----- Revision history --------------------------------------------------* 
- *
- * $Log: mptext-string.c,v $
- * Revision 1.2  1999/12/22 15:56:21  mdw
- * Make the buffer passed to `put' op constant.
- *
- * Revision 1.1  1999/11/17 18:02:16  mdw
- * New multiprecision integer arithmetic suite.
- *
- */
-
 /*----- Header files ------------------------------------------------------*/
 
 #include <string.h>
@@ -53,7 +42,7 @@ static int get(void *p)
   mptext_stringctx *c = p;
   if (c->buf >= c->lim)
     return (EOF);
-  return (*c->buf++);
+  return ((unsigned char)*c->buf++);
 }
 
 static void unget(int ch, void *p)
@@ -85,7 +74,7 @@ const mptext_ops mptext_stringops = { get, unget, put };
 mp *mp_readstring(mp *m, const char *p, char **end, int radix)
 {
   mptext_stringctx c;
-  c.buf = (char *)p;
+  c.buf = (/*unconst */ char *)p;
   c.lim = c.buf + strlen(p);
   m = mp_read(m, radix, &mptext_stringops, &c);
   if (end)