From 2146ecd761a323bf79260fa2cdc9a723b3fab154 Mon Sep 17 00:00:00 2001
From: Sharjeel Khan <skhan352@gatech.edu>
Date: Fri, 11 Nov 2022 00:20:05 -0500
Subject: [PATCH] Commit current things

---
 koka_bench/picolisp/picolisp-deriv.l | 13 +++++++++++++
 koka_bench/scheme/scheme-nqueens.scm |  0
 koka_bench/test.sh                   |  2 +-
 3 files changed, 14 insertions(+), 1 deletion(-)
 create mode 100644 koka_bench/picolisp/picolisp-deriv.l
 create mode 100644 koka_bench/scheme/scheme-nqueens.scm

diff --git a/koka_bench/picolisp/picolisp-deriv.l b/koka_bench/picolisp/picolisp-deriv.l
new file mode 100644
index 0000000..948d25f
--- /dev/null
+++ b/koka_bench/picolisp/picolisp-deriv.l
@@ -0,0 +1,13 @@
+#!/usr/bin/env bash
+#{
+# Thanks to http://rosettacode.org/wiki/Multiline_shebang#PicoLisp
+exec pil $0 $1
+# }#
+
+
+
+(de fib (n) (cond ((= 0 n)   1)
+                  ((= 1 n)   1)
+                  (T         (+ (fib (- n 1)) (fib (- n 2))))))
+
+(bye (println (fib (car (str (opt))))))
diff --git a/koka_bench/scheme/scheme-nqueens.scm b/koka_bench/scheme/scheme-nqueens.scm
new file mode 100644
index 0000000..e69de29
diff --git a/koka_bench/test.sh b/koka_bench/test.sh
index b403e4c..515efa0 100755
--- a/koka_bench/test.sh
+++ b/koka_bench/test.sh
@@ -17,7 +17,7 @@ find build -type f -name \*slow\* -exec mv {} slow \;
 cp ./build/kraken/out/bench/kraken-* ./slow
 mv ./build/kraken/out/bench/kraken-cfold ./slow
 mv ./build/newlisp/out/bench/* ./slow
- 
+mv ./build/picolisp/out/bench/* ./slow 
 
 #nix develop -i -c bash -c 'ulimit -s unlimited && find build -type f -executable -name \*rbtree\* -printf "\"%p 420000\"\n" | xargs hyperfine --ignore-failure --warmup 2 --export-markdown rbtree_table.md --export-csv rbtree_table.csv'
 #nix develop -i -c bash -c 'ulimit -s unlimited && find build -type f -executable -name \*fib\* -printf "\"%p 30\"\n"      | xargs hyperfine --ignore-failure --warmup 2 --export-markdown fib_table.md --export-csv fib_table.csv'