* psyntax.ss (build-lexical-var): Use gentemp instead of gensym;

Convert first argument to a string.

diff --git a/ice-9/psyntax.ss b/ice-9/psyntax.ss
index 0fd70f3..b49d148 100644 (file)
--- a/ice-9/psyntax.ss
+++ b/ice-9/psyntax.ss
@@ -399,7 +399,7 @@
 
 (define-syntax build-lexical-var
   (syntax-rules ()
-    ((_ src id) (gensym id generated-symbols))))
+    ((_ src id) (gentemp (symbol->string id) generated-symbols))))
 
 (define-syntax self-evaluating?
   (syntax-rules ()