Please reply to the list; you'll get more help that way. (Also, I'll
ignore your emails if you don't.)
On Mon, Jun 21, 2010 at 12:29 PM, Valeriya Pudova
<val...@digitalchile.net> wrote:
> The question is: when in the eval-synax process there will be called some
> function how that function can to reffer to the current syntax-object?
foo.ss:
(foo 1 2)
Code:
(with-input-from-file "foo.ss"
(lambda ()
(parameterize ([error-display-handler (lambda (name . stuff)
(printf "Got ~a ~a\n" name stuff))])
(eval-syntax (read-syntax 'foo.ss)))))
Output:
Got foo.ss::0: compile: unbound identifier (and no #%app syntax
transformer is bound) at: foo in: (foo 1 2) (#(struct:exn:fail:syntax
foo.ss::0: compile: unbound identifier (and no #%app syntax
transformer is bound) at: foo in: (foo 1 2) #<continuation-mark-set>
(#<syntax::2 foo>)))
So the exception structure has the syntax object you want.
N.
_________________________________________________
For list-related administrative tasks:
http://lists.racket-lang.org/listinfo/users
