From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 16 Oct 2018 04:14:55 +0000 (-0700)
Subject: Load macros needed by machines/svm/machine.
X-Git-Tag: mit-scheme-pucked-10.1.2~16^2~174^2~13
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=25bd7e35e8f9c8908790b789cd4f7d612adbe433;p=mit-scheme.git

Load macros needed by machines/svm/machine.
---

diff --git a/src/compiler/machines/svm/compile-assembler.scm b/src/compiler/machines/svm/compile-assembler.scm
index 217782fb5..bdfaa12e1 100644
--- a/src/compiler/machines/svm/compile-assembler.scm
+++ b/src/compiler/machines/svm/compile-assembler.scm
@@ -27,6 +27,7 @@ USA.
 (with-working-directory-pathname (directory-pathname (current-load-pathname))
   (lambda ()
     (let ((environment (make-top-level-environment)))
+      (load "../../base/macros" environment)
       (load "machine" environment)
       ;; Load assembler-compiler before -runtime.
       ;; It needs to create RULE-MATCHER anti-syntax.