projects
/
mate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
codegen: handle exceptions of a method
[mate.git]
/
Mate.hs
diff --git
a/Mate.hs
b/Mate.hs
index a191048495b26244a1ceab9bcd226d6e0289fb1a..2231a5818be418b39fd6499043eb15927ab9207a 100644
(file)
--- a/
Mate.hs
+++ b/
Mate.hs
@@
-67,8
+67,8
@@
executeMain bclspath cls = do
Just m -> do
let mi = MethodInfo "main" bclspath $ methodSignature m
rawmethod <- parseMethod cls "main" $ methodSignature m
Just m -> do
let mi = MethodInfo "main" bclspath $ methodSignature m
rawmethod <- parseMethod cls "main" $ methodSignature m
- entry <- compileBB rawmethod mi
+ entry <- compileBB
mi
rawmethod mi
addMethodRef entry mi [bclspath]
printfInfo "executing `main' now:\n"
addMethodRef entry mi [bclspath]
printfInfo "executing `main' now:\n"
- executeFuncPtr entry
+ executeFuncPtr
$ fst
entry
Nothing -> error "main not found"
Nothing -> error "main not found"