define defmutable macro in system until bootstrap complete

mighty-gerbils · Oct 31, 2023 · f38150c · f38150c
1 parent f0c66fb
commit f38150c
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/gerbil/runtime/system.ss b/src/gerbil/runtime/system.ss
@@ -9,6 +9,9 @@ namespace: #f
 (import "gambit" "util")
 (include "version.ss")
 
+;; Redundantly define this macro here until the version in the prelude is fully bootstrapped.
+(defrules defmutable () ((_ var value) (begin (def var value) (set! var var) (void))))
+
 (def gerbil-system-manifest
   [["Gerbil" :: (gerbil-version-string)]
    ["Gambit" :: (system-version-string)]])