bug#32847: Wrong macro expansion in eval

[Stefan Israelsson Tampe]

This for guile 2.4 and master,

> (eval `(let-syntax ((f (lambda (x) ,#'(+ (pk 'a 1) 2)))) f) (cu
rrent-module))

;;; (#<syntax a> 1)


But without eval:
> (let-syntax ((f (lambda (x) #'(+ (pk 'a 1) 2)))) f)

;;; (a 1)