Build #1 for inspection-testing-0.5.0.1

[all reports]

Package inspection-testing-0.5.0.1
Install InstallOk
Docs Ok
Tests NotTried
Time submitted 2023-01-15 20:13:11.902665899 UTC
Compiler ghc-9.2.4
OS linux
Arch x86_64
Dependencies base-4.16.3.0, containers-0.6.5.1, ghc-9.2.4, mtl-2.2.2, template-haskell-2.18.0.0, transformers-0.5.6.2
Flags -more-tests -old-text-tests

Code Coverage

No Code Coverage was submitted for this report.

Build log

[view raw]

Resolving dependencies...
Downloading  inspection-testing-0.5.0.1
Downloaded   inspection-testing-0.5.0.1
Starting     inspection-testing-0.5.0.1
Building     inspection-testing-0.5.0.1
Completed    inspection-testing-0.5.0.1

Test log

[view raw]

Resolving dependencies...
Build profile: -w ghc-9.2.4 -O0
In order, the following will be built (use -v for more details):
 - inspection-testing-0.5.0.1 (first run)
Configuring inspection-testing-0.5.0.1...
Preprocessing library for inspection-testing-0.5.0.1..
Building library for inspection-testing-0.5.0.1..
[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.2.4/inspection-testing-0.5.0.1/noopt/build/Test/Inspection.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/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.2.4/inspection-testing-0.5.0.1/noopt/build/Test/Inspection/Core.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/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.2.4/inspection-testing-0.5.0.1/noopt/build/Test/Inspection/Plugin.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/noopt/build/Test/Inspection/Plugin.dyn_o )
Preprocessing test suite 'HPCs' for inspection-testing-0.5.0.1..
Building test suite 'HPCs' for inspection-testing-0.5.0.1..
[1 of 1] Compiling HPCs             ( examples/HPCs.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/noopt/build/HPCs/HPCs-tmp/HPCs.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/noopt/build/HPCs/HPCs-tmp/HPCs.dyn_o )
Linking /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/noopt/build/HPCs/HPCs ...
Preprocessing test suite 'NS_NP' for inspection-testing-0.5.0.1..
Building test suite 'NS_NP' for inspection-testing-0.5.0.1..
[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.2.4/inspection-testing-0.5.0.1/noopt/build/NS_NP/NS_NP-tmp/NS_NP.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/inspection-testing-0.5.0.1/noopt/build/NS_NP/NS_NP-tmp/NS_NP.dyn_o )
examples/NS_NP.hs:43:1: roundtrip === roundtrip_id failed:
LHS:
    roundtrip [InlPrag=INLINE (sat-args=0)] :: Ordering -> Ordering
    [LclIdX,
     Unf=Unf{Src=InlineStable, 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=<vanilla>, TopLvl=False, Value=False, ConLike=False,
                              WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 490 60}]
                     f = hpc<NS_NP,27>
                         hpc<NS_NP,13>
                         hpc<NS_NP,12>
                         \ (x [Occ=Once1!] :: NS (NP I) '[ '[], '[], '[]]) ->
                           hpc<NS_NP,11>
                           hpc<NS_NP,5>
                           case x of {
                             Z @x @xs co_aEU ds_d3gA [Occ=Once1!] ->
                               case ds_d3gA of {
                                 Nil co_aEV -> hpc<NS_NP,6> LT;
                                 :* @ipv_s3nr @ipv_s3ns ipv _ [Occ=Dead] _ [Occ=Dead] ->
                                   hpc<NS_NP,10>
                                   hpc<NS_NP,9>
                                   error
                                     @LiftedRep
                                     @Ordering
                                     ($dIP_s3n3
                                      `cast` (Sym (N:IP[0] <"callStack">_N <CallStack>_N)
                                              :: Coercible CallStack (?callStack::CallStack)))
                                     (build @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#))
                               };
                             S @xs @x co_aF0 ds_d3gB [Occ=Once1!] ->
                               case ds_d3gB of {
                                 Z @x @xs co_aF3 ds_d3gC [Occ=Once1!] ->
                                   case ds_d3gC of {
                                     Nil co_aF4 -> hpc<NS_NP,7> EQ;
                                     :* @ipv_s3nx @ipv_s3ny ipv _ [Occ=Dead] _ [Occ=Dead] ->
                                       hpc<NS_NP,10>
                                       hpc<NS_NP,9>
                                       error
                                         @LiftedRep
                                         @Ordering
                                         ($dIP_s3n3
                                          `cast` (Sym (N:IP[0] <"callStack">_N <CallStack>_N)
                                                  :: Coercible CallStack (?callStack::CallStack)))
                                         (build
                                            @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#))
                                   };
                                 S @xs @x co_aFd ds_d3gD [Occ=Once1!] ->
                                   case ds_d3gD of {
                                     Z @x @xs co_aFg ds_d3gE [Occ=Once1!] ->
                                       case ds_d3gE of {
                                         Nil co_aFh -> hpc<NS_NP,8> GT;
                                         :* @ipv_s3nD @ipv_s3nE ipv _ [Occ=Dead] _ [Occ=Dead] ->
                                           hpc<NS_NP,10>
                                           hpc<NS_NP,9>
                                           error
                                             @LiftedRep
                                             @Ordering
                                             ($dIP_s3n3
                                              `cast` (Sym (N:IP[0] <"callStack">_N <CallStack>_N)
                                                      :: Coercible
                                                           CallStack (?callStack::CallStack)))
                                             (build
                                                @Char
                                                (\ (@b) -> unpackFoldrCString# @b "unreachable"#))
                                       };
                                     S @ipv_s3nJ @ipv_s3nK ipv _ [Occ=Dead] ->
                                       hpc<NS_NP,10>
                                       hpc<NS_NP,9>
                                       error
                                         @LiftedRep
                                         @Ordering
                                         ($dIP_s3n3
                                          `cast` (Sym (N:IP[0] <"callStack">_N <CallStack>_N)
                                                  :: Coercible CallStack (?callStack::CallStack)))
                                         (build
                                            @Char (\ (@b) -> unpackFoldrCString# @b "unreachable"#))
                                   }
                               }
                           } } in
                   let {
                     g [Occ=OnceL1!] :: Ordering -> NS (NP I) '[ '[], '[], '[]]
                     [LclId,
                      Unf=Unf{Src=<vanilla>, TopLvl=False, Value=False, ConLike=False,
                              WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 160 60}]
                     g = hpc<NS_NP,28>
                         hpc<NS_NP,26>
                         hpc<NS_NP,25>
                         \ (x [Occ=Once1!] :: Ordering) ->
                           hpc<NS_NP,24>
                           hpc<NS_NP,14>
                           case x of {
                             LT ->
                               hpc<NS_NP,16>
                               $WZ
                                 @[*] @(NP I) @'[] @'[ '[], '[]] ((hpc<NS_NP,15> $WNil) @(*) @I);
                             EQ ->
                               hpc<NS_NP,19>
                               hpc<NS_NP,18>
                               $WS
                                 @[*]
                                 @(NP I)
                                 @'[ '[], '[]]
                                 @'[]
                                 ($WZ @[*] @(NP I) @'[] @'[ '[]] ((hpc<NS_NP,17> $WNil) @(*) @I));
                             GT ->
                               hpc<NS_NP,23>
                               hpc<NS_NP,22>
                               hpc<NS_NP,21>
                               $WS
                                 @[*]
                                 @(NP I)
                                 @'[ '[], '[]]
                                 @'[]
                                 ($WS
                                    @[*]
                                    @(NP I)
                                    @'[ '[]]
                                    @'[]
                                    ($WZ @[*] @(NP I) @'[] @'[] ((hpc<NS_NP,20> $WNil) @(*) @I)))
                           } } in
                   hpc<NS_NP,30>
                   hpc<NS_NP,29> \ (x [Occ=Once1] :: Ordering) -> f (g x)}]
    roundtrip
      = hpc<NS_NP,30> hpc<NS_NP,29> \ (x :: Ordering) -> f (g x)
    
    $trModule_s3lE :: Addr#
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 20 0}]
    $trModule_s3lE = "main"#
    
    $trModule_s3lG :: Addr#
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 30 0}]
    $trModule_s3lG = "NS_NP"#
    
    loc_s3mU :: [Char]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=True,
             WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}]
    loc_s3mU = unpackCString# $trModule_s3lE
    
    loc_s3mV :: [Char]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=True,
             WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}]
    loc_s3mV = unpackCString# $trModule_s3lG
    
    loc_s3YL :: Addr#
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 60 0}]
    loc_s3YL = "examples/NS_NP.hs"#
    
    loc_s3mW :: [Char]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=True,
             WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}]
    loc_s3mW = unpackCString# loc_s3YL
    
    loc_s3mX :: Int
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    loc_s3mX = I# 30#
    
    loc_s3mY :: Int
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    loc_s3mY = I# 8#
    
    loc_s3n0 :: Int
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    loc_s3n0 = I# 13#
    
    $dIP_s3YM :: Addr#
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 30 0}]
    $dIP_s3YM = "error"#
    
    $dIP_s3n1 :: [Char]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=True,
             WorkFree=False, Expandable=True, Guidance=IF_ARGS [] 20 0}]
    $dIP_s3n1 = unpackCString# $dIP_s3YM
    
    $dIP_s3n2 :: SrcLoc
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    $dIP_s3n2
      = SrcLoc
          loc_s3mU loc_s3mV loc_s3mW loc_s3mX loc_s3mY loc_s3mX loc_s3n0
    
    $dIP_s3n3 :: CallStack
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    $dIP_s3n3 = PushCallStack $dIP_s3n1 $dIP_s3n2 EmptyCallStack
    
    lvl_s3YQ :: Addr#
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 40 0}]
    lvl_s3YQ = "unreachable"#
    
    lvl_s3Yq :: Ordering
    [LclId,
     Str=b,
     Cpr=b,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=NEVER}]
    lvl_s3Yq
      = hpc<NS_NP,9>
        error
          @LiftedRep
          @Ordering
          ($dIP_s3n3
           `cast` (Sym (N:IP[0] <"callStack">_N <CallStack>_N)
                   :: Coercible CallStack (?callStack::CallStack)))
          (unpackCString# lvl_s3YQ)
    
    f :: NS (NP I) '[ '[], '[], '[]] -> Ordering
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 130 60}]
    f = hpc<NS_NP,27>
        hpc<NS_NP,13>
        hpc<NS_NP,12>
        \ (x [Dmd=1L] :: NS (NP I) '[ '[], '[], '[]]) ->
          hpc<NS_NP,11>
          hpc<NS_NP,5>
          case x of {
            Z @x @xs co_aEU [Dmd=A] ds_d3gA [Dmd=1L] ->
              case ds_d3gA of {
                Nil co_aEV [Dmd=A] -> hpc<NS_NP,6> LT;
                :* @ipv_s3nr @ipv_s3ns ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] ->
                  hpc<NS_NP,10> lvl_s3Yq
              };
            S @xs @x co_aF0 [Dmd=A] ds_d3gB [Dmd=1L] ->
              case ds_d3gB of {
                Z @x @xs co_aF3 [Dmd=A] ds_d3gC [Dmd=1L] ->
                  case ds_d3gC of {
                    Nil co_aF4 [Dmd=A] -> hpc<NS_NP,7> EQ;
                    :* @ipv_s3nx @ipv_s3ny ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] ->
                      hpc<NS_NP,10> lvl_s3Yq
                  };
                S @xs @x co_aFd [Dmd=A] ds_d3gD [Dmd=1L] ->
                  case ds_d3gD of {
                    Z @x @xs co_aFg [Dmd=A] ds_d3gE [Dmd=1L] ->
                      case ds_d3gE of {
                        Nil co_aFh [Dmd=A] -> hpc<NS_NP,8> GT;
                        :* @ipv_s3nD @ipv_s3nE ipv [Dmd=B] ipv [Dmd=B] ipv [Dmd=B] ->
                          hpc<NS_NP,10> lvl_s3Yq
                      };
                    S @ipv_s3nJ @ipv_s3nK ipv [Dmd=B] ipv [Dmd=B] ->
                      hpc<NS_NP,10> lvl_s3Yq
                  }
              }
          }
    
    lvl_s3YA :: NP I '[]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}]
    lvl_s3YA = (hpc<NS_NP,15> $WNil) @(*) @I
    
    lvl_s3YB :: NS (NP I) '[ '[], '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YB
      = Z @[*]
          @(NP I)
          @'[ '[], '[], '[]]
          @'[]
          @'[ '[], '[]]
          @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]])
          lvl_s3YA
    
    lvl_s3YC :: NP I '[]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}]
    lvl_s3YC = (hpc<NS_NP,17> $WNil) @(*) @I
    
    lvl_s3YN :: NS (NP I) '[ '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YN
      = Z @[*]
          @(NP I)
          @'[ '[], '[]]
          @'[]
          @'[ '[]]
          @~(<'[ '[], '[]]>_N :: '[ '[], '[]] ~ '[ '[], '[]])
          lvl_s3YC
    
    lvl_s3YD :: NS (NP I) '[ '[], '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YD
      = hpc<NS_NP,18>
        S @[*]
          @(NP I)
          @'[ '[], '[], '[]]
          @'[ '[], '[]]
          @'[]
          @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]])
          lvl_s3YN
    
    lvl_s3YE :: NP I '[]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 0 0}]
    lvl_s3YE = (hpc<NS_NP,20> $WNil) @(*) @I
    
    lvl_s3YO :: NS (NP I) '[ '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YO
      = Z @[*]
          @(NP I)
          @'[ '[]]
          @'[]
          @'[]
          @~(<'[ '[]]>_N :: '[ '[]] ~ '[ '[]])
          lvl_s3YE
    
    lvl_s3YP :: NS (NP I) '[ '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YP
      = S @[*]
          @(NP I)
          @'[ '[], '[]]
          @'[ '[]]
          @'[]
          @~(<'[ '[], '[]]>_N :: '[ '[], '[]] ~ '[ '[], '[]])
          lvl_s3YO
    
    lvl_s3YF :: NS (NP I) '[ '[], '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 10 10}]
    lvl_s3YF
      = hpc<NS_NP,22>
        hpc<NS_NP,21>
        S @[*]
          @(NP I)
          @'[ '[], '[], '[]]
          @'[ '[], '[]]
          @'[]
          @~(<'[ '[], '[], '[]]>_N :: '[ '[], '[], '[]] ~ '[ '[], '[], '[]])
          lvl_s3YP
    
    g :: Ordering -> NS (NP I) '[ '[], '[], '[]]
    [LclId,
     Unf=Unf{Src=<vanilla>, TopLvl=True, Value=False, ConLike=False,
             WorkFree=False, Expandable=False, Guidance=IF_ARGS [] 40 60}]
    g = hpc<NS_NP,28>
        hpc<NS_NP,26>
        hpc<NS_NP,25>
        \ (x [Dmd=1L] :: Ordering) ->
          hpc<NS_NP,24>
          hpc<NS_NP,14>
          case x of {
            LT -> hpc<NS_NP,16> lvl_s3YB;
            EQ -> hpc<NS_NP,19> lvl_s3YD;
            GT -> hpc<NS_NP,23> lvl_s3YF
          }
    
RHS:
    roundtrip_id :: Ordering -> Ordering
    [LclIdX,
     Arity=1,
     Str=<1L>,
     Unf=Unf{Src=InlineStable, TopLvl=True, Value=True, ConLike=True,
             WorkFree=True, Expandable=True,
             Guidance=ALWAYS_IF(arity=1,unsat_ok=True,boring_ok=True)
             Tmpl= \ (x [Occ=Once1] :: Ordering) ->
                     hpc<NS_NP,4> hpc<NS_NP,3> x}]
    roundtrip_id
      = \ (x [Dmd=1L] :: Ordering) -> hpc<NS_NP,4> hpc<NS_NP,3> x
    

examples/NS_NP.hs: error:
    inspection testing unsuccessful
         unexpected failures: 1