projects
/
mate.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b35a0fd
)
basicblock: change order of `TwoTarget'
author
Bernhard Urban
<lewurm@gmail.com>
Sat, 7 Apr 2012 01:44:21 +0000
(
03:44
+0200)
committer
Bernhard Urban
<lewurm@gmail.com>
Sat, 7 Apr 2012 01:44:21 +0000
(
03:44
+0200)
Mate/BasicBlocks.hs
patch
|
blob
|
history
diff --git
a/Mate/BasicBlocks.hs
b/Mate/BasicBlocks.hs
index fdb6b22ab02994a1fa43ad03a236258c23796e6e..25a418e4b64077fb55e19ec03d9ea043c1e7ce21 100644
(file)
--- a/
Mate/BasicBlocks.hs
+++ b/
Mate/BasicBlocks.hs
@@
-160,5
+160,5
@@
calculateInstructionOffset = cio' (0, Nothing)
where
notarget = ((off, Just Return), x):next
onetarget w16 = ((off, Just $ OneTarget $ (off `addW16Signed` w16)), x):next
- twotargets w16 = ((off, Just $ TwoTarget (off
`addW16Signed` w16) (off + 3
)), x):next
+ twotargets w16 = ((off, Just $ TwoTarget (off
+ 3) (off `addW16Signed` w16
)), x):next
next = cio' (newoffset x off) xs