projects
/
calu.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
75982e6
)
[bench] bugfixes, more to come ...
author
Martin Perner
<martin@perner.cc>
Sat, 18 Dec 2010 09:17:19 +0000
(10:17 +0100)
committer
Martin Perner
<martin@perner.cc>
Sat, 18 Dec 2010 09:17:19 +0000
(10:17 +0100)
8_benchs/src/vm.s
patch
|
blob
|
history
diff --git
a/8_benchs/src/vm.s
b/8_benchs/src/vm.s
index e90902dd3f0677c23a9469ed7845d83b4d0c1277..3d17099d81be8c54e3856009d1403c592c75b70e 100644
(file)
--- a/
8_benchs/src/vm.s
+++ b/
8_benchs/src/vm.s
@@
-78,7
+78,7
@@
vm_mul:
;return init
ldis r8, 0
;save of sp-1
;return init
ldis r8, 0
;save of sp-1
- mov r
7, r0
+ mov r
0, r7
;check if sp-1 is even or odd
andx r0, 1
;add sp to result
;check if sp-1 is even or odd
andx r0, 1
;add sp to result
@@
-210,8
+210,8
@@
vm_jmp:
;compare to 0
cmpi r6,0
;increment pc if == 0
;compare to 0
cmpi r6,0
;increment pc if == 0
- addideq r2, r2,
4
- br
n
q+ vm_loop
+ addideq r2, r2,
1
+ br
e
q+ vm_loop
;if != 0
;load pc+1 input
ldb r6, 1(r4)
;if != 0
;load pc+1 input
ldb r6, 1(r4)
@@
-251,7
+251,7
@@
vm_not:
jumptable:
;0
.fill 1, vm_eof
jumptable:
;0
.fill 1, vm_eof
-.fill 4
0
, vm_default
+.fill 4
1
, vm_default
;42
.fill 1, vm_mul
;43
;42
.fill 1, vm_mul
;43
@@
-286,8
+286,8
@@
jumptable:
.fill 7, vm_default
;88
.fill 1, vm_xch
.fill 7, vm_default
;88
.fill 1, vm_xch
-;8
8
-125
-.fill
40
, vm_default
+;8
9
-125
+.fill
37
, vm_default
;126
.fill 1, vm_not
;127-255
;126
.fill 1, vm_not
;127-255