mes: Resurrect macros in repl.
[mes.git] / module / mes / repl.mes
index b59f2bb5fa9c659a25f05d93911721c5f7029be0..ae928c45dd714648ab34095f48af838a3994249d 100644 (file)
@@ -161,7 +161,7 @@ along with Mes.  If not, see <http://www.gnu.org/licenses/>.
                   (loop (mes-load-module-env (cadr sexp) a))
                   (let ((e (if (and (pair? sexp) (eq? (car sexp) (string->symbol "unquote")))
                                (meta (cadr sexp) a)
-                               (eval sexp a))))
+                               (core:eval-expand sexp a))))
                     (if (eq? e *unspecified*) (loop a)
                            (let ((id (string->symbol (string-append "$" (number->string count)))))
                              (set! count (+ count 1))