(define-syntax test
(syntax-rules ()
((_ x)
(define (string->symbol (string-append "a" (symbol->string x) 0))))))
(test hoge)
(display ahoge)
KGRlZmluZS1zeW50YXggdGVzdAogIChzeW50YXgtcnVsZXMgKCkKICAgICgoXyB4KQogICAgIChkZWZpbmUgKHN0cmluZy0+c3ltYm9sIChzdHJpbmctYXBwZW5kICJhIiAoc3ltYm9sLT5zdHJpbmcgeCkgMCkpKSkpKQoKKHRlc3QgaG9nZSkKCihkaXNwbGF5IGFob2dlKQ==