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>2015年02月07日 09:57:38 -0500
committerCamm Maguire <camm@debian.org>2015年02月07日 09:57:38 -0500
commitf76d4cc47bced125116e5ce29eff2a49b017ea8b (patch)
tree67f99a7f5b83423f0ee450d9f3b2b5283232159b
parent7de6ab057e5a68255afbadfd371227646e946aff (diff)
downloadgcl-f76d4cc47bced125116e5ce29eff2a49b017ea8b.tar.gz
test_function, item_compared, and key_function in list.d are mark origins
Diffstat
-rwxr-xr-xgcl/o/list.d 4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcl/o/list.d b/gcl/o/list.d
index 26bbdd341..76de26253 100755
--- a/gcl/o/list.d
+++ b/gcl/o/list.d
@@ -1442,6 +1442,10 @@ void
gcl_init_list_function()
{
+ enter_mark_origin(&item_compared);
+ enter_mark_origin(&test_function);
+ enter_mark_origin(&key_function);
+
sKtest = make_keyword("TEST");
sKtest_not = make_keyword("TEST-NOT");
sKkey = make_keyword("KEY");
generated by cgit v1.2.3 (git 2.25.1) at 2025年09月07日 07:46:52 +0000

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