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>2003年10月19日 02:25:43 +0000
committerCamm Maguire <camm@debian.org>2003年10月19日 02:25:43 +0000
commitb69115ef693183f00c5edcd79c5c7ed25f48e563 (patch)
treec04cecf109358f3bd39991fbe2604a7c8fcbbd02
parent627e097e29ea57ed27364b54cdc0678c4846e82b (diff)
downloadgcl-b69115ef693183f00c5edcd79c5c7ed25f48e563.tar.gz
init_or_load1 -> gcl_init_or_load1 in xgcl-2/sysinit.lsp
Diffstat
-rw-r--r--gcl/debian/changelog 3
-rw-r--r--gcl/xgcl-2/sysinit.lsp 2
2 files changed, 3 insertions, 2 deletions
diff --git a/gcl/debian/changelog b/gcl/debian/changelog
index 724154dea..35a630c71 100644
--- a/gcl/debian/changelog
+++ b/gcl/debian/changelog
@@ -1,8 +1,9 @@
gcl (2.6.1-16) unstable; urgency=low
* Fix sh syntax in debian/gcl.sh
+ * init_or_load1 -> gcl_init_or_load1 in xgcl-2/sysinit.lsp
- -- Camm Maguire <camm@intech.m.enhanced.com> 2003年10月18日 22:22:31 -0400
+ -- Camm Maguire <camm@intech.m.enhanced.com> 2003年10月18日 22:24:34 -0400
gcl (2.6.1-15) unstable; urgency=low
diff --git a/gcl/xgcl-2/sysinit.lsp b/gcl/xgcl-2/sysinit.lsp
index 78ad62604..a65fc863a 100644
--- a/gcl/xgcl-2/sysinit.lsp
+++ b/gcl/xgcl-2/sysinit.lsp
@@ -31,7 +31,7 @@
;;define a function USER::USER-INIT, which will run the init code for a set
;;of files which are linked into an image.
-(clines "#define init_or_load(fn,file) do {extern void fn(void); init_or_load1(fn,file);} while(0)")
+(clines "#define init_or_load(fn,file) do {extern void fn(void); gcl_init_or_load1(fn,file);} while(0)")
(clines "static void")
(clines "load1(char *x) {")
(clines "printf(\"loading %s\\n\",x);")
generated by cgit v1.2.3 (git 2.25.1) at 2025年09月04日 16:02:26 +0000

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