From 4e217e3e0b567e9d66ed74a8e9edb1f02d950046 Mon Sep 17 00:00:00 2001 From: Sebastian Graf <sebastian.graf@kit.edu> Date: Tue, 18 Jan 2022 18:42:11 +0100 Subject: [PATCH] Deprecate -ddump-stranal and -ddump-str-signatures ... and suggest -ddump-dmdanal and -ddump-dmd-signatures instead --- compiler/GHC/Driver/Session.hs | 10 ++++++++-- docs/users_guide/debugging.rst | 12 ++++++++++++ .../tests/simplCore/should_compile/T13543.stderr | 4 ++-- testsuite/tests/simplCore/should_compile/all.T | 2 +- testsuite/tests/stranal/should_compile/all.T | 6 +++--- .../tests/stranal/sigs/BottomFromInnerLambda.stderr | 4 ++-- testsuite/tests/stranal/sigs/DmdAnalGADTs.stderr | 4 ++-- testsuite/tests/stranal/sigs/FacState.stderr | 2 +- testsuite/tests/stranal/sigs/HyperStrUse.stderr | 4 ++-- testsuite/tests/stranal/sigs/NewtypeArity.stderr | 4 ++-- testsuite/tests/stranal/sigs/StrAnalExample.stderr | 4 ++-- testsuite/tests/stranal/sigs/T12370.stderr | 4 ++-- testsuite/tests/stranal/sigs/T13331.stderr | 4 ++-- testsuite/tests/stranal/sigs/T13380c.stderr | 4 ++-- testsuite/tests/stranal/sigs/T13380f.stderr | 4 ++-- testsuite/tests/stranal/sigs/T16197b.stderr | 4 ++-- testsuite/tests/stranal/sigs/T16859.stderr | 4 ++-- testsuite/tests/stranal/sigs/T17932.stderr | 4 ++-- testsuite/tests/stranal/sigs/T18086.stderr | 4 ++-- testsuite/tests/stranal/sigs/T18907.stderr | 4 ++-- testsuite/tests/stranal/sigs/T18957.stderr | 4 ++-- testsuite/tests/stranal/sigs/T19407.stderr | 4 ++-- testsuite/tests/stranal/sigs/T19871.stderr | 4 ++-- testsuite/tests/stranal/sigs/T20746.stderr | 4 ++-- testsuite/tests/stranal/sigs/T20746b.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21081.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21119.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21717.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21737.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21754.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21888.stderr | 4 ++-- testsuite/tests/stranal/sigs/T21888a.stderr | 4 ++-- testsuite/tests/stranal/sigs/T22241.stderr | 4 ++-- testsuite/tests/stranal/sigs/T5075.stderr | 4 ++-- testsuite/tests/stranal/sigs/T6070.stderr | 4 ++-- testsuite/tests/stranal/sigs/T8569.stderr | 4 ++-- testsuite/tests/stranal/sigs/T8598.stderr | 4 ++-- testsuite/tests/stranal/sigs/UnsatFun.stderr | 4 ++-- testsuite/tests/stranal/sigs/all.T | 2 +- 39 files changed, 92 insertions(+), 74 deletions(-) diff --git a/compiler/GHC/Driver/Session.hs b/compiler/GHC/Driver/Session.hs index 90028bf947d2..6f330707bb9d 100644 --- a/compiler/GHC/Driver/Session.hs +++ b/compiler/GHC/Driver/Session.hs @@ -1461,9 +1461,15 @@ dynamic_flags_deps = [ (setDumpFlag Opt_D_dump_call_arity) , make_ord_flag defGhcFlag "ddump-exitify" (setDumpFlag Opt_D_dump_exitify) - , make_ord_flag defGhcFlag "ddump-stranal" + , make_dep_flag defGhcFlag "ddump-stranal" (setDumpFlag Opt_D_dump_dmdanal) - , make_ord_flag defGhcFlag "ddump-str-signatures" + "Use `-ddump-dmdanal` instead" + , make_dep_flag defGhcFlag "ddump-str-signatures" + (setDumpFlag Opt_D_dump_dmd_signatures) + "Use `-ddump-dmd-signatures` instead" + , make_ord_flag defGhcFlag "ddump-dmdanal" + (setDumpFlag Opt_D_dump_dmdanal) + , make_ord_flag defGhcFlag "ddump-dmd-signatures" (setDumpFlag Opt_D_dump_dmd_signatures) , make_ord_flag defGhcFlag "ddump-cpranal" (setDumpFlag Opt_D_dump_cpranal) diff --git a/docs/users_guide/debugging.rst b/docs/users_guide/debugging.rst index 3e22bc90d5b2..2b7c43b3f7f4 100644 --- a/docs/users_guide/debugging.rst +++ b/docs/users_guide/debugging.rst @@ -409,6 +409,12 @@ subexpression elimination pass. to determine whether the inlining is beneficial. .. ghc-flag:: -ddump-stranal + :shortdesc: *(deprecated)* Alias for :ghc-flag:`-ddump-dmdanal` + :type: dynamic + + Has been renamed to :ghc-flag:`-ddump-dmdanal`. + +.. ghc-flag:: -ddump-dmdanal :shortdesc: Dump demand analysis output :type: dynamic @@ -418,6 +424,12 @@ subexpression elimination pass. annotations. .. ghc-flag:: -ddump-str-signatures + :shortdesc: *(deprecated)* Alias for :ghc-flag:`-ddump-dmd-signatures` + :type: dynamic + + Has been renamed to :ghc-flag:`-ddump-dmd-signatures`. + +.. ghc-flag:: -ddump-dmd-signatures :shortdesc: Dump top-level demand signatures :type: dynamic diff --git a/testsuite/tests/simplCore/should_compile/T13543.stderr b/testsuite/tests/simplCore/should_compile/T13543.stderr index 94c0b76bfcef..95f249048cc5 100644 --- a/testsuite/tests/simplCore/should_compile/T13543.stderr +++ b/testsuite/tests/simplCore/should_compile/T13543.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Foo.$trModule: Foo.f: <1!P(1L)><1!P(L)><1!P(L)> Foo.g: <1!P(1!P(L),1!P(L))> @@ -13,7 +13,7 @@ Foo.g: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Foo.$trModule: Foo.f: <1!P(1L)><1!P(L)><1!P(L)> Foo.g: <1!P(1!P(L),1!P(L))> diff --git a/testsuite/tests/simplCore/should_compile/all.T b/testsuite/tests/simplCore/should_compile/all.T index 01e49f3853ee..bd90feb59882 100644 --- a/testsuite/tests/simplCore/should_compile/all.T +++ b/testsuite/tests/simplCore/should_compile/all.T @@ -246,7 +246,7 @@ test('T13410', normal, compile, ['-O2']) test('T13468', normal, makefile_test, ['T13468']) -test('T13543', only_ways(['optasm']), compile, ['-ddump-str-signatures -ddump-cpr-signatures']) +test('T13543', only_ways(['optasm']), compile, ['-ddump-dmd-signatures -ddump-cpr-signatures']) test('T11272', normal, makefile_test, ['T11272']) test('T12600', normal, makefile_test, ['T12600']) test('T13157', normal, compile, ['-ddump-simpl -dno-typeable-binds -dsuppress-uniques -dsuppress-all -O']) diff --git a/testsuite/tests/stranal/should_compile/all.T b/testsuite/tests/stranal/should_compile/all.T index 4560e47d4e6d..b13bb1d87f43 100644 --- a/testsuite/tests/stranal/should_compile/all.T +++ b/testsuite/tests/stranal/should_compile/all.T @@ -65,9 +65,9 @@ test('T17819', [ grep_errmsg(r'(wfoo|wbar)') ], compile, ['-ddump-simpl']) # We care about the call demand on $wg test('T18903', [ grep_errmsg(r'Dmd=\S+C\S+') ], compile, ['-ddump-simpl -dsuppress-uniques']) # We care about the call demand on $wg1 and $wg2 -test('T18894', [ grep_errmsg(r'Dmd=\S+C\S+') ], compile, ['-ddump-stranal -dsuppress-uniques']) +test('T18894', [ grep_errmsg(r'Dmd=\S+C\S+') ], compile, ['-ddump-dmdanal -dsuppress-uniques']) # We care about the Arity 2 on eta, as a result of the annotated Dmd -test('T18894b', [ grep_errmsg(r'Arity=2') ], compile, ['-ddump-stranal -dsuppress-uniques -fno-call-arity -dppr-cols=200']) +test('T18894b', [ grep_errmsg(r'Arity=2') ], compile, ['-ddump-dmdanal -dsuppress-uniques -fno-call-arity -dppr-cols=200']) # We care about the workers of f,g,h,i: test('T18982', [ grep_errmsg(r'\$w. .*Int#$') ], compile, ['-dppr-cols=1000 -ddump-simpl -dsuppress-idinfo -dsuppress-uniques']) # We care about the type of $wyeah. The unlifted Gram constructor should unbox @@ -81,7 +81,7 @@ test('T19882b', normal, compile, ['']) # We want that the 'go' joinrec in the unfolding has been worker/wrappered. # So we simply grep for 'jump $wgo' and hope we find more than 2 call sites: test('T20510', [ grep_errmsg(r'jump \$wgo') ], compile, ['-dsuppress-uniques -ddump-exitify']) -test('T20817', [ grep_errmsg(r'Str') ], compile, ['-dsuppress-uniques -ddump-stranal']) +test('T20817', [ grep_errmsg(r'Str') ], compile, ['-dsuppress-uniques -ddump-dmdanal']) # T21150: Check that t{,1,2} haven't been inlined. test('T21150', [ grep_errmsg(r'( t\d? :: Int)') ], compile, ['-dsuppress-uniques -ddump-exitify']) diff --git a/testsuite/tests/stranal/sigs/BottomFromInnerLambda.stderr b/testsuite/tests/stranal/sigs/BottomFromInnerLambda.stderr index 953727a11992..0449aa96035a 100644 --- a/testsuite/tests/stranal/sigs/BottomFromInnerLambda.stderr +++ b/testsuite/tests/stranal/sigs/BottomFromInnerLambda.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== BottomFromInnerLambda.expensive: <1!P(SL)> BottomFromInnerLambda.f: <1!P(S)><1!P(S)>b @@ -11,7 +11,7 @@ BottomFromInnerLambda.f: b -==================== Strictness signatures ==================== +==================== Demand signatures ==================== BottomFromInnerLambda.expensive: <1!P(1L)> BottomFromInnerLambda.f: <1!P(1S)><1!P(S)>b diff --git a/testsuite/tests/stranal/sigs/DmdAnalGADTs.stderr b/testsuite/tests/stranal/sigs/DmdAnalGADTs.stderr index 2f7b6376f082..d002a4a6f5df 100644 --- a/testsuite/tests/stranal/sigs/DmdAnalGADTs.stderr +++ b/testsuite/tests/stranal/sigs/DmdAnalGADTs.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== DmdAnalGADTs.diverges: b DmdAnalGADTs.f: <1L> DmdAnalGADTs.f': <1L> @@ -19,7 +19,7 @@ DmdAnalGADTs.hasStrSig: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== DmdAnalGADTs.diverges: b DmdAnalGADTs.f: <1L> DmdAnalGADTs.f': <1L> diff --git a/testsuite/tests/stranal/sigs/FacState.stderr b/testsuite/tests/stranal/sigs/FacState.stderr index 133ad6ec26f2..6a705c0fef28 100644 --- a/testsuite/tests/stranal/sigs/FacState.stderr +++ b/testsuite/tests/stranal/sigs/FacState.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== FacState.fac: <S,1*U(U)><L,U>dm1(d,tm1(d)) diff --git a/testsuite/tests/stranal/sigs/HyperStrUse.stderr b/testsuite/tests/stranal/sigs/HyperStrUse.stderr index 23c437158e70..373c158ae8b3 100644 --- a/testsuite/tests/stranal/sigs/HyperStrUse.stderr +++ b/testsuite/tests/stranal/sigs/HyperStrUse.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== HyperStrUse.f: <1!P(1!P(L),A)><1L> @@ -9,7 +9,7 @@ HyperStrUse.f: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== HyperStrUse.f: <1!P(1!P(L),A)><1L> diff --git a/testsuite/tests/stranal/sigs/NewtypeArity.stderr b/testsuite/tests/stranal/sigs/NewtypeArity.stderr index 7190bedc355d..f16bbf129a5b 100644 --- a/testsuite/tests/stranal/sigs/NewtypeArity.stderr +++ b/testsuite/tests/stranal/sigs/NewtypeArity.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Test.t: <1!P(L)><1!P(L)> Test.t2: <1!P(L)><1!P(L)> @@ -11,7 +11,7 @@ Test.t2: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Test.t: <1!P(L)><1!P(L)> Test.t2: <1!P(L)><1!P(L)> diff --git a/testsuite/tests/stranal/sigs/StrAnalExample.stderr b/testsuite/tests/stranal/sigs/StrAnalExample.stderr index 08485e735a4f..9fab92d121e6 100644 --- a/testsuite/tests/stranal/sigs/StrAnalExample.stderr +++ b/testsuite/tests/stranal/sigs/StrAnalExample.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== StrAnalExample.foo: <1L> @@ -9,7 +9,7 @@ StrAnalExample.foo: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== StrAnalExample.foo: <1L> diff --git a/testsuite/tests/stranal/sigs/T12370.stderr b/testsuite/tests/stranal/sigs/T12370.stderr index 3070069a1ab8..c2400ac33a36 100644 --- a/testsuite/tests/stranal/sigs/T12370.stderr +++ b/testsuite/tests/stranal/sigs/T12370.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T12370.bar: <1!P(L)><1!P(L)> T12370.foo: <1!P(1!P(L),1!P(L))> @@ -11,7 +11,7 @@ T12370.foo: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T12370.bar: <1!P(L)><1!P(L)> T12370.foo: <1!P(1!P(L),1!P(L))> diff --git a/testsuite/tests/stranal/sigs/T13331.stderr b/testsuite/tests/stranal/sigs/T13331.stderr index feebb4eaa139..e7d7e8f2a94d 100644 --- a/testsuite/tests/stranal/sigs/T13331.stderr +++ b/testsuite/tests/stranal/sigs/T13331.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T13331.naiveInsertInt: <1L><L><1L> @@ -9,7 +9,7 @@ T13331.naiveInsertInt: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T13331.naiveInsertInt: <1L><L><1L> diff --git a/testsuite/tests/stranal/sigs/T13380c.stderr b/testsuite/tests/stranal/sigs/T13380c.stderr index 2001614a5888..828ae54545f7 100644 --- a/testsuite/tests/stranal/sigs/T13380c.stderr +++ b/testsuite/tests/stranal/sigs/T13380c.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Lib.$trModule: Lib.f: <S,1*U(U)><S,1*U(U)><L,U> @@ -11,7 +11,7 @@ Lib.f: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Lib.$trModule: Lib.f: <S,1*U(U)><S,1*U(U)><L,U> diff --git a/testsuite/tests/stranal/sigs/T13380f.stderr b/testsuite/tests/stranal/sigs/T13380f.stderr index 1da38aeeeeef..26ef9791f4de 100644 --- a/testsuite/tests/stranal/sigs/T13380f.stderr +++ b/testsuite/tests/stranal/sigs/T13380f.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T13380f.f: <1!P(L)><1!P(L)><L> T13380f.g: <1!P(L)><ML><L> T13380f.h: <1!P(L)><ML><L> @@ -19,7 +19,7 @@ T13380f.unsafeCall: 1(, 1) -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T13380f.f: <1!P(L)><1!P(L)><L> T13380f.g: <1!P(L)><ML><L> T13380f.h: <1!P(L)><ML><L> diff --git a/testsuite/tests/stranal/sigs/T16197b.stderr b/testsuite/tests/stranal/sigs/T16197b.stderr index 88988c266b24..1a932bec22b8 100644 --- a/testsuite/tests/stranal/sigs/T16197b.stderr +++ b/testsuite/tests/stranal/sigs/T16197b.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== f: <1!P(L)> @@ -9,7 +9,7 @@ f: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== f: <1!P(1L)> diff --git a/testsuite/tests/stranal/sigs/T16859.stderr b/testsuite/tests/stranal/sigs/T16859.stderr index 9f7c3c9e5da9..bb9b878043df 100644 --- a/testsuite/tests/stranal/sigs/T16859.stderr +++ b/testsuite/tests/stranal/sigs/T16859.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T16859.bar: <1!A><L> T16859.baz: <1L><1!P(L)><1C(1,L)> T16859.buz: <1!P(L,L)> @@ -25,7 +25,7 @@ T16859.n_uniq: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T16859.bar: <1!A><L> T16859.baz: <1L><1!P(L)><1C(1,L)> T16859.buz: <1!P(L,L)> diff --git a/testsuite/tests/stranal/sigs/T17932.stderr b/testsuite/tests/stranal/sigs/T17932.stderr index 52b365bcc212..feec04e0324c 100644 --- a/testsuite/tests/stranal/sigs/T17932.stderr +++ b/testsuite/tests/stranal/sigs/T17932.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T17932.flags: <1!P(1L,1L)> @@ -9,7 +9,7 @@ T17932.flags: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T17932.flags: <1!P(1L,1L)> diff --git a/testsuite/tests/stranal/sigs/T18086.stderr b/testsuite/tests/stranal/sigs/T18086.stderr index ce1471102594..9a3c55685f71 100644 --- a/testsuite/tests/stranal/sigs/T18086.stderr +++ b/testsuite/tests/stranal/sigs/T18086.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18086.m: <L>x T18086.panic: <L>x @@ -11,7 +11,7 @@ T18086.panic: b -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18086.m: <L>x T18086.panic: <L>x diff --git a/testsuite/tests/stranal/sigs/T18907.stderr b/testsuite/tests/stranal/sigs/T18907.stderr index 235872a8ebed..6e92f76bfcf3 100644 --- a/testsuite/tests/stranal/sigs/T18907.stderr +++ b/testsuite/tests/stranal/sigs/T18907.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18907.f: <1L> T18907.g: <1P(SL,L,L,L,L)> T18907.h: <1!A><1L> @@ -15,7 +15,7 @@ T18907.m: b -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18907.f: <1L> T18907.g: <1P(SL,L,L,L,L)> T18907.h: <1!A><1L> diff --git a/testsuite/tests/stranal/sigs/T18957.stderr b/testsuite/tests/stranal/sigs/T18957.stderr index 94044e754bce..4599a20fd51f 100644 --- a/testsuite/tests/stranal/sigs/T18957.stderr +++ b/testsuite/tests/stranal/sigs/T18957.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18957.g: <MC(1,L)><1L> T18957.h1: <SC(M,L)><1L> T18957.h2: <1C(M,L)><1L> @@ -17,7 +17,7 @@ T18957.seq': -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T18957.g: <MC(1,L)><1L> T18957.h1: <SC(M,L)><1L> T18957.h2: <1C(M,L)><1L> diff --git a/testsuite/tests/stranal/sigs/T19407.stderr b/testsuite/tests/stranal/sigs/T19407.stderr index a855d89810ce..19f23f8a4114 100644 --- a/testsuite/tests/stranal/sigs/T19407.stderr +++ b/testsuite/tests/stranal/sigs/T19407.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T19407.f: <SP(1P(1L,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A),ML)> T19407.g: <1!P(1L,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A)><MP(A,1L)> T19407.h: <1!P(1L,A)> @@ -15,7 +15,7 @@ T19407.n: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T19407.f: <1P(1P(1L,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A),ML)> T19407.g: <1!P(1L,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A,A)><MP(A,1L)> T19407.h: <1!P(1L,A)> diff --git a/testsuite/tests/stranal/sigs/T19871.stderr b/testsuite/tests/stranal/sigs/T19871.stderr index 41f557d08aab..91a8aab415a1 100644 --- a/testsuite/tests/stranal/sigs/T19871.stderr +++ b/testsuite/tests/stranal/sigs/T19871.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T19871.absent: <1P(1L,ML,A,A,A,A,A,A,A,A,A,A)> T19871.ann: <1P(SL,L,L,L,L,L,L,L,L,L,L,L)> T19871.f1: <1!P(1L,A,A,A,A,A,A,A,A,A,A,A)> @@ -41,7 +41,7 @@ T19871.update: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T19871.absent: <1P(1L,ML,A,A,A,A,A,A,A,A,A,A)> T19871.ann: <1P(SL,L,L,L,L,L,L,L,L,L,L,L)> T19871.f1: <1!P(1L,A,A,A,A,A,A,A,A,A,A,A)> diff --git a/testsuite/tests/stranal/sigs/T20746.stderr b/testsuite/tests/stranal/sigs/T20746.stderr index 109bff9198a8..ec021094079c 100644 --- a/testsuite/tests/stranal/sigs/T20746.stderr +++ b/testsuite/tests/stranal/sigs/T20746.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Foo.f: <LP(A,L,A)><L> Foo.foogle: <L><L> @@ -11,7 +11,7 @@ Foo.foogle: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Foo.f: <MP(A,1C(1,L),A)><L> Foo.foogle: <L><L> diff --git a/testsuite/tests/stranal/sigs/T20746b.stderr b/testsuite/tests/stranal/sigs/T20746b.stderr index 7e6fada4e58d..0500cf04414e 100644 --- a/testsuite/tests/stranal/sigs/T20746b.stderr +++ b/testsuite/tests/stranal/sigs/T20746b.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T20746b.f: <1L><L><L> T20746b.mightThrow: <L><L> @@ -11,7 +11,7 @@ T20746b.mightThrow: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T20746b.f: <1L><L><L> T20746b.mightThrow: <L><L> diff --git a/testsuite/tests/stranal/sigs/T21081.stderr b/testsuite/tests/stranal/sigs/T21081.stderr index e6d2f2c30988..3256e7e9d245 100644 --- a/testsuite/tests/stranal/sigs/T21081.stderr +++ b/testsuite/tests/stranal/sigs/T21081.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21081.blah: <LC(L,C(1,L))><1!P(1L)> T21081.blurg: <S!P(SL)> T21081.blurg2: <S!P(SL)> @@ -45,7 +45,7 @@ T21081.snd': -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21081.blah: <LC(L,C(1,L))><1!P(1L)> T21081.blurg: <1!P(SL)> T21081.blurg2: <1!P(SL)> diff --git a/testsuite/tests/stranal/sigs/T21119.stderr b/testsuite/tests/stranal/sigs/T21119.stderr index a0549af229b6..de855d29d94b 100644 --- a/testsuite/tests/stranal/sigs/T21119.stderr +++ b/testsuite/tests/stranal/sigs/T21119.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21119.$fMyShowInt: <1!A> T21119.$fMyShowTuple2: <1!A> T21119.get: <1!P(1!P(L),1!P(L))><1!P(L)><1L> @@ -19,7 +19,7 @@ T21119.throwIndexError: b -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21119.$fMyShowInt: <1!A> T21119.$fMyShowTuple2: <1!A> T21119.get: <1!P(1!P(L),1!P(L))><1!P(L)><1L> diff --git a/testsuite/tests/stranal/sigs/T21717.stderr b/testsuite/tests/stranal/sigs/T21717.stderr index b97119153194..372312b4f632 100644 --- a/testsuite/tests/stranal/sigs/T21717.stderr +++ b/testsuite/tests/stranal/sigs/T21717.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21717.g: <SC(S,P(ML,ML))> @@ -9,7 +9,7 @@ T21717.g: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21717.g: <SC(S,P(ML,ML))> diff --git a/testsuite/tests/stranal/sigs/T21737.stderr b/testsuite/tests/stranal/sigs/T21737.stderr index fe4d92b62856..8d4409840b98 100644 --- a/testsuite/tests/stranal/sigs/T21737.stderr +++ b/testsuite/tests/stranal/sigs/T21737.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21737.app: <1C(1,L)><L> T21737.boxed: <1!P(1!P(L),1!P(L))><1!P(1!P(L),1P(1L,1L,1L))> T21737.f: <1!P(L)><1!P(1!P(L),1!P(L))><1P(1P(1L,1L,1L,1L))> @@ -19,7 +19,7 @@ T21737.yes: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21737.app: <1C(1,L)><L> T21737.boxed: <1!P(1!P(L),1!P(L))><1!P(1!P(L),1P(1L,1L,1L))> T21737.f: <1!P(L)><1!P(1!P(L),1!P(L))><1P(1P(1L,1L,1L,1L))> diff --git a/testsuite/tests/stranal/sigs/T21754.stderr b/testsuite/tests/stranal/sigs/T21754.stderr index 0370380d8aad..7573688c8c4e 100644 --- a/testsuite/tests/stranal/sigs/T21754.stderr +++ b/testsuite/tests/stranal/sigs/T21754.stderr @@ -1,10 +1,10 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Test.f: <1L> -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Test.f: <1L> diff --git a/testsuite/tests/stranal/sigs/T21888.stderr b/testsuite/tests/stranal/sigs/T21888.stderr index ff046ca2cfc9..e98163c241c9 100644 --- a/testsuite/tests/stranal/sigs/T21888.stderr +++ b/testsuite/tests/stranal/sigs/T21888.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Data.MemoTrie.$fHasTrieBool: <1!P(L,L)> Data.MemoTrie.$fHasTrieEither: <1C(1,L)><1C(1,L)><1!P(L,L)> Data.MemoTrie.$fHasTrieInteger: <1!P(1!P(S,1!P(1!P(S,1L),1!P(S,1L))),1!P(S,1!P(1!P(S,1L),1!P(S,1L))))>b @@ -19,7 +19,7 @@ Data.MemoTrie.$fHasTrieUnit: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== Data.MemoTrie.$fHasTrieBool: <1!P(L,L)> Data.MemoTrie.$fHasTrieEither: <1C(1,L)><1C(1,L)><1!P(L,L)> Data.MemoTrie.$fHasTrieInteger: <1!P(1!P(B,1!P(1!P(B,1!P(L,L)),1!P(B,1!P(L,L)))),1!P(B,1!P(1!B,1!B)))>b diff --git a/testsuite/tests/stranal/sigs/T21888a.stderr b/testsuite/tests/stranal/sigs/T21888a.stderr index 21127cc2a53b..bf4b4777a3d1 100644 --- a/testsuite/tests/stranal/sigs/T21888a.stderr +++ b/testsuite/tests/stranal/sigs/T21888a.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21888a.f: <L> T21888a.g: <1L><S!P(L)> T21888a.wombat: <S!P(S)>b @@ -13,7 +13,7 @@ T21888a.wombat: b -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T21888a.f: <L> T21888a.g: <1L><1!P(L)> T21888a.wombat: <1!P(S)>b diff --git a/testsuite/tests/stranal/sigs/T22241.stderr b/testsuite/tests/stranal/sigs/T22241.stderr index 284fe2cf7661..8993d5b3b79b 100644 --- a/testsuite/tests/stranal/sigs/T22241.stderr +++ b/testsuite/tests/stranal/sigs/T22241.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T22241.f: <1L><S!P(L)> T22241.g: <L><1!P(L)><A> T22241.get: <1!P(A,1L)> @@ -15,7 +15,7 @@ T22241.unD: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T22241.f: <1L><1!P(SL)> T22241.g: <ML><1!P(L)><A> T22241.get: <1!P(A,1L)> diff --git a/testsuite/tests/stranal/sigs/T5075.stderr b/testsuite/tests/stranal/sigs/T5075.stderr index a3eea5d2cdec..e7bf4a57db57 100644 --- a/testsuite/tests/stranal/sigs/T5075.stderr +++ b/testsuite/tests/stranal/sigs/T5075.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T5075.f: <SP(A,A,SC(S,C(1,L)),A,A,A,A,A)><LP(A,A,LC(S,C(1,L)),A,A,A,L)><L> T5075.g: <1L><S!P(L)> T5075.h: <S!P(L)> @@ -13,7 +13,7 @@ T5075.h: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T5075.f: <SP(A,A,SC(S,C(1,L)),A,A,A,A,A)><LP(A,A,LC(S,C(1,L)),A,A,A,L)><L> T5075.g: <1L><S!P(L)> T5075.h: <1!P(L)> diff --git a/testsuite/tests/stranal/sigs/T6070.stderr b/testsuite/tests/stranal/sigs/T6070.stderr index 891cf6c8d699..b21caf43bc35 100644 --- a/testsuite/tests/stranal/sigs/T6070.stderr +++ b/testsuite/tests/stranal/sigs/T6070.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T6070.c: <1L> T6070.h: <1!P(L,L)><1!P(L)> @@ -11,7 +11,7 @@ T6070.h: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T6070.c: <1L> T6070.h: <1!P(L,L)><1!P(L)> diff --git a/testsuite/tests/stranal/sigs/T8569.stderr b/testsuite/tests/stranal/sigs/T8569.stderr index 0330cc6b617c..b7ea9415c486 100644 --- a/testsuite/tests/stranal/sigs/T8569.stderr +++ b/testsuite/tests/stranal/sigs/T8569.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T8569.addUp: <1L><L> @@ -9,7 +9,7 @@ T8569.addUp: -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T8569.addUp: <1L><L> diff --git a/testsuite/tests/stranal/sigs/T8598.stderr b/testsuite/tests/stranal/sigs/T8598.stderr index 00542be6685f..7556eb1df386 100644 --- a/testsuite/tests/stranal/sigs/T8598.stderr +++ b/testsuite/tests/stranal/sigs/T8598.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T8598.fun: <1!P(L)> @@ -9,7 +9,7 @@ T8598.fun: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== T8598.fun: <1!P(L)> diff --git a/testsuite/tests/stranal/sigs/UnsatFun.stderr b/testsuite/tests/stranal/sigs/UnsatFun.stderr index c6f131d8cb06..3e2347587c4b 100644 --- a/testsuite/tests/stranal/sigs/UnsatFun.stderr +++ b/testsuite/tests/stranal/sigs/UnsatFun.stderr @@ -1,5 +1,5 @@ -==================== Strictness signatures ==================== +==================== Demand signatures ==================== UnsatFun.f: <1!P(S)><B>b UnsatFun.g: <1!P(S)>b UnsatFun.g': <MS> @@ -21,7 +21,7 @@ UnsatFun.h3: 1 -==================== Strictness signatures ==================== +==================== Demand signatures ==================== UnsatFun.f: <1!P(S)><B>b UnsatFun.g: <1!P(S)>b UnsatFun.g': <MS> diff --git a/testsuite/tests/stranal/sigs/all.T b/testsuite/tests/stranal/sigs/all.T index bef6797b7d2e..d28bec500b11 100644 --- a/testsuite/tests/stranal/sigs/all.T +++ b/testsuite/tests/stranal/sigs/all.T @@ -1,7 +1,7 @@ # This directory contains tests where we annotate functions with expected # type signatures, and verify that these actually those found by the compiler -setTestOpts(extra_hc_opts('-ddump-str-signatures -ddump-cpr-signatures -dno-typeable-binds')) +setTestOpts(extra_hc_opts('-ddump-dmd-signatures -ddump-cpr-signatures -dno-typeable-binds')) # We are testing the result of an optimization, so no use # running them in various runtimes -- GitLab