Added a test script for the fcntl C module.

diff --git a/Lib/test/test_fcntl.py b/Lib/test/test_fcntl.py
new file mode 100755 (executable)
index 0000000..7639134
--- /dev/null
+++ b/Lib/test/test_fcntl.py
@@ -0,0 +1,31 @@
+#! /usr/bin/env python
+"""Test program for the fcntl C module.
+   Roger E. Masse
+"""
+import struct
+import fcntl
+import FCNTL
+import os
+
+verbose = 0
+if __name__ == '__main__':
+    verbose = 1
+
+filename = '/tmp/delete-me'
+
+# the example from the library docs
+f = open(filename,'w')
+rv = fcntl.fcntl(f.fileno(), FCNTL.O_NDELAY, 1)
+if verbose:
+    print 'Status from fnctl with O_NDELAY: ', rv
+    
+lockdata = struct.pack('hhllhh', FCNTL.F_WRLCK, 0, 0, 0, 0, 0)
+if verbose:
+    print 'struct.pack: ', lockdata
+    
+rv = fcntl.fcntl(f.fileno(), FCNTL.F_SETLKW, lockdata)
+if verbose:
+    print 'String from fcntl with F_SETLKW: ', rv
+
+f.close()
+os.unlink(filename)

diff --git a/Lib/test/testall.py b/Lib/test/testall.py
index d1a70bd22e9ff08c36ee0b27fe8ad7bab3cee57c..fa7c5ea7506b5a75bef9b8d196b80046c60a04a3 100644 (file)
--- a/Lib/test/testall.py
+++ b/Lib/test/testall.py
@@ -26,6 +26,7 @@ tests = ['test_grammar',
         'test_dl',
         'test_thread',
         'test_xdr',
+        'test_fcntl',
         ]
 
 if __name__ == '__main__':