From ecdc15d98d79648f2ffa6dbe1e51fe6186b688fe Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 25 Oct 2001 05:18:06 +0000
Subject: Integrate change #12636 from maintperl; more dl fixups.

p4raw-link: @12636 on //depot/maint-5.6/perl: a9c18911d1898cd817acac82893d0885251fc35e

p4raw-id: //depot/perl@12638
p4raw-integrated: from //depot/maint-5.6/perl@12637 'copy in'
	ext/DynaLoader/dl_next.xs ext/DynaLoader/dl_vms.xs (@12626..)
	'merge in' ext/DynaLoader/dl_mac.xs (@12626..)
---
 ext/DynaLoader/dl_mac.xs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'ext/DynaLoader/dl_mac.xs')

diff --git a/ext/DynaLoader/dl_mac.xs b/ext/DynaLoader/dl_mac.xs
index 37422877aa..dd1ddfa997 100644
--- a/ext/DynaLoader/dl_mac.xs
+++ b/ext/DynaLoader/dl_mac.xs
@@ -36,6 +36,7 @@ typedef struct {
 
 static void terminate(void)
 {
+    dTHX;
     dMY_CXT;
     int size = GetHandleSize((Handle) dl_connections) / sizeof(ConnectionID);
     HLock((Handle) dl_connections);
-- 
cgit v1.2.1