run traditional error-set in ansi - gcl.git - GNU Common Lisp

index : gcl.git
GNU Common Lisp
summary refs log tree commit diff
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2014年09月19日 10:59:09 -0400
committerCamm Maguire <camm@debian.org>2014年09月19日 10:59:09 -0400
commit5454f0b302782fb78f0418a84d669080a4a2f031 (patch)
tree85793738699ddb59a6619df3237955fc29c73062
parent7009f13b061c0ed3119626ed8cdec972e68804cb (diff)
downloadgcl-5454f0b302782fb78f0418a84d669080a4a2f031.tar.gz
run traditional error-set in ansi
Diffstat
-rwxr-xr-xgcl/clcs/gcl_clcs_install.lisp 2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcl/clcs/gcl_clcs_install.lisp b/gcl/clcs/gcl_clcs_install.lisp
index c405b8b87..b93e377b3 100755
--- a/gcl/clcs/gcl_clcs_install.lisp
+++ b/gcl/clcs/gcl_clcs_install.lisp
@@ -32,7 +32,7 @@
#+kcl (si::break-level si::clcs-break-level)
#+kcl (si::terminal-interrupt si::clcs-terminal-interrupt)
#+kcl (si::break-quit si::clcs-break-quit)
- #+kcl (si::error-set clcs-error-set)
+; #+kcl (si::error-set clcs-error-set)
#+kcl (si::universal-error-handler clcs-universal-error-handler))))
(defun install-clcs-symbols ()
generated by cgit v1.2.3 (git 2.39.1) at 2025年09月04日 14:56:39 +0000

AltStyle によって変換されたページ (->オリジナル) /