From: simonmar <unknown>
Date: Thu, 31 Mar 2005 09:17:37 +0000 (+0000)
Subject: [project @ 2005-03-31 09:17:37 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~840
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=ca739e852566d7e0bfd594e6d7bf08da04f78d3c;p=ghc-hetmet.git

[project @ 2005-03-31 09:17:37 by simonmar]
foreign import syntax
---

diff --git a/ghc/compiler/basicTypes/UniqSupply.lhs b/ghc/compiler/basicTypes/UniqSupply.lhs
index 6992751..41ad5c0 100644
--- a/ghc/compiler/basicTypes/UniqSupply.lhs
+++ b/ghc/compiler/basicTypes/UniqSupply.lhs
@@ -84,7 +84,7 @@ mkSplitUniqSupply (C# c#)
     in
     mk_supply#
 
-foreign import ccall "genSymZh" unsafe genSymZh :: IO Word
+foreign import ccall unsafe "genSymZh" genSymZh :: IO Word
 
 splitUniqSupply (MkSplitUniqSupply _ s1 s2) = (s1, s2)
 \end{code}