diff options
author | sof <unknown> | 2001-07-11 22:47:32 +0000 |
---|---|---|
committer | sof <unknown> | 2001-07-11 22:47:32 +0000 |
commit | fa22b47cf007744bd0bd43a234df919dadfe6adc (patch) | |
tree | 3d64312085b51fc405101b94be202ae1ec8a2212 /ghc | |
parent | 17629712b35948e3751a39747dcc9ee0cbfb72aa (diff) | |
download | haskell-fa22b47cf007744bd0bd43a234df919dadfe6adc.tar.gz |
[project @ 2001-07-11 22:47:32 by sof]
Append final newline to _stub.{c,h} output
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/compiler/main/CodeOutput.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/compiler/main/CodeOutput.lhs b/ghc/compiler/main/CodeOutput.lhs index df6337d08f..f100d57c9b 100644 --- a/ghc/compiler/main/CodeOutput.lhs +++ b/ghc/compiler/main/CodeOutput.lhs @@ -220,7 +220,7 @@ outputForeignStubs dflags c_code h_code -- turn out to be empty, in which case no file should be created. outputForeignStubs_help fname "" injects = return False outputForeignStubs_help fname doc_str injects - = do writeFile fname (injects ++ doc_str) + = do writeFile fname (injects ++ doc_str ++ "\n") return True \end{code} |