From 66bd171e5f582a4a8b0e9230866979c1ffeffd3b Mon Sep 17 00:00:00 2001
From: "Daniel C. Sobral" <dcs@FreeBSD.org>
Date: Sun, 27 May 2001 16:30:10 +0000
Subject: [PATCH] As in with ":", check dictionary space and increase it if
 necessary before "create".

---
 sys/boot/ficl/words.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sys/boot/ficl/words.c b/sys/boot/ficl/words.c
index 73908cccdfb..ed9f087b24f 100644
--- a/sys/boot/ficl/words.c
+++ b/sys/boot/ficl/words.c
@@ -2306,6 +2306,8 @@ static void create(FICL_VM *pVM)
     FICL_DICT *dp = ficlGetDict();
     STRINGINFO si = vmGetWord(pVM);
 
+    dictCheckThreshold(dp);
+
     dictAppendWord2(dp, si, createParen, FW_DEFAULT);
     dictAllotCells(dp, 1);
     return;