~ chicken-core (chicken-5) d2991ae44520cc49e4aecfdf6b8ff0c5a1bdcd3e

commit d2991ae44520cc49e4aecfdf6b8ff0c5a1bdcd3e
Author:     Peter Bex <peter@more-magic.net>
AuthorDate: Fri Jun 9 20:40:25 2017 +0200
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Fri Jun 9 20:40:25 2017 +0200

    Don't convert symbol->string foreign values in `define-foreign-variable`
    
    Foreign values that are not strings are now already rejected at the
    macro transformer level by the check introduced by d17df1bf, so this
    is a small bit of unnecessary complexity we can get rid of.

diff --git a/core.scm b/core.scm
index 428833f6..15f5f236 100644
--- a/core.scm
+++ b/core.scm
@@ -1196,10 +1196,7 @@
 					  (fourth x)
 					  (symbol->string var))))
 			   (set! foreign-variables
-			     (cons (list var type
-					 (if (string? name)
-					     name
-					     (symbol->string name)))
+			     (cons (list var type name)
 				   foreign-variables))
 			   '(##core#undefined) ) )