(let-values): Use `gensym' instead of `gentemp'.
authorMarius Vollmer <mvo@zagadka.de>
Sun, 16 Dec 2001 21:58:24 +0000 (21:58 +0000)
committerMarius Vollmer <mvo@zagadka.de>
Sun, 16 Dec 2001 21:58:24 +0000 (21:58 +0000)
srfi/srfi-11.scm

index e60ef43..32f35a8 100644 (file)
 
   (define (let-values-helper vars body prev-let-vars)
     (let* ((var-binding (car vars))
-           (new-tmps (map-1-dot (lambda (sym) (gentemp))
+           (new-tmps (map-1-dot (lambda (sym) (gensym))
                                 (car var-binding)))
            (let-vars (map (lambda (sym tmp) (list sym tmp))
                           (undot-list (car var-binding))