aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/PI.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/PI.lsp')
-rw-r--r--src/algebra/strap/PI.lsp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/PI.lsp b/src/algebra/strap/PI.lsp
index 29f7ada0..350ddbe3 100644
--- a/src/algebra/strap/PI.lsp
+++ b/src/algebra/strap/PI.lsp
@@ -6,7 +6,7 @@
(DEFUN |PositiveInteger| ()
(DECLARE (SPECIAL |$ConstructorCache|))
- (PROG (#0=#:G1401)
+ (PROG (#0=#:G1376)
(RETURN
(COND
((SETQ #0# (HGET |$ConstructorCache| '|PositiveInteger|))