aboutsummaryrefslogtreecommitdiff
path: root/hypsrc-test/run.hs
diff options
context:
space:
mode:
authorŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-07-01 01:22:09 +0200
committerŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-07-01 01:22:09 +0200
commita229331e45518bc7102acc6b19fc492c85321c4f (patch)
treeccf6091f2638500e210c55023addd36f6a0ca43f /hypsrc-test/run.hs
parentdb51ad0a5b2b29749f69fd82513adeedc8729735 (diff)
Fix bug with diffing wrong files in hyperlinker test runner.
Diffstat (limited to 'hypsrc-test/run.hs')
-rwxr-xr-xhypsrc-test/run.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/hypsrc-test/run.hs b/hypsrc-test/run.hs
index 10b6c257..853c4f09 100755
--- a/hypsrc-test/run.hs
+++ b/hypsrc-test/run.hs
@@ -83,8 +83,8 @@ diff mdl ref out = do
result <- system $ cmd ++ " " ++ refFile ++ " " ++ outFile
unless (result == ExitSuccess) $ die "Failed to run `diff` command."
where
- refFile = outDir </> takeFileName mdl </> ".ref.nolinks"
- outFile = outDir </> takeFileName mdl </> ".nolinks"
+ refFile = outDir </> takeBaseName mdl ++ ".ref.nolinks"
+ outFile = outDir </> takeBaseName mdl ++ ".nolinks"