Commit 27f395a7 authored by simonm's avatar simonm
Browse files

[project @ 1999-03-17 11:02:35 by simonm]

Print (ICanSafelyBeINLINEd InsideLam _) as "__Ul".
parent fc7b70af
......@@ -181,6 +181,7 @@ instance Outputable InlinePragInfo where
ppr IMustNotBeINLINEd = ptext SLIT("__Unot")
ppr IAmALoopBreaker = ptext SLIT("__Ux")
ppr IAmDead = ptext SLIT("__Ud")
ppr (ICanSafelyBeINLINEd InsideLam _) = ptext SLIT("__Ul")
ppr (ICanSafelyBeINLINEd _ _) = ptext SLIT("__Us")
ppr IAmASpecPragmaId = ptext SLIT("__US")
......
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