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

original commit: e7c622214254aa111361de11f22ff77f24f8e7f8
This commit is contained in:
Robby Findler 2012-11-28 13:12:28 -06:00
parent 7a4767a341
commit 4f8f97c58f

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)))