[clean up C.Generate a little
John Meacham <john@repetae.net>**20070223015703] hunk ./C/Generate.hs 7
-    character,
hunk ./C/Generate.hs 8
-    commaExpression,
hunk ./C/Generate.hs 40
-    reference,
hunk ./C/Generate.hs 43
-    statementRaw,
hunk ./C/Generate.hs 51
-    voidStarType,
-    voidType,
-    withVars,
-    test
+    test,
+    voidType
hunk ./C/Generate.hs 187
-statementRaw s = sd (text s)
hunk ./C/Generate.hs 262
-statements :: [Statement] -> Statement
-statements = mconcat
hunk ./C/Generate.hs 275
-withVars xs act = undefined
hunk ./C/Generate.hs 387
-typeChar = basicType "char"
-typeCharStar = ptrType typeChar
hunk ./C/Generate.hs 430
-    ((hd,fns),(_,ass),written) = runRWS ga () (1,Map.empty)
+    ((hd,fns),(_,ass),_written) = runRWS ga () (1,Map.empty)
hunk ./C/Generate.hs 451
-test4 = statements [test3,expr test2,test3]
+test4 = mconcat [test3,expr test2,test3]