miloignis/kraken
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Old sketches, start simpler benchmarks setup with Koka WASM

Browse Source
This commit is contained in:
Nathan Braswell
2023-01-16 15:32:45 -05:00
parent 29a0266c67
commit 54f1092a2a
34 changed files with 178 additions and 402 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
koka_bench/kraken/rbtree-opt.kp
View File

@@ -27,7 +27,7 @@
(f4 (idx l4 (+ i4 2)))
(f4 (idx l4 (+ i4 3)))
)) (+ i4 4))
true (recurse f4 l4 (concat n4 (array (f4 (idx l4 i4)))) (+ i4 1)))))
true (recurse f4 l4 (concat n4 (array (f4 (idx l4 i4)))) (+ 1 i4)))))
(helper f5 l5 (array) 0)))

18
koka_bench/kraken/test.sh Executable file
View File

@@ -0,0 +1,18 @@
#!/usr/bin/env bash
set -e
NUMBER=42000
#rm rbtree.wasm || true
#scheme --script ../../partial_eval.scm rbtree.kp && mv csc_out.wasm rbtree.wasm
#hyperfine --warmup 2 "wasmtime ./rbtree.wasm $NUMBER" "wasmtime ./old_rbtree.wasm $NUMBER"
rm rbtree-opt.wasm || true
scheme --script ../../partial_eval.scm rbtree-opt.kp && mv csc_out.wasm rbtree-opt.wasm
hyperfine --warmup 2 "wasmtime ./rbtree-opt.wasm $NUMBER" "wasmtime ./old_rbtree-opt.wasm $NUMBER"
#rm rbtree.wasm || true
#rm rbtree-opt.wasm || true
#scheme --script ../../partial_eval.scm rbtree.kp && mv csc_out.wasm rbtree.wasm
#scheme --script ../../partial_eval.scm rbtree-opt.kp && mv csc_out.wasm rbtree-opt.wasm
#hyperfine --warmup 2 "wasmtime ./rbtree.wasm $NUMBER" "wasmtime ./rbtree-opt.wasm $NUMBER" "wasmtime ./old_rbtree.wasm $NUMBER" "wasmtime ./old_rbtree-opt.wasm $NUMBER"