X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fcmm%2FPprC.hs;h=8a2da2343ba9cc6ac7ffe3adf66e22100a39732b;hp=e46e0e7f89f72cf0cc9f268e148a9f3002f57315;hb=37323ea050c72aab86f01de04374844c8f66c3a2;hpb=f79247cd8d0ab1509e4c10a5383bc5c6d8395803

diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs
index e46e0e7..8a2da23 100644
--- a/compiler/cmm/PprC.hs
+++ b/compiler/cmm/PprC.hs
@@ -16,6 +16,8 @@
 --
 -- Print Cmm as real C, for -fvia-C
 --
+-- See wiki:Commentary/Compiler/Backends/PprC
+--
 -- This is simpler than the old PprAbsC, because Cmm is "macro-expanded"
 -- relative to the old AbstractC, and many oddities/decorations have
 -- disappeared from the data type.
@@ -206,6 +208,7 @@ pprStmt stmt = case stmt of
 	where
         ppr_fn = parens (cCast (pprCFunType (char '*') cconv results args) fn)
 
+        -- See wiki:Commentary/Compiler/Backends/PprC#Prototypes
     	maybe_proto = 
             case fn of
 	      CmmLit (CmmLabel lbl) | not (isMathFun lbl) ->