add hg and python

1 files changed, 34 insertions, 0 deletions

diff --git a/sys/lib/python/test/test_dl.py b/sys/lib/python/test/test_dl.py
new file mode 100755
index 000000000..b70a4cfee
--- /dev/null
+++ b/sys/lib/python/test/test_dl.py
@@ -0,0 +1,34 @@
+#! /usr/bin/env python
+"""Test dlmodule.c
+   Roger E. Masse  revised strategy by Barry Warsaw
+"""
+
+import dl
+from test.test_support import verbose,TestSkipped
+
+sharedlibs = [
+    ('/usr/lib/libc.so', 'getpid'),
+    ('/lib/libc.so.6', 'getpid'),
+    ('/usr/bin/cygwin1.dll', 'getpid'),
+    ('/usr/lib/libc.dylib', 'getpid'),
+    ]
+
+for s, func in sharedlibs:
+    try:
+        if verbose:
+            print 'trying to open:', s,
+        l = dl.open(s)
+    except dl.error, err:
+        if verbose:
+            print 'failed', repr(str(err))
+        pass
+    else:
+        if verbose:
+            print 'succeeded...',
+        l.call(func)
+        l.close()
+        if verbose:
+            print 'worked!'
+        break
+else:
+    raise TestSkipped, 'Could not open any shared libraries'