From ab480e7c03c9f3ab95856eaff6e6493882ff0c36 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sun, 16 Aug 2009 14:17:40 +0000 Subject: * interp/i-map.boot (addMap): Fix typo from last commit. * interp/compiler.boot (compElt): Fix thinko, one more time. * interp/nruncomp.boot (optDeltaEntry): Don't overquote VM forms for constants. * algebra/algext.spad.pamphlet: Call niladic functions with empty argument lists. * algebra/ddfact.spad.pamphlet: Likewise. * algebra/gpgcd.spad.pamphlet: Likewise. * algebra/modmon.spad.pamphlet: Likewise. * algebra/pf.spad.pamphlet: Likewise. * algebra/polycat.spad.pamphlet: Likewise. * algebra/twofact.spad.pamphlet: Likewise. * algebra/list.spad.pamphlet: "nil" is now a ocnstant. * algebra/string.spad.pamphlet: "space", "quote", "escape" are now constants. --- src/algebra/pf.spad.pamphlet | 2 -- 1 file changed, 2 deletions(-) (limited to 'src/algebra/pf.spad.pamphlet') diff --git a/src/algebra/pf.spad.pamphlet b/src/algebra/pf.spad.pamphlet index ee7dbd24..ba8f657b 100644 --- a/src/algebra/pf.spad.pamphlet +++ b/src/algebra/pf.spad.pamphlet @@ -132,7 +132,6 @@ InnerPrimeField(p:PositiveInteger): Exports == Implementation where primitiveElt:=lookup(createPrimitiveElement()) -- set initialization flag initelt? := false - void$Void initializeLog() == if initelt? then initializeElt() @@ -160,7 +159,6 @@ InnerPrimeField(p:PositiveInteger): Exports == Implementation where -- print("discrete logarithm table initialized"::OUT) -- set initialization flag initlog? := false - void$Void degree(x):PI == 1::PositiveInteger extensionDegree():PI == 1::PositiveInteger -- cgit v1.2.3