From: Matt Birkholz <puck@birchwood-abbey.net>
Date: Wed, 27 Apr 2016 23:17:35 +0000 (-0700)
Subject: planetarium/mit-3d.pkg: Add bindings missed by CREF.
X-Git-Tag: mit-scheme-pucked-9.2.12~335
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=0f5db4f43fb191720d6af84e9970b6c3114337c8;p=mit-scheme.git

planetarium/mit-3d.pkg: Add bindings missed by CREF.

The fixnum ops are referenced by the code, but are inlined/substituted
before CREF can see them(?).  Without these bindings, loading
terrain.scm, to run it interpretively, causes unbound variable errors.
---

diff --git a/src/planetarium/mit-3d.pkg b/src/planetarium/mit-3d.pkg
index bfbf788eb..f4f79e51e 100644
--- a/src/planetarium/mit-3d.pkg
+++ b/src/planetarium/mit-3d.pkg
@@ -43,7 +43,8 @@ USA.
 	  sleep-current-thread
 	  define-class define-method initialize-instance
 	  system-global-environment
-	  define-syntax syntax-rules outf-error ill-formed-syntax)
+	  define-syntax syntax-rules outf-error ill-formed-syntax
+	  fix:+ fix:* fix:- fix:-1+ fix:1+ fix:=)
   (import (gtk)
 	  gtk-widget-set-hexpand
 	  gtk-widget-set-vexpand