aboutsummaryrefslogtreecommitdiffstats
path: root/progs/bench/fib_iter.sy
diff options
context:
space:
mode:
Diffstat (limited to 'progs/bench/fib_iter.sy')
-rw-r--r--progs/bench/fib_iter.sy22
1 files changed, 13 insertions, 9 deletions
diff --git a/progs/bench/fib_iter.sy b/progs/bench/fib_iter.sy
index c51469a..7ed1021 100644
--- a/progs/bench/fib_iter.sy
+++ b/progs/bench/fib_iter.sy
@@ -1,14 +1,18 @@
// A Fibonacci implementation that is a little
// less awful. But we run it 1000 times instead.
-j := 0
-for , j < 1000, j = j + 1 {
- a := 0
- b := 1
+start :: fn {
+ j := 0
+ for , j < 1000, j = j + 1 {
+ a := 0
+ b := 1
- for i := 0, i < 50, i = i + 1 {
- c := a
- a = b
- b = c + b
+ for i := 0, i < 50, i = i + 1 {
+ c := a
+ a = b
+ b = c + b
+ }
+ a <=> 12586269025
}
- a <=> 12586269025
}
+
+// flags: no_print