(define-syntax test 

  (λ (stx) 

    (syntax-case stx () 

      [(_ a b)

       (define #'a #'b)])))

(test a 2) 

;begin (possibly implicit): no expression after a sequence of internal
definitions

;(begin (define #'a #'b))

 

If you can pinpoint the answer in the reference manual, I will appreciate
it. 

 

Thank you

 

André

 

André Mayers, Ph.D., M. Ps.

professeur agrégé

Département d'informatique

Université de Sherbrooke

Sherbrooke (Québec) Canada J1K 2R1

tél: +1 819-821-8000 poste 62041

fax: +1 819-821-8200

 <mailto:andre.may...@usherbrooke.ca> andre.may...@usherbrooke.ca

 <http://info.usherbrooke.ca/AndreMayers>
http://info.usherbrooke.ca/AndreMayers

 

____________________
  Racket Users list:
  http://lists.racket-lang.org/users

Reply via email to