projects
/
mate.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
fb42a1f
)
debugmode: no maybe anymore
author
Bernhard Urban
<lewurm@gmail.com>
Thu, 2 Aug 2012 19:37:24 +0000
(21:37 +0200)
committer
Bernhard Urban
<lewurm@gmail.com>
Thu, 2 Aug 2012 16:48:31 +0000
(18:48 +0200)
Mate/BasicBlocks.hs
patch
|
blob
|
history
diff --git
a/Mate/BasicBlocks.hs
b/Mate/BasicBlocks.hs
index d4cd2b18bb8cae87ec40ce09d41cc18ae59d5df6..c2bdcd7587b43eeef08f426994259944a6151957 100644
(file)
--- a/
Mate/BasicBlocks.hs
+++ b/
Mate/BasicBlocks.hs
@@
-108,9
+108,7
@@
parseMethod cls methodname sig = do
let msig = methodSignature $ classMethods cls !! 1
printfBb "BB: analysing \"%s\"\n" $ toString (methodname `B.append` ": " `B.append` encode msig)
#ifdef DBG_BB
- case maybe_bb of
- Just m -> printMapBB $ rawMapBB m
- Nothing -> return ()
+ printMapBB mapbb
#endif
-- small example how to get information about
-- exceptions of a method