- hmap <- parseMethod cls "main" $ methodSignature m
- case hmap of
- Just hmap' -> do
- entry <- compileBB hmap' mi
- addMethodRef entry mi [bclspath]
+ rawmethod <- parseMethod cls "main" $ methodSignature m
+ entry <- compileBB rawmethod mi
+ addMethodRef entry mi [bclspath]