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

5 lines
100 B
Common Lisp
Raw Blame History

(check (let (( (a (b0 b1 b2) . c) '(1 (100 200 300) . 77) ))
(= (+ a b0 b1 b2 c) 678)))
Reference in New Issue View Git Blame Copy Permalink