Hello, <br>(define-syntax for-each-vector<br> (syntax-rules ()<br> ((for-each-vector proc vec) (let ((len (vector-length vec))) <br> (do ((index 0 (+ index 1)))<br>
((= index len))<br> (proc (vector-ref vec index)))))))<br>Now examples:<br>(for-each-vector (lambda (a) (display a)) #( 1 2 3))<br><br>>>> 123 ok<br>
<br>(for-each-vector (lambda (a b) (display (+ a b))) #( 1 2 3) #( 1 2 3))<br><br>>>> error syntax<br><br>I try to put some ... in my define doesn't work. <br>How to use multiple args in lambda ? <br>