From 1d2a3d57317399c95c5c891473e3205d4cadc3e9 Mon Sep 17 00:00:00 2001
From: "Daniel C. Sobral" <dcs@FreeBSD.org>
Date: Mon, 8 Mar 1999 11:00:02 +0000
Subject: [PATCH] Increase ficl's dictionary size, in preparation for the newer
 loader.rc.

---
 sys/boot/common/interp_forth.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/sys/boot/common/interp_forth.c b/sys/boot/common/interp_forth.c
index ba6b505b2cf8..4f653275c78f 100644
--- a/sys/boot/common/interp_forth.c
+++ b/sys/boot/common/interp_forth.c
@@ -23,7 +23,7 @@
  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  * SUCH DAMAGE.
  *
- *	$Id: interp_forth.c,v 1.11 1999/01/28 06:33:03 jkh Exp $
+ *	$Id: interp_forth.c,v 1.12 1999/02/04 17:06:46 dcs Exp $
  */
 
 #include <sys/param.h>		/* to pick up __FreeBSD_version */
@@ -232,7 +232,7 @@ bf_init(void)
     char create_buf[41];	/* 31 characters-long builtins */
     int fd;
    
-    ficlInitSystem(4000);	/* Default dictionary ~4000 cells */
+    ficlInitSystem(8000);	/* Default dictionary ~4000 cells */
     bf_vm = ficlNewVM();
 
     /* Builtin constructor word  */