From e601c688c46d63c1f3cae5d5e8b9d4c1bfdcc26f Mon Sep 17 00:00:00 2001 From: Pierre Le Marre Date: Mon, 26 Sep 2022 08:26:31 +0200 Subject: [PATCH] Fix benchmark for old GHC --- benchmark/Benchmark.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/benchmark/Benchmark.hs b/benchmark/Benchmark.hs index 52d7cdd..4c7291f 100644 --- a/benchmark/Benchmark.hs +++ b/benchmark/Benchmark.hs @@ -97,8 +97,8 @@ makeBenchComp -> Benchmark #ifdef USE_TASTY_BENCH makeBenchComp implRef impl (dataName, setup) = env setup - ( bcompare ("$NF == \"" <> (makeTestName (fst impl) dataName) - <> "\" && $(NF-1) == \"" <> implRef <> "\"") + ( bcompare ("$NF == \"" ++ (makeTestName (fst impl) dataName) + ++ "\" && $(NF-1) == \"" ++ implRef ++ "\"") . makeBench impl dataName) #else makeBenchComp _ = makeBenchRef