From ca2df6248ed62629b688bb677009d79ae9b51fbc Mon Sep 17 00:00:00 2001 From: adelon <22380201+adelon@users.noreply.github.com> Date: Mon, 18 May 2026 02:07:26 +0200 Subject: Remove cache (no clear benefit) --- testsuite/pmcfg/run.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'testsuite') diff --git a/testsuite/pmcfg/run.hs b/testsuite/pmcfg/run.hs index 5ad5b5071..b40e21f6c 100644 --- a/testsuite/pmcfg/run.hs +++ b/testsuite/pmcfg/run.hs @@ -71,15 +71,12 @@ compareSchema :: TestSchema -> Either String () compareSchema schema = let pre = getFIdsPre schema optimized = getFIdsOptimized schema - (cached1,cached2) = getFIdsOptimizedCached schema - in if pre == optimized && pre == cached1 && pre == cached2 + in if pre == optimized then Right () else Left $ unlines [ "schema: " ++ show schema , "pre: " ++ show pre , "optimized: " ++ show optimized - , "cached #1: " ++ show cached1 - , "cached #2: " ++ show cached2 ] singletonTests :: [Test] -- cgit v1.2.3