[don't include '()' in parameters to primitives.
John Meacham <john@repetae.net>**20090306044327
 Ignore-this: 98e851267a51d465e9763b04932cf706
] hunk ./E/FromHs.hs 464
-        let result    = foldr ($) (processPrimPrim dataTable $ EPrim prim (map EVar es) rt) (map ELam es)
+        let result    = foldr ($) (processPrimPrim dataTable $ EPrim prim [ EVar e | e <- es, not (tvrType e == tUnit)] rt) (map ELam es)