Increase ficl's dictionary size, in preparation for the newer loader.rc.

This commit is contained in:
Daniel C. Sobral 1999-03-08 11:00:02 +00:00
parent 08c9325cb2
commit 1d2a3d5731
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=44571

View File

@ -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 */