Cheng Shao pushed to branch wip/remove-legacy-define-in-foreign-stub at Glasgow Haskell Compiler / GHC
Commits:
-
05e25647
by Cheng Shao at 2025-12-10T12:27:13+01:00
1 changed file:
Changes:
| ... | ... | @@ -329,15 +329,8 @@ outputForeignStubs logger tmpfs dflags unit_state mod location stubs |
| 329 | 329 | |
| 330 | 330 | stub_c_file_exists
|
| 331 | 331 | <- outputForeignStubs_help stub_c stub_c_output_w
|
| 332 | - ("#define IN_STG_CODE 0\n" ++
|
|
| 333 | - "#include <Rts.h>\n" ++
|
|
| 334 | - rts_includes ++
|
|
| 335 | - ffi_includes ++
|
|
| 336 | - cplusplus_hdr)
|
|
| 337 | - cplusplus_ftr
|
|
| 338 | - -- We're adding the default hc_header to the stub file, but this
|
|
| 339 | - -- isn't really HC code, so we need to define IN_STG_CODE==0 to
|
|
| 340 | - -- avoid the register variables etc. being enabled.
|
|
| 332 | + (rts_includes ++
|
|
| 333 | + ffi_includes) ""
|
|
| 341 | 334 | |
| 342 | 335 | return (stub_h_file_exists, if stub_c_file_exists
|
| 343 | 336 | then Just stub_c
|