Add missing rename to host-adapter. Thanks Joe Marshall for another catch.

diff --git a/src/runtime/host-adapter.scm b/src/runtime/host-adapter.scm
index e594e5be08a354a3a3d1105bf2de6473a1bd1d57..4206daf99ca232d20e4d7651c8b39faf32ea07c4 100644 (file)
--- a/src/runtime/host-adapter.scm
+++ b/src/runtime/host-adapter.scm
@@ -127,7 +127,9 @@ USA.
                the-environment
                unassigned?
                variable))
-    (provide-rename 'set-scode-lambda-body! 'set-lambda-body!))
+    (provide-rename 'set-scode-lambda-body! 'set-lambda-body!)
+    (provide-rename 'undefined-scode-conditional-branch
+                   'undefined-conditional-branch))
 
   (let ((env (->environment '(runtime))))
     (if (unbound? env 'select-on-bytes-per-word)