found a few places I can use newtype

for presumably some speedups

1 files changed, 1 insertions, 1 deletions

diff --git a/Touch.hsc b/Touch.hsc
index fd3500f86..4f26855d2 100644
--- a/Touch.hsc
+++ b/Touch.hsc
@@ -16,7 +16,7 @@ module Touch (
 import Foreign
 import Foreign.C
 
-data TimeSpec = TimeSpec CTime
+newtype TimeSpec = TimeSpec CTime
 
 {- Changes the access and modification times of an existing file.
    Can follow symlinks, or not. Throws IO error on failure. -}