syntax/loc

[Stefan Israelsson Tampe]

Hi,

It is possible to get syntax location information via syntax-source, but trying to implement
something like

(define-syntax syntax/loc 
  (syntax-rules ()
    ((_ src stx)
     (let ((ret (syntax stx)))
        (set-syntax-source ret (syntax-source src))
        ret))))

I fail due to not identifying what set-syntax-source should be. What's the silution?
(Currently I translate syntax/loc to a direct syntax)
/Regards
Stefan