From 0845c1debf2fd59b001696b3734044bc058aa3bd Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 15 May 2016 18:51:08 -0700
Subject: [PATCH] stage1: load some vocabs that are required but not used.

---
 core/bootstrap/stage1.factor | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)

diff --git a/core/bootstrap/stage1.factor b/core/bootstrap/stage1.factor
index 7fe5515cfe..d41ea9ccb8 100644
--- a/core/bootstrap/stage1.factor
+++ b/core/bootstrap/stage1.factor
@@ -1,9 +1,9 @@
 ! Copyright (C) 2004, 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: arrays assocs continuations debugger destructors generic
-hash-sets hashtables init io io.files kernel kernel.private
-make math memory namespaces parser parser.notes prettyprint
-sequences splitting system vectors vocabs vocabs.loader words ;
+USING: assocs hash-sets hashtables hashtables.identity
+hashtables.wrapped init io io.files kernel kernel.private make
+memory namespaces parser parser.notes sequences system vocabs
+vocabs.loader ;
 QUALIFIED: bootstrap.image.private
 IN: bootstrap.stage1
 
@@ -20,6 +20,8 @@ load-help? off
     [
         ! Rehash hashtables first, since bootstrap.image creates
         ! them using the host image's hashing algorithms.
+        [ identity-hashtable? ] instances [ hashtables:rehash ] each
+        [ wrapped-hashtable? ] instances [ hashtables:rehash ] each
         [ hashtable? ] instances [ hashtables:rehash ] each
         [ hash-set? ] instances [ hash-sets:rehash ] each
         boot
@@ -37,6 +39,13 @@ load-help? off
     "syntax" require
     "bootstrap.layouts" require
 
+    ! need this
+    "locals.macros" require
+    "locals.fry" require
+    "alien.libraries" require
+    "alien.c-types" require
+    "delegate" require
+
     [
         f parser-quiet? set-global