rusefi
/
bldc
mirror of https://github.com/rusefi/bldc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
bldc/benchmarks/loop_200k.lisp

5 lines
60 B
Common Lisp
Raw Normal View History

Squashed 'lispBM/lispBM/' changes from 093a6a88..d005f690 d005f690 sleep is now built-in 0d1a9574 sharing more code between let and loop 59a713c3 updated benchmarks with 2 new additions b891468a added a loop form that borrows a lot from LET. it may be possible to turn let into a special case of loop later eb02f779 some organising and comment type fix 6a64d8ae fix bug that snuck in while consolidating MAP 414eb2f6 consolidating MAP_FIRST and MAP_REST into a single MAP continuation. 67b4e2a2 update readme git-subtree-dir: lispBM/lispBM git-subtree-split: d005f690c4d753ddb625898c21a56b0f3f7dcc38
2023-11-22 05:53:49 -08:00
(loop ( (n 200000) )
(> n 0)
(setq n (- n 1)))