[Make usage info slightly more clear.
Lemmih <lemmih@gmail.com>**20081202050443
 Ignore-this: 52c7cdd1a1b964178e5f582d30f5b3cd
] hunk ./E/TypeAnalysis.hs 63
-        lamread _ nfo | Just v <- Info.lookup nfo = do
-            rv <- readValue v
-            return (Info.insert (rv :: Typ) $ Info.delete (undefined :: Value Typ) nfo)
-        lamread _ nfo = return nfo
-        lamdel _ nfo = return (Info.delete (undefined :: Value Typ) nfo)
hunk ./E/TypeAnalysis.hs 73
+    let lamread _ nfo | Just v <- Info.lookup nfo = do
+            rv <- readValue v
+            return (Info.insert (rv :: Typ) $ Info.delete (undefined :: Value Typ) nfo)
+        lamread _ nfo = return nfo
hunk ./E/TypeAnalysis.hs 81
+    let lamdel _ nfo = return (Info.delete (undefined :: Value Typ) nfo)