Fix compile error in test suite.

tests/Control/Timeout/Tests.hs:23:76:
    No instance for (Num (Positive NominalDiffTime))
      arising from the literal ‘1000’
    In the second argument of ‘(<)’, namely ‘1000’
    In the second argument of ‘suchThat’, namely ‘(< 1000)’
    In the second argument of ‘($)’, namely
      ‘suchThat arbitrary (< 1000)’
Merge pull request #3 from DaveCTurner/master

Fix compile error in test suite.