Deleted Added
sdiff udiff text old ( 61586 ) new ( 65617 )
full compact
words.c (61586) words.c (65617)
1/*******************************************************************
2** w o r d s . c
3** Forth Inspired Command Language
4** ANS Forth CORE word-set written in C
5** Author: John Sadler (john_sadler@alum.mit.edu)
6** Created: 19 July 1997
7**
8*******************************************************************/
9
1/*******************************************************************
2** w o r d s . c
3** Forth Inspired Command Language
4** ANS Forth CORE word-set written in C
5** Author: John Sadler (john_sadler@alum.mit.edu)
6** Created: 19 July 1997
7**
8*******************************************************************/
9
10/* $FreeBSD: head/sys/boot/ficl/words.c 61586 2000-06-12 16:46:28Z dcs $ */
10/* $FreeBSD: head/sys/boot/ficl/words.c 65617 2000-09-08 17:03:53Z dcs $ */
11
12#ifdef TESTMAIN
13#include <stdlib.h>
14#include <stdio.h>
15#include <ctype.h>
16#include <fcntl.h>
17#else
18#include <stand.h>

--- 4808 unchanged lines hidden (view full) ---

4827 dictAppendWord(dp, "inb", ficlInb, FW_DEFAULT);
4828#endif
4829 dictAppendWord(dp, "setenv", ficlSetenv, FW_DEFAULT);
4830 dictAppendWord(dp, "setenv?", ficlSetenvq, FW_DEFAULT);
4831 dictAppendWord(dp, "getenv", ficlGetenv, FW_DEFAULT);
4832 dictAppendWord(dp, "unsetenv", ficlUnsetenv, FW_DEFAULT);
4833 dictAppendWord(dp, "copyin", ficlCopyin, FW_DEFAULT);
4834 dictAppendWord(dp, "copyout", ficlCopyout, FW_DEFAULT);
11
12#ifdef TESTMAIN
13#include <stdlib.h>
14#include <stdio.h>
15#include <ctype.h>
16#include <fcntl.h>
17#else
18#include <stand.h>

--- 4808 unchanged lines hidden (view full) ---

4827 dictAppendWord(dp, "inb", ficlInb, FW_DEFAULT);
4828#endif
4829 dictAppendWord(dp, "setenv", ficlSetenv, FW_DEFAULT);
4830 dictAppendWord(dp, "setenv?", ficlSetenvq, FW_DEFAULT);
4831 dictAppendWord(dp, "getenv", ficlGetenv, FW_DEFAULT);
4832 dictAppendWord(dp, "unsetenv", ficlUnsetenv, FW_DEFAULT);
4833 dictAppendWord(dp, "copyin", ficlCopyin, FW_DEFAULT);
4834 dictAppendWord(dp, "copyout", ficlCopyout, FW_DEFAULT);
4835 dictAppendWord(dp, "findfile", ficlFindfile, FW_DEFAULT);
4836 dictAppendWord(dp, "pnpdevices",ficlPnpdevices, FW_DEFAULT);
4837 dictAppendWord(dp, "pnphandlers",ficlPnphandlers, FW_DEFAULT);
4838 dictAppendWord(dp, "ccall", ficlCcall, FW_DEFAULT);
4835#endif
4836
4837#if defined(__i386__)
4838 ficlSetEnv("arch-i386", FICL_TRUE);
4839 ficlSetEnv("arch-alpha", FICL_FALSE);
4840#elif defined(__alpha__)
4841 ficlSetEnv("arch-i386", FICL_FALSE);
4842 ficlSetEnv("arch-alpha", FICL_TRUE);

--- 189 unchanged lines hidden --- 		4839#endif
4840
4841#if defined(__i386__)
4842 ficlSetEnv("arch-i386", FICL_TRUE);
4843 ficlSetEnv("arch-alpha", FICL_FALSE);
4844#elif defined(__alpha__)
4845 ficlSetEnv("arch-i386", FICL_FALSE);
4846 ficlSetEnv("arch-alpha", FICL_TRUE);

--- 189 unchanged lines hidden ---