- 457 名前:デフォルトの名無しさん mailto:sage [2007/05/27(日) 23:10:37 ]
- ;(define-syntax my-define-structure
; (syntax-rules () ((my-define-structure name slot ...) ; (define (string->symbol (string-append "make-" (symbol->string name))) (lambda (… などとして、新しいシンボルを作ってそれを束縛したいのです。 defineは第1引数に式はおろか、準引用すら許しませんから困ってます。 そこで、マクロに展開されてdefineが評価される前に引数がシンボルに展開されれば、と考えました。 これは黒田氏が指摘している問題の一つな気がします。 Shiro氏も ・せめてシンボルの生成くらいはr5rs内で出来て欲しいってのはありますね。 とおっしゃってますし、正攻法ではどうも解決できない気がします。 プリプロセサを書くしかないのでしょうか?
|

|