diff options
| author | Sebastian Graf <sgraf1337@gmail.com> | 2020-01-21 05:10:59 -0500 |
|---|---|---|
| committer | Sebastian Graf <sebastian.graf@kit.edu> | 2020-01-24 15:46:00 +0100 |
| commit | 0752b4f03fae9847bfbf440d3d5dcc1705e3b4f6 (patch) | |
| tree | 786d48b67d3ab2a41096f0461fd97dd318477a57 | |
| parent | 3dae006fc424e768bb43fc73851a08fefcb732a5 (diff) | |
| download | haskell-wip/dmd-anal-dump.tar.gz | |
`-ddump-str-signatures` dumps Text, not STG [skip ci]wip/dmd-anal-dump
| -rw-r--r-- | compiler/stranal/DmdAnal.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/stranal/DmdAnal.hs b/compiler/stranal/DmdAnal.hs index 49ba969d9a..dbe1509b42 100644 --- a/compiler/stranal/DmdAnal.hs +++ b/compiler/stranal/DmdAnal.hs @@ -53,7 +53,7 @@ dmdAnalProgram dflags fam_envs binds = do { let { binds_plus_dmds = do_prog binds } ; dumpIfSet_dyn dflags Opt_D_dump_str_signatures - "Strictness signatures" FormatSTG + "Strictness signatures" FormatText (dumpStrSig binds_plus_dmds) ; -- See Note [Stamp out space leaks in demand analysis] seqBinds binds_plus_dmds `seq` return binds_plus_dmds |