This has a different syntax than your example, but is semantically equivalent: (define-macro (bar identifier) (string->symbol (string-append "foo#" (symbol->string identifier)))) ;; Example use: (pp (bar x)) Best wishes, -Ben