diff options
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/utils/unlit/unlit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/utils/unlit/unlit.c b/ghc/utils/unlit/unlit.c index a45435156c..475a41f998 100644 --- a/ghc/utils/unlit/unlit.c +++ b/ghc/utils/unlit/unlit.c @@ -348,8 +348,8 @@ char **argv; { } /* Prefix the output with line pragmas */ - if (add_line_prag_long) { - fprintf(ostream, "# 1 \"%s\"\n");{-# LINE 1 \"%s\" #-}\n", prefix_str, prefix_str); + if (prefix_str) { + fprintf(ostream, "#line 1 \"%s\"\n);{-# LINE 1 \"%s\" #-}\n", prefix_str, prefix_str); } unlit(file, istream, ostream); |