From: Taylor R Campbell <campbell@mumble.net>
Date: Mon, 3 Nov 2014 20:43:34 +0000 (+0000)
Subject: Call dload_finalize_file, not dld_finalize_file.  Oops.
X-Git-Tag: mit-scheme-pucked-9.2.12~376^2~131
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=9d065249686ce80eed6554821384956678a0f717;p=mit-scheme.git

Call dload_finalize_file, not dld_finalize_file.  Oops.
---

diff --git a/src/microcode/pruxdld.c b/src/microcode/pruxdld.c
index 377755e61..ca92f1522 100644
--- a/src/microcode/pruxdld.c
+++ b/src/microcode/pruxdld.c
@@ -149,7 +149,7 @@ dld_load (const char * path)
 static void
 dld_finalize (void * handle)
 {
-  void * address = (dlsym (handle, "dld_finalize_file"));
+  void * address = (dlsym (handle, "dload_finalize_file"));
   if (address != 0)
     {
       void (*finalize) (void) = address;