Commits (2)
......@@ -31,11 +31,11 @@ generateCCode opts box
>>= \(prh, prc)->Right
( flatten [toph, tdh, pah, prh, both]
, flatten $ if (opts.genPrinter || opts.genParser)
[[includes:topc], pac, prc]
[]
[[includes:topc], pac, prc, ["\n"]]
[["\n"]]
)
where
both = ["#endif"]
both = ["#endif /* ", toUpperCase (safe opts.basename), "_H */\n"]
toph =
[ "#ifndef ", toUpperCase (safe opts.basename), "_H\n"
, "#define ", toUpperCase (safe opts.basename), "_H\n"
......