mirror of
https://github.com/python/cpython.git
synced 2024-12-01 03:01:36 +01:00
fab8ab8067
'verbose' flag ala GvR updated test harness architecture. Old way: verbose = 0 if __name__ == '__main__': verbose = 1 New way: from test_support import verbose Some other small readablility and functionality updates.
35 lines
606 B
Python
Executable File
35 lines
606 B
Python
Executable File
#! /usr/bin/env python
|
|
"""Test dlmodule.c
|
|
Roger E. Masse revised strategy by Barry Warsaw
|
|
"""
|
|
|
|
import dl
|
|
from test_support import verbose
|
|
|
|
sharedlibs = [
|
|
# SunOS/Solaris
|
|
('/usr/lib/libresolv.so', 'gethostent'),
|
|
# SGI IRIX
|
|
('/usr/lib/libm.so', 'sin'),
|
|
]
|
|
|
|
for s, func in sharedlibs:
|
|
try:
|
|
if verbose:
|
|
print 'trying to open:', s,
|
|
l = dl.open(s)
|
|
except dl.error:
|
|
if verbose:
|
|
print 'failed'
|
|
pass
|
|
else:
|
|
if verbose:
|
|
print 'succeeded...',
|
|
l.call(func)
|
|
l.close()
|
|
if verbose:
|
|
print 'worked!'
|
|
break
|
|
else:
|
|
print 'Could not open any shared libraries'
|