X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fparser%2FParserCore.y;h=0289cfcc0d8a63591511e633f56e773a1daec022;hp=f43e225041d90634c354853976434e291a7dae86;hb=c75d5fc876279575226ec22a27ce056851128ade;hpb=b06d623b2e367a572de5daf06d6a0b12c2740471

diff --git a/compiler/parser/ParserCore.y b/compiler/parser/ParserCore.y
index f43e225..0289cfc 100644
--- a/compiler/parser/ParserCore.y
+++ b/compiler/parser/ParserCore.y
@@ -277,7 +277,7 @@ exp	:: { IfaceExpr }
 --	       "InlineMe"   -> IfaceNote IfaceInlineMe $3
 --            }
         | '%external' STRING aty   { IfaceFCall (ForeignCall.CCall 
-                                                    (CCallSpec (StaticTarget (mkFastString $2)) 
+                                                    (CCallSpec (StaticTarget (mkFastString $2) Nothing) 
                                                                CCallConv (PlaySafe False))) 
                                                  $3 }