summaryrefslogtreecommitdiff
path: root/os2/dl_os2.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-03-03 16:21:34 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-03-03 16:21:34 +0000
commit403d6f8e894056e673725f16d00d471c48c44dd2 (patch)
treedd61fe365d6609a453e2d29568b78c3bb7da7649 /os2/dl_os2.c
parenta4cf958aac2453eded53a4701d1bec205cf252eb (diff)
downloadperl-403d6f8e894056e673725f16d00d471c48c44dd2.tar.gz
OS/2 patches for dlclose() support (from Yitzchak Scott-Thoennes
<sthoenna@efn.org>) p4raw-id: //depot/perl@5488
Diffstat (limited to 'os2/dl_os2.c')
-rw-r--r--os2/dl_os2.c10
1 files changed, 10 insertions, 0 deletions
diff --git a/os2/dl_os2.c b/os2/dl_os2.c
index 4a9688cb59..aab48dd672 100644
--- a/os2/dl_os2.c
+++ b/os2/dl_os2.c
@@ -87,3 +87,13 @@ dlerror(void)
return buf;
}
+int
+dlclose(void *handle)
+{
+ ULONG rc;
+
+ if ((rc = DosFreeModule((HMODULE)handle)) == 0) return 0;
+
+ retcode = rc;
+ return 2;
+}