Commit 90827197 authored by simonmar's avatar simonmar
Browse files

[project @ 2004-10-18 11:51:22 by simonmar]

Put the '@' suffix on stdcall ForeignLabels on Windows only.
parent e9c5cb69
......@@ -569,12 +569,15 @@ maybe_underscore doc
| underscorePrefix = pp_cSEP <> doc
| otherwise = doc
#ifdef mingw32_TARGET_OS
-- In asm mode, we need to put the suffix on a stdcall ForeignLabel.
-- (The C compiler does this itself).
pprAsmCLbl (ForeignLabel fs (Just sz) _)
= ftext fs <> char '@' <> int sz
#else
pprAsmCLbl lbl
= pprCLbl lbl
#endif
pprCLbl (StringLitLabel u)
= pprUnique u <> ptext SLIT("_str")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment