aboutsummaryrefslogtreecommitdiff
path: root/src/interp/setq.lisp.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2007-08-23 07:19:34 +0000
committerdos-reis <gdr@axiomatics.org>2007-08-23 07:19:34 +0000
commitcb7a1ad2b02e7d0dbcc096889439a935c3a8e418 (patch)
treea2fe45167cedb070a1f40a6c6f57714636af2b8d /src/interp/setq.lisp.pamphlet
parent7ccacce17d098df2531e2fd38b380fa086563a86 (diff)
downloadopen-axiom-cb7a1ad2b02e7d0dbcc096889439a935c3a8e418.tar.gz
* bootfuns.lisp.pamphlet (|$algebraList|): Remove unused variable.
(|$xyStack|): Likewise. (|$xyMin|): Likewise. (|$xyMax|): Likewise. (|$xyInitial|): Likewise. (|$xyCurrent|): Likewise. (|$xeditIsConsole|): Likewise. (|$xCount|): Likewise. (|$BasicDomains|): Likewise. (|$FontTable|): Likewise. (|$CommonDomains|): Likewise. (|$PolyDomains|): Likewise. (|$leftPren|): Likewise. (|$rightPren|): Likewise. (|$tempCategoryTable|): Likewise. (|$domainsWithUnderDomains|): Likewise. (|$hasCategoryTable|): Likewise. (|$hasYield|): Likewise. (|$LastCxArg|): Likewise. (|$NETail|): Likewise. (|$polyDefaultAssoc|): Likewise. (|$brightenCommentsFlag|): Likewise. (|$brightenCommentsIfTrue|): Likewise. (|$UserSynonyms|): Likewise. (|$report3|): Likewise. (|$croakIfTrue|): Likewise. * setq.lisp.pamphlet (|$xeditIsConsole|): Likewise. (|$BasicDomains|): Likewise. (|$FontTable|): Likewise. (|$leftPren|): Likewise. (|$rightPren|): Likewise. (|$NETail|): Likewise. (|$croakIfTrue|): Likewise.
Diffstat (limited to 'src/interp/setq.lisp.pamphlet')
-rw-r--r--src/interp/setq.lisp.pamphlet8
1 files changed, 0 insertions, 8 deletions
diff --git a/src/interp/setq.lisp.pamphlet b/src/interp/setq.lisp.pamphlet
index 4e396b5d..aa3ceda3 100644
--- a/src/interp/setq.lisp.pamphlet
+++ b/src/interp/setq.lisp.pamphlet
@@ -353,16 +353,10 @@
(SETQ |$highlightAllowed| 'T)
;" used in BRIGHTPRINT and is a )set variable"
-(SETQ |$leftPren| "(") ;;[for use in SAY expressions]
-(SETQ |$rightPren| ")")
-
-(|SETQ| |$BasicDomains| '(|Integer| |Float| |Symbol| |Boolean| |String|))
-
(SETQ |$PrintCompilerMessagesIfTrue| NIL)
(SETQ |$printStorageIfTrue| NIL) ;; storage info disabled in common lisp
(SETQ |$mostRecentOpAlist| NIL)
(SETQ |$noEnv| NIL)
-(SETQ |$croakIfTrue| NIL) ;" see moan in UT"
(SETQ |$opFilter| NIL) ;" used to |/s a function "
(SETQ |$evalDomain| NIL)
@@ -371,7 +365,6 @@
(SETQ |$OutputForm| '(|OutputForm|))
-(SETQ |$FontTable| '(|FontTable|))
(SETQ |$ComplexInteger| (LIST '|Complex| |$Integer|))
(SETQ |$QuotientField| '|Fraction|)
(SETQ |$FunctionalExpression| '|Expression|)
@@ -384,7 +377,6 @@
(SETQ $NE (LIST (LIST NIL)))
(SETQ |$InteractiveFrame| (LIST (LIST NIL)))
(SETQ |$gauss01| '(|gauss| 0 1))
-(SETQ |$NETail| (CONS |$EmptyEnvironment| NIL))
(SETQ |$form| NIL)
(SETQ |$Index| 0)
(SETQ |$false| NIL)