[Commit] nickle ChangeLog,1.56,1.57 natural.c,1.23,1.24

[Keith Packard]

Committed by: keithp

Update of /local/src/CVS/nickle
In directory home.keithp.com:/tmp/cvs-serv9636

Modified Files:
	ChangeLog natural.c 
Log Message:
2004-05-27  Keith Packard  <keithp at keithp.com>
version 2.37

	* natural.c: (NaturalCompliment):
	Bogus effort to truncate compliment answers resulted in
	broken IntegerLand operation


Index: ChangeLog
===================================================================
RCS file: /local/src/CVS/nickle/ChangeLog,v
retrieving revision 1.56
retrieving revision 1.57
diff -u -d -r1.56 -r1.57
--- a/ChangeLog	26 May 2004 08:59:23 -0000	1.56
+++ b/ChangeLog	27 May 2004 23:30:55 -0000	1.57
@@ -1,3 +1,10 @@
+2004-05-27  Keith Packard  <keithp at keithp.com>
+version 2.37
+
+	* natural.c: (NaturalCompliment):
+	Bogus effort to truncate compliment answers resulted in
+	broken IntegerLand operation
+
 2004-05-26  Keith Packard  <keithp at keithp.com>
 version 2.36
 

Index: natural.c
===================================================================
RCS file: /local/src/CVS/nickle/natural.c,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- a/natural.c	27 Feb 2004 03:50:16 -0000	1.23
+++ b/natural.c	27 May 2004 23:30:55 -0000	1.24
@@ -666,7 +666,7 @@
 
     resultlen = length (a);
     at = data(a) + (resultlen-1);
-    while (resultlen > 0 && ~*at == 0)
+    while (resultlen > len && ~*at == 0)
     {
 	resultlen--;
 	at--;