aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/INS.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/INS.lsp')
-rw-r--r--src/algebra/strap/INS.lsp8
1 files changed, 1 insertions, 7 deletions
diff --git a/src/algebra/strap/INS.lsp b/src/algebra/strap/INS.lsp
index af5969d3..ef6261ca 100644
--- a/src/algebra/strap/INS.lsp
+++ b/src/algebra/strap/INS.lsp
@@ -63,7 +63,7 @@
(|Boolean|))
NIL)))
|IntegerNumberSystem|)
- (SETELT #0# 0 '(|IntegerNumberSystem|))))))
+ (|setShellEntry| #0# 0 '(|IntegerNumberSystem|))))))
(DEFUN |IntegerNumberSystem| ()
(LET ()
@@ -71,10 +71,4 @@
(|IntegerNumberSystem;AL|)
(T (SETQ |IntegerNumberSystem;AL| (|IntegerNumberSystem;|))))))
-(SETQ |$CategoryFrame|
- (|put| '|IntegerNumberSystem| '|isCategory| T
- (|addModemap| '|IntegerNumberSystem|
- '(|IntegerNumberSystem|) '((|Category|)) T
- '|IntegerNumberSystem| |$CategoryFrame|)))
-
(MAKEPROP '|IntegerNumberSystem| 'NILADIC T)