📄 setup.h
字号:
/* machines. */
/****************************************************************/
#define EX_MATH 1
/****************************************************************/
/* TEXT PROCESSING : Turn on this flag for support of the */
/* hierarchical lookup system. */
/****************************************************************/
#define TEXTPRO_FUNCTIONS 1
/****************************************************************/
/* HELP: To implement the help facility, set the flag below and */
/* specify the path and name of the help data file your system. */
/****************************************************************/
#define HELP_FUNCTIONS 1
#if HELP_FUNCTIONS
#define HELP_DEFAULT "clips.hlp"
#endif
/*************************************************************************/
/* BLOAD_ONLY: Enables bload command and disables the load command. */
/* BLOAD: Enables bload command. */
/* BLOAD_AND_BSAVE: Enables bload, and bsave commands. */
/*************************************************************************/
#define BLOAD_ONLY 0
#define BLOAD 0
#define BLOAD_AND_BSAVE 1
#if RUN_TIME
#undef BLOAD_ONLY
#define BLOAD_ONLY 0
#undef BLOAD
#define BLOAD 0
#undef BLOAD_AND_BSAVE
#define BLOAD_AND_BSAVE 0
#endif
/****************************************************************/
/* EMACS_EDITOR: If this flag is turned on, an integrated EMACS */
/* style editor can be utilized on supported machines. */
/****************************************************************/
#define EMACS_EDITOR 1
#if GENERIC || MAC
#undef EMACS_EDITOR /* Editor can't be used */
#define EMACS_EDITOR 0 /* with Generic or Mac */
#endif
/********************************************************************/
/* CONSTRUCT COMPILER: If this flag is turned on, you can generate */
/* C code representing the constructs in the current environment. */
/* With the RUN_TIME flag set, this code can be compiled and */
/* linked to create a stand-alone run-time executable. */
/********************************************************************/
#define CONSTRUCT_COMPILER 1
#if CONSTRUCT_COMPILER
#define API_HEADER "clips.h"
#endif
/*******************************************/
/* BASIC_IO: Includes printout, fprintout, */
/* read, open, and close functions. */
/*******************************************/
#define BASIC_IO 1
/***************************************************/
/* EXT_IO: Includes format and readline functions. */
/***************************************************/
#define EXT_IO 1
/************************************************/
/* STRING_FUNCTIONS: Includes string functions: */
/* str-length, str-compare, upcase, lowcase, */
/* sub-string, str-index, and eval. */
/************************************************/
#define STRING_FUNCTIONS 1
/*********************************************/
/* MULTIFIELD_FUNCTIONS: Includes multifield */
/* functions: mv-subseq, mv-delete, */
/* mv-append, str-explode, str-implode. */
/*********************************************/
#define MULTIFIELD_FUNCTIONS 1
/****************************************************/
/* DEBUGGING_FUNCTIONS: Includes functions such as */
/* rules, facts, matches, ppdefrule, etc. */
/****************************************************/
#define DEBUGGING_FUNCTIONS 1
/***************************************************/
/* PROFILING_FUNCTIONS: Enables code for profiling */
/* constructs and user functions. */
/***************************************************/
#define PROFILING_FUNCTIONS 1
/************************************************************************/
/* BLOCK_MEMORY: Causes memory to be allocated in large blocks. */
/* INITBUFFERSIZE and BLOCKSIZE should both be set to less than the */
/* maximum size of a signed integer. On a 16-bit machine, they should */
/* be less than 32768. */
/************************************************************************/
#define BLOCK_MEMORY 0
#if BLOCK_MEMORY
#define INITBLOCKSIZE 32000
#define BLOCKSIZE 32000
#endif
/*****************************************************************/
/* WINDOW_INTERFACE : Set this flag if you are recompiling the */
/* IBM-PC MS-DOS Window Interface or the Macintosh LSC Window */
/* Interface. Currently, when enabled, this flag disables the */
/* more processing used by the help system. */
/* This flag also prevents any input or output being directly */
/* sent to stdin or stdout. */
/*****************************************************************/
#ifndef WINDOW_INTERFACE
#define WINDOW_INTERFACE 1
#endif
#if WINDOW_INTERFACE
#undef EMACS_EDITOR /* Editor can't be used with */
#define EMACS_EDITOR 0 /* windowed interface */
#endif
/*********************************************************/
/* ENVIRONMENT_API_ONLY: If enabled, only the enviroment */
/* API may be used to interface with CLIPS. */
/*********************************************************/
#define ENVIRONMENT_API_ONLY 0
/*************************************************************/
/* ALLOW_ENVIRONMENT_GLOBALS: If enabled, tracks the current */
/* environment and allows environments to be referred to */
/* by index. If disabled, CLIPS makes no use of global */
/* variables. */
/*************************************************************/
#define ALLOW_ENVIRONMENT_GLOBALS 1
#if ! ALLOW_ENVIRONMENT_GLOBALS
#undef ENVIRONMENT_API_ONLY /* Environment API must be used */
#define ENVIRONMENT_API_ONLY 1 /* if no environment globals */
#undef EMACS_EDITOR /* Editor can't be used without */
#define EMACS_EDITOR 0 /* environment globals */
#endif
/********************************************/
/* DEVELOPER: Enables code for debugging a */
/* development version of the executable. */
/********************************************/
#ifndef DEVELOPER
#define DEVELOPER 0
#endif
#if DEVELOPER
#include <assert.h>
#define Bogus(x) assert(! (x))
#else
#define Bogus(x)
#endif
/***************************/
/* Environment Definitions */
/***************************/
#include "envrnmnt.h"
/******************************/
/* Compatibilty Redefinitions */
/******************************/
#define PrintCLIPS(x,y) EnvPrintRouter(GetCurrentEnvironment(),x,y)
#define GetcCLIPS(x,y) EnvGetcRouter(GetCurrentEnvironment(),x)
#define UngetcCLIPS(x,y) EnvUngetcRouter(GetCurrentEnvironment(),x,y)
#define ExitCLIPS(x) EnvExitRouter(GetCurrentEnvironment(),x)
#define CLIPSSystemError(x,y) SystemError(x,y)
#define CLIPSFunctionCall(x,y,z) FunctionCall(x,y,z)
#define InitializeCLIPS() InitializeEnvironment()
#define WCLIPS WPROMPT
#define CLIPSTrueSymbol SymbolData(GetCurrentEnvironment())->TrueSymbol
#define CLIPSFalseSymbol SymbolData(GetCurrentEnvironment())->FalseSymbol
#define EnvCLIPSTrueSymbol(theEnv) SymbolData(theEnv)->TrueSymbol
#define EnvCLIPSFalseSymbol(theEnv) SymbolData(theEnv)->FalseSymbol
#define CLIPS_FALSE 0
#define CLIPS_TRUE 1
/*************************************************/
/* Any user defined global setup information can */
/* be included in the file usrsetup.h which is */
/* an empty file in the baseline version. */
/*************************************************/
#include "usrsetup.h"
#endif /* _H_setup */
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -