Improved the error message for getting the C type to leave the mobile wrapper on

2009-03-21 23:41:54 +00:00 · 2009-03-21 23:41:54 +00:00 · 90634ff1d6
commit 90634ff1d6
parent f5fa5e5caf
1 changed files with 1 additions and 1 deletions
--- a/backends/GenerateC.hs
+++ b/backends/GenerateC.hs
@ -870,7 +870,7 @@ cgetCType m origT am
         (_, Just pl, False, A.ValAbbrev) -> return $ Const $ Plain pl

         -- Must have missed one:
-         _ -> diePC m $ formatCode "Cannot work out the C type for: %" t
+         _ -> diePC m $ formatCode "Cannot work out the C type for: %" origT
  where
    const = if am == A.ValAbbrev then Const else id