From 68e2e8c03b04972293096a507a4923df76772e46 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 28 Nov 2011 19:19:44 +0000 Subject: * interp/c-util.boot (inlineDirectCall): Inline a non-side effect free argument in a unary pure function call if it is used exactly once. * algebra/integer.spad.pamphlet (Integer) [reducedSystem]: Fix typo. --- src/algebra/integer.spad.pamphlet | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/algebra/integer.spad.pamphlet') diff --git a/src/algebra/integer.spad.pamphlet b/src/algebra/integer.spad.pamphlet index 198b3afa..e7de9302 100644 --- a/src/algebra/integer.spad.pamphlet +++ b/src/algebra/integer.spad.pamphlet @@ -152,7 +152,7 @@ Integer: IntegerNumberSystem with reducedSystem(m:Matrix %, v:Vector %): Record(mat:Matrix(Integer), vec:Vector(Integer)) == - [m pretend Matrix(Integer), vec pretend Vector(Integer)] + [m pretend Matrix(Integer), v pretend Vector(Integer)] abs(x) == %iabs x random() == random()$Lisp -- cgit v1.2.3