Resolving dependencies... Build profile: -w ghc-9.6.3 -O0 In order, the following will be built (use -v for more details): - inspection-testing-0.6 (first run) Configuring inspection-testing-0.6... Preprocessing library for inspection-testing-0.6.. Building library for inspection-testing-0.6.. [1 of 3] Compiling Test.Inspection ( src/Test/Inspection.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection.dyn_o ) [2 of 3] Compiling Test.Inspection.Core ( src/Test/Inspection/Core.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection/Core.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection/Core.dyn_o ) [3 of 3] Compiling Test.Inspection.Plugin ( src/Test/Inspection/Plugin.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection/Plugin.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/Test/Inspection/Plugin.dyn_o ) Preprocessing test suite 'HPCs' for inspection-testing-0.6.. Building test suite 'HPCs' for inspection-testing-0.6.. [1 of 1] Compiling HPCs ( examples/HPCs.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/HPCs/HPCs-tmp/HPCs.o ) [2 of 2] Linking /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/HPCs/HPCs Preprocessing test suite 'NS_NP' for inspection-testing-0.6.. Building test suite 'NS_NP' for inspection-testing-0.6.. [1 of 1] Compiling NS_NP ( examples/NS_NP.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.6.3/inspection-testing-0.6/noopt/build/NS_NP/NS_NP-tmp/NS_NP.o ) examples/NS_NP.hs:44:1: roundtrip === roundtrip_id failed: LHS: roundtrip [InlPrag=INLINE (sat-args=0)] :: Ordering -> Ordering [LclIdX, Unf=Unf{Src=StableUser, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=ALWAYS_IF(arity=0,unsat_ok=False,boring_ok=True) Tmpl= let { f [Occ=OnceL1!] :: NS (NP I) '[ '[], '[], '[]] -> Ordering [LclId, Unf=Unf{Src=, TopLvl=False, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 490 60}] f = hpc hpc hpc \ (x [Occ=Once1!] :: NS (NP I) '[ '[], '[], '[]]) -> hpc hpc case x of { Z @x @xs _ [Occ=Dead] ds_d3gU [Occ=Once1!] -> case ds_d3gU of { Nil _ [Occ=Dead] -> hpc LT; :* @ipv_s3oA @ipv_s3oB _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] -> hpc hpc error @LiftedRep @Ordering ($dIP_s3oc `cast` (Sym (N:IP[0] <"callStack">_N _N) :: CallStack ~~ (?callStack::CallStack))) (build @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#)) }; S @xs @x _ [Occ=Dead] ds_d3gV [Occ=Once1!] -> case ds_d3gV of { Z @x @xs _ [Occ=Dead] ds_d3gW [Occ=Once1!] -> case ds_d3gW of { Nil _ [Occ=Dead] -> hpc EQ; :* @ipv_s3oG @ipv_s3oH _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] -> hpc hpc error @LiftedRep @Ordering ($dIP_s3oc `cast` (Sym (N:IP[0] <"callStack">_N _N) :: CallStack ~~ (?callStack::CallStack))) (build @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#)) }; S @xs @x _ [Occ=Dead] ds_d3gX [Occ=Once1!] -> case ds_d3gX of { Z @x @xs _ [Occ=Dead] ds_d3gY [Occ=Once1!] -> case ds_d3gY of { Nil _ [Occ=Dead] -> hpc GT; :* @ipv_s3oM @ipv_s3oN _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] -> hpc hpc error @LiftedRep @Ordering ($dIP_s3oc `cast` (Sym (N:IP[0] <"callStack">_N _N) :: CallStack ~~ (?callStack::CallStack))) (build @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#)) }; S @ipv_s3oS @ipv_s3oT _ [Occ=Dead] _ [Occ=Dead] -> hpc hpc error @LiftedRep @Ordering ($dIP_s3oc `cast` (Sym (N:IP[0] <"callStack">_N _N) :: CallStack ~~ (?callStack::CallStack))) (build @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#)) } } } } in let { g [Occ=OnceL1!] :: Ordering -> NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=False, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 160 60}] g = hpc hpc hpc \ (x [Occ=Once1!] :: Ordering) -> hpc hpc case x of { LT -> hpc $WZ @[*] @(NP I) @'[] @'[ '[], '[]] ((hpc $WNil) @(*) @I); EQ -> hpc hpc $WS @[*] @(NP I) @'[ '[], '[]] @'[] ($WZ @[*] @(NP I) @'[] @'[ '[]] ((hpc $WNil) @(*) @I)); GT -> hpc hpc hpc $WS @[*] @(NP I) @'[ '[], '[]] @'[] ($WS @[*] @(NP I) @'[ '[]] @'[] ($WZ @[*] @(NP I) @'[] @'[] ((hpc $WNil) @(*) @I))) } } in hpc hpc \ (x [Occ=Once1] :: Ordering) -> f (g x)}] roundtrip = hpc hpc \ (x :: Ordering) -> f (g x) $trModule_s3mR :: Addr# [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 20 0}] $trModule_s3mR = "main"# $trModule_s3mT :: Addr# [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 30 0}] $trModule_s3mT = "NS_NP"# loc_s3o3 :: [Char] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=True, WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}] loc_s3o3 = unpackCString# $trModule_s3mR loc_s3o4 :: [Char] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=True, WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}] loc_s3o4 = unpackCString# $trModule_s3mT loc_s41n :: Addr# [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 60 0}] loc_s41n = "examples/NS_NP.hs"# loc_s3o5 :: [Char] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=True, WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}] loc_s3o5 = unpackCString# loc_s41n loc_s3o6 :: Int [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] loc_s3o6 = I# 31# loc_s3o7 :: Int [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] loc_s3o7 = I# 8# loc_s3o9 :: Int [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] loc_s3o9 = I# 13# $dIP_s41o :: Addr# [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 30 0}] $dIP_s41o = "error"# $dIP_s3oa :: [Char] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=True, WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}] $dIP_s3oa = unpackCString# $dIP_s41o $dIP_s3ob :: SrcLoc [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] $dIP_s3ob = SrcLoc loc_s3o3 loc_s3o4 loc_s3o5 loc_s3o6 loc_s3o7 loc_s3o6 loc_s3o9 $dIP_s3oc :: CallStack [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] $dIP_s3oc = PushCallStack $dIP_s3oa $dIP_s3ob EmptyCallStack lvl_s41s :: Addr# [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 40 0}] lvl_s41s = "unreachable"# lvl_s41t :: [Char] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=True, WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}] lvl_s41t = unpackCString# lvl_s41s lvl_s40M :: Ordering [LclId, Str=b, Cpr=b, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=NEVER}] lvl_s40M = hpc error @LiftedRep @Ordering ($dIP_s3oc `cast` (Sym (N:IP[0] <"callStack">_N _N) :: CallStack ~~ (?callStack::CallStack))) lvl_s41t f [Dmd=LC(S,L)] :: NS (NP I) '[ '[], '[], '[]] -> Ordering [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 130 60}] f = hpc hpc hpc \ (x [Dmd=1L] :: NS (NP I) '[ '[], '[], '[]]) -> hpc hpc case x of { Z @x @xs co_aHM [Dmd=B] ds_d3gU [Dmd=1S] -> case ds_d3gU of { Nil co_aHO [Dmd=B] -> hpc LT; :* @ipv_s3oA @ipv_s3oB ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] -> hpc lvl_s40M }; S @xs @x co_aHU [Dmd=B] ds_d3gV [Dmd=1S] -> case ds_d3gV of { Z @x @xs co_aHY [Dmd=B] ds_d3gW [Dmd=1S] -> case ds_d3gW of { Nil co_aI0 [Dmd=B] -> hpc EQ; :* @ipv_s3oG @ipv_s3oH ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] -> hpc lvl_s40M }; S @xs @x co_aIb [Dmd=B] ds_d3gX [Dmd=1S] -> case ds_d3gX of { Z @x @xs co_aIf [Dmd=B] ds_d3gY [Dmd=1S] -> case ds_d3gY of { Nil co_aIh [Dmd=B] -> hpc GT; :* @ipv_s3oM @ipv_s3oN ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] -> hpc lvl_s40M }; S @ipv_s3oS @ipv_s3oT ipv [Dmd=B] ipv [Dmd=B] -> hpc lvl_s40M } } } lvl_s40Z :: NP I '[] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}] lvl_s40Z = (hpc $WNil) @(*) @I lvl_s410 :: NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] lvl_s410 = Z @[*] @(NP I) @'[ '[], '[], '[]] @'[] @'[ '[], '[]] @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]]) lvl_s40Z lvl_s411 :: NP I '[] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}] lvl_s411 = (hpc $WNil) @(*) @I lvl_s412 :: NS (NP I) '[ '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] lvl_s412 = Z @[*] @(NP I) @'[ '[], '[]] @'[] @'[ '[]] @~(<'[ '[], '[]]>_N :: '[ '[], '[]] ~ '[ '[], '[]]) lvl_s411 lvl_s413 :: NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 10 10}] lvl_s413 = hpc S @[*] @(NP I) @'[ '[], '[], '[]] @'[ '[], '[]] @'[] @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]]) lvl_s412 lvl_s414 :: NP I '[] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}] lvl_s414 = (hpc $WNil) @(*) @I lvl_s415 :: NS (NP I) '[ '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] lvl_s415 = Z @[*] @(NP I) @'[ '[]] @'[] @'[] @~(<'[ '[]]>_N :: '[ '[]] ~ '[ '[]]) lvl_s414 lvl_s416 :: NS (NP I) '[ '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 10 10}] lvl_s416 = hpc S @[*] @(NP I) @'[ '[], '[]] @'[ '[]] @'[] @~(<'[ '[], '[]]>_N :: '[ '[], '[]] ~ '[ '[], '[]]) lvl_s415 lvl_s41A :: NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}] lvl_s41A = S @[*] @(NP I) @'[ '[], '[], '[]] @'[ '[], '[]] @'[] @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]]) lvl_s416 lvl_s417 :: NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 10 0}] lvl_s417 = hpc case lvl_s416 of { __DEFAULT -> lvl_s41A } g [Dmd=LC(S,L)] :: Ordering -> NS (NP I) '[ '[], '[], '[]] [LclId, Unf=Unf{Src=, TopLvl=True, Value=False, ConLike=False, WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 40 60}] g = hpc hpc hpc \ (x [Dmd=1L] :: Ordering) -> hpc hpc case x of { LT -> hpc lvl_s410; EQ -> hpc lvl_s413; GT -> hpc lvl_s417 } RHS: roundtrip_id :: Ordering -> Ordering [LclIdX, Arity=1, Str=<1L>, Unf=Unf{Src=, TopLvl=True, Value=True, ConLike=True, WorkFree=True, Expandable=True, Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=True)}] roundtrip_id = \ (x [Dmd=1L] :: Ordering) -> hpc hpc x examples/NS_NP.hs: error: inspection testing unsuccessful unexpected failures: 1 : error: ExitFailure 1