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
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)