2009-10-22から1日間の記事一覧
今までdefine-macroで書いていたsimple-structをR6RSのsyntax-caseを使って書き直した。 (define-syntax syntax-with: (lambda (x) (define (add: sym) (string->symbol (string-append (symbol->string sym) ":"))) (syntax-case x () ((_ target body ...)…
今までdefine-macroで書いていたsimple-structをR6RSのsyntax-caseを使って書き直した。 (define-syntax syntax-with: (lambda (x) (define (add: sym) (string->symbol (string-append (symbol->string sym) ":"))) (syntax-case x () ((_ target body ...)…