improve the 'method' syntax error so it gives a hint which argument is which

This commit is contained in:
Robby Findler 2012-11-28 13:12:28 -06:00
parent ad2e8ac54e
commit e7c6222142

View File

@ -14,8 +14,8 @@
constructor-tag
name-this-object)
(define-syntax-rule (method a b)
(*method 'b (quote-syntax a)))
(define-syntax-rule (method class/interface method-name)
(*method 'method-name (quote-syntax class/interface)))
(define-syntax-rule (xmethod a b)
(elem (method a b) " in " (racket a)))