From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 28 Apr 2017 07:06:49 +0000 (-0700)
Subject: Revert change to host-adapter that breaks self-build.
X-Git-Tag: mit-scheme-pucked-9.2.12~14^2~115^2
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=f2a1d5bf533a67839587d68afd81c9cb6939a8ba;p=mit-scheme.git

Revert change to host-adapter that breaks self-build.
---

diff --git a/src/runtime/host-adapter.scm b/src/runtime/host-adapter.scm
index 20667844b..0508fc671 100644
--- a/src/runtime/host-adapter.scm
+++ b/src/runtime/host-adapter.scm
@@ -36,7 +36,7 @@ USA.
 ;;; only until the new runtime is released.  They assume the host is
 ;;; the current release (9.2 as of March 2017).
 
-(if (string-prefix? "9.2" (get-subsystem-version-string "release"))
+(if (string=? "9.2" (get-subsystem-version-string "release"))
     (begin
       (eval
        '(begin