aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/ILIST.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-04-18 17:57:00 +0000
committerdos-reis <gdr@axiomatics.org>2009-04-18 17:57:00 +0000
commitaf3ebc0d983434f91686d8e2ba7bcb21d5083a30 (patch)
treeb2432ba3cccf14d686ac8e0db3a11d12c5d5054e /src/algebra/strap/ILIST.lsp
parente865a85b43caa6f453304e836dae3b62ca73c635 (diff)
downloadopen-axiom-af3ebc0d983434f91686d8e2ba7bcb21d5083a30.tar.gz
* algebra/mkfunc.spad.pamphlet (InputForm): Remove assignment to Rep.
(convert): Use per and rep operators. * algebra/stap: Updated cached Lisp translation.
Diffstat (limited to 'src/algebra/strap/ILIST.lsp')
-rw-r--r--src/algebra/strap/ILIST.lsp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/ILIST.lsp b/src/algebra/strap/ILIST.lsp
index 2a1dfcbc..dd576d32 100644
--- a/src/algebra/strap/ILIST.lsp
+++ b/src/algebra/strap/ILIST.lsp
@@ -302,7 +302,7 @@
|ILIST;latex;$S;23|)
(LETT |x| (QCDR |x|) |ILIST;latex;$S;23|)
(EXIT (COND
- ((NULL (NULL |x|))
+ ((NOT (NULL |x|))
(LETT |s| (STRCONC |s| ", ")
|ILIST;latex;$S;23|)))))
NIL (GO G190) G191 (EXIT NIL))