diff options
| -rw-r--r-- | ghc/driver/mangler/ghc-asm.lprl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ghc/driver/mangler/ghc-asm.lprl b/ghc/driver/mangler/ghc-asm.lprl index 6e5da21d80..cd4d99aae6 100644 --- a/ghc/driver/mangler/ghc-asm.lprl +++ b/ghc/driver/mangler/ghc-asm.lprl @@ -417,6 +417,7 @@ sub mangle_asm { $i = 0; $chkcat[0] = 'misc'; $chk[0] = ''; while (<INASM>) { + tr/\r//d if $TargetPlatform =~ /-mingw32$/; next if $T_STABBY && /^\.stab.*${T_US}__stg_split_marker/o; next if $T_STABBY && /^\.stab.*ghc.*c_ID/; next if /^\t\.def.*endef$/; |