stxclass:

fixed scoping of attributes (wrt declare)
  added 'attribute' form
  added internal/external literals form

svn: r13574

original commit: 44efc7cb48ab4f231a024b037c80de6528b99b7c
This commit is contained in:
Ryan Culpepper 2009-02-14 12:17:14 +00:00
parent 2076decb19
commit 26d517cfa8

View File

@ -144,8 +144,8 @@
(define-syntax-class type-app
(pattern (i arg:type args:type ...)
#:when (identifier? #'i)
#:declare i type
#:when (identifier? #'i)
#:with t
(let loop
([rator #'i.t] [args (syntax->datum #'(arg.t args.t ...))])