[Commit] nickle ChangeLog, 1.125, 1.126 math.5c, 1.41, 1.42 rational.c, 1.29, 1.30

[Keith Packard]

Committed by: keithp

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

Modified Files:
	ChangeLog math.5c rational.c 
Log Message:
2005-06-04  Keith Packard  <keithp at keithp.com>

	reviewed by: <delete if not using a buddy>

	* math.5c:
	Add π as an alias for pi
	
	* rational.c: (IntPowMod):
	Use signed_digit instead of long long


Index: ChangeLog
===================================================================
RCS file: /local/src/CVS/nickle/ChangeLog,v
retrieving revision 1.125
retrieving revision 1.126
diff -u -d -r1.125 -r1.126
--- ChangeLog	15 Mar 2005 19:47:12 -0000	1.125
+++ ChangeLog	5 Jun 2005 01:03:42 -0000	1.126
@@ -1,3 +1,13 @@
+2005-06-04  Keith Packard  <keithp at keithp.com>
+
+	reviewed by: <delete if not using a buddy>
+
+	* math.5c:
+	Add π as an alias for pi
+	
+	* rational.c: (IntPowMod):
+	Use signed_digit instead of long long
+
 2005-03-15  Keith Packard  <keithp at keithp.com>
 version 2.47
 

Index: math.5c
===================================================================
RCS file: /local/src/CVS/nickle/math.5c,v
retrieving revision 1.41
retrieving revision 1.42
diff -u -d -r1.41 -r1.42
--- math.5c	30 Nov 2004 18:28:21 -0000	1.41
+++ math.5c	5 Jun 2005 01:03:42 -0000	1.42
@@ -3,6 +3,8 @@
     (3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679,
     256);
     
+    public real π = pi;
+
     protected real e = imprecise 
     (2.7182818284590452353602874713526624977572470936999595749669676277240766303535475945713821785251664274,
      256);

Index: rational.c
===================================================================
RCS file: /local/src/CVS/nickle/rational.c,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- rational.c	27 Feb 2004 03:50:16 -0000	1.29
+++ rational.c	5 Jun 2005 01:03:42 -0000	1.30
@@ -417,8 +417,8 @@
 
     if (m >= 32767)
     {
-#if SIZEOF_LONG_LONG == 8
-	long long   la = a, lm = m, lr;
+#if DIGITBITS == 32
+	signed_digit   la = a, lm = m, lr;
 	lr = 1;
 	while (p)
 	{