[don't convert letrec body until definitions have been processed
John Meacham <john@repetae.net>**20060815041356] hunk ./Grin/FromE.hs 328
-    ce (ELetRec ds e) = ce e >>= \e -> doLet ds e
+    ce (ELetRec ds e) = doLet ds (ce e)
hunk ./Grin/FromE.hs 508
-    cc (ELetRec ds e) = cc e >>= \e -> doLet ds e
+    cc (ELetRec ds e) = doLet ds (cc e)
hunk ./Grin/FromE.hs 538
-        f [] x = return x
+        f [] x = x