@@ -65,7 +65,8 @@ test testName path = goldenVsFileDiff testName diff ref output
66 ref = path </> "expected"
66 ref = path </> "expected"
67 output = path </> "output"
67 output = path </> "output"
68+ diff ref new | os == "openbsd" = ["diff", "-u", new, ref]
68− diff ref new = ["diff", "--strip-trailing-cr", "-u", new, ref]
69+ | otherwise = ["diff", "--strip-trailing-cr", "-u", new, ref]
70-- Should always output a 3-charater string from a postive Int
71-- Should always output a 3-charater string from a postive Int
71indexToString :: Int -> String
72indexToString :: Int -> String