From 7733436f7b24f3c65a8d202682830a6e8c1d04f5 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Sun, 16 Dec 2001 21:58:24 +0000 Subject: [PATCH] (let-values): Use `gensym' instead of `gentemp'. --- srfi/srfi-11.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/srfi/srfi-11.scm b/srfi/srfi-11.scm index e60ef43f9..32f35a8d7 100644 --- a/srfi/srfi-11.scm +++ b/srfi/srfi-11.scm @@ -194,7 +194,7 @@ (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))