[print unboxed tuples properly. cleanups
John Meacham <john@repetae.net>**20051002232851] hunk ./E/Pretty.hs 129
+    prettylit pbind (LitCons s es _) | Just n <- fromUnboxedNameTuple s, n == length es = atom $ encloseSep (text "(# ") (text " #)") (text ", ") (map (unparse . pbind) es)
hunk ./E/Pretty.hs 156
-        e | e == eStar -> symbol UC.star
-        e | e == eBox -> symbol UC.box
-        e | e == eHash -> symbol (text "#")
+        ESort EStar -> symbol UC.star
+        ESort EBox -> symbol UC.box
+        ESort EHash -> symbol (text "#")
hunk ./test.sh 6
-make && ./jhc -v HelloWorld.hs
+make && ./jhc $* -v HelloWorld.hs