Generalised exception handling.  New SafeHandles1Test.hs