This commit is contained in:
Justin Ethier 2017-06-03 18:35:33 -04:00
parent 746a0e3e54
commit bfd826d4ee

View file

@ -168,6 +168,20 @@ Anyway the solution is to check directly for null, instead of scanning the whole
(f (car lis1))
(begin (f (car lis1))
After rebuilding with this fix we can re-run the tail benchmark. Remember the older code took over 32 seconds to finish:
After rebuilding with this fix we can re-run the tail benchmark:
[justin@justin-pc r7rs-benchmarks]$ ./bench cyclone tail
Testing tail under Cyclone
Including postlude /home/justin/Documents/r7rs-benchmarks/src/Cyclone-postlude.scm
Compiling...
Running...
Running tail:25
Elapsed time: 0.72314 seconds (1) for tail:25
+!CSVLINE!+cyclone-0.5.1,tail:25,0.72314
real 0m0.729s
user 0m0.540s
sys 0m0.187s
Whoa! Remember the older code took over 32 seconds to finish, and now its less than a second. Not bad.