From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 29 Apr 2018 03:50:25 +0000 (-0700)
Subject: Add adapter for hash-object.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~98
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=2b717bf596573234f323b19f0f0310b4109b24d5;p=mit-scheme.git

Add adapter for hash-object.
---

diff --git a/src/runtime/host-adapter.scm b/src/runtime/host-adapter.scm
index 8e70e3025..4841e387d 100644
--- a/src/runtime/host-adapter.scm
+++ b/src/runtime/host-adapter.scm
@@ -73,6 +73,7 @@ USA.
     (provide-rename env 'lambda-tag:unnamed 'scode-lambda-name:unnamed)
     (provide-rename env 'lambda-tag:let 'scode-lambda-name:let)
     (provide-rename env 'lambda-tag:fluid-let 'scode-lambda-name:fluid-let)
+    (provide-rename env 'hash 'hash-object)
 
     (if (unbound? env 'hash-table-constructor)
 	(link-variables env