LispBuiltins.cpp

/*
* Copyright 2024 Rochus Keller <mailto:me@rochus-keller.ch>
*
* This file is part of the Interlisp project.
*
* The following is the license that applies to this copy of the
* file. For a license to use the file under conditions
* other than those described here, please email to me@rochus-keller.ch.
*
* GNU General Public License Usage
* This file may be used under the terms of the GNU General Public
* License (GPL) versions 2.0 or 3.0 as published by the Free Software
* Foundation and appearing in the file LICENSE.GPL included in
* the packaging of this file. Please review the following information
* to ensure GNU General Public Licensing requirements will be met:
* http://www.fsf.org/licensing/licenses/info/GPLv2.html and
* http://www.gnu.org/copyleft/gpl.html.
*/
// Extracted from the index of the book "Interlisp - The Language and its usage"

#include "LispBuiltins.h"
using namespace Lisp;


const char*Builtins::functions[]= {
    "ABS",
    "ADDASSOC",
    "ADDPROP",
    "ADDSPELL",
    "ADDSPELLl",
    "ADDSTATS",
    "ADDTOCOMS",
    "ADDTOFILE",
    "ADDTOFILES?",
    "ADD1",
    "ADD.OR.SUBTRACT.MATRICES",
    "ADVISE",
    "ADVISEDUMP",
    "ALLOCSTRING",
    "ALPHORDER",
    "AND",
    "ANTILOG",
    "APPEND",
    "APPLY",
    "APPLY*",
    "ARCCOS",
    "ARCSIN",
    "ARCTAN",
    "ARCTAN2",
    "ARG",
    "ARGLIST",
    "ARGTYPE",
    "ARRAY",
    "ARRAYBEG",
    "ARRAYORIG",
    "ARRAYP",
    "ARRAYSIZE",
    "ARRAYTYP",
    "ASKUSER",
    "ASSOC",
    "ATOM",
    "ATTACH",
    "BAKTRACE",
    "BKLINBUF",
    "BKSYSBUF",
    "BOUNDP",
    "BREAK",
    "BREAKCHECK",
    "BREAKDOWN",
    "BREAKIN",
    "BREAKREAD",
    "BREAKO",
    "BREAKl",
    "BRKDWNRESULTS",
    "BUBBLE.SORT",
    "BUILD-ARGUMENT-LIST",
    "CALLS",
    "CALLSCCODE",
    "CAR",
    "CASEARRAY",
    "CCODEP",
    "CDIFFERENCE",
    "CDR",
    "CHANGECALLERS",
    "CHANGENAME",
    "CHANGEPROP",
    "CHANGESLICE",
    "CHARACTER",
    "CHARCODE",
    "CHCON",
    "CHCON1",
    "CHECK.MATRIX",
    "CHOOZ",
    "CLDISABLE",
    "CLEANUP",
    "CLEARBUF",
    "CLEARSTK",
    "CLISPDEC",
    "CLISPIFY",
    "CLISPIFYFNS",
    "CLISPTRAN",
    "CLOCK",
    "CLOSEALL",
    "CLOSEF",
    "CLOSEF?",
    "CLRHASH",
    "CMULT",
    "CNDIR",
    "COMPARE",
    "COMPAREDEFS",
    "COMPARELISTS",
    "COMPILE",
    "COMPILEFILES",
    "COMPILE1",
    "COMPLEX",
    "CONCAT",
    "CONCATLIST",
    "COND",
    "CONS",
    "CONSCOUNT",
    "CONSTANTS",
    "CONTROL",
    "COPY",
    "COPYALL",
    "COPYARRAY",
    "COPYBYTES",
    "COPYDEF",
    "COPYREADTABLE",
    "COPYSTK",
    "COPYTERMTABLE",
    "COS",
    "COUNT",
    "COUNTDOWN",
    "CPLUS",
    "CZERO",
    "DATE",
    "DE",
    "DECLAREDATATYPE",
    "DEFINE",
    "DEFINEQ",
    "DEFLIST",
    "DEFMACRO",
    "DEFPRINT",
    "DELASSOC",
    "DELDEF",
    "DELETECONTROL",
    "DELETE.STRING",
    "DELFILE",
    "DELFROMCOMS",
    "DELFROMFILES",
    "DEPTH",
    "DF",
    "DIERENCE",
    "DIRECTORY",
    "DMPHASH",
    "DOCOLLECT",
    "DOT.PRODUCT",
    "DRIBBLE",
    "DRIBBLEFILE",
    "DUMMYFRAMEP",
    "DUMPDATABASE",
    "DWIM",
    "DWIMIFY",
    "DWIMIFYFNS",
    "ECHOCHAR",
    "ECHOCONTROL",
    "ECHOMODE",
    "EDITCALLERS",
    "EDITDEF",
    "EDITE",
    "EDITF",
    "EDITFINDP",
    "EDITFNS",
    "EDITL",
    "EDITL0",
    "EDITP",
    "EDITREC",
    "EDITRACEFN",
    "EDITV",
    "EDIT4E",
    "ELT",
    "ELTD",
    "ELTM",
    "ENDCOLLECT",
    "ENDFILE",
    "ENTRY#",
    "ENVAPPLY",
    "ENVEVAL",
    "EOFP",
    "EQ",
    "EQARRAYP",
    "EQLENGTH",
    "EQMEMB",
    "EQSIGNP",
    "EQUAL",
    "EQUALALL",
    "EQUALN",
    "EQP",
    "EQZERO",
    "ERROR",
    "ERRORMESS",
    "ERRORMESS1",
    "ERRORN",
    "ERRORSET",
    "ERRORSTRING",
    "ERRORX",
    "ERROR!",
    "ERSETQ",
    "ESUBST",
    "EVAL",
    "EVALA",
    "EVENP",
    "EVERY",
    "EXCHANGE",
    "EXPANDMACRO",
    "EXPRP",
    "EXPT",
    "FADDl",
    "FEQP",
    "FETCHFIELD",
    "ILEPOS",
    "FGREATERP",
    "FILDIR",
    "FILECHANGES",
    "FILECOMS",
    "FILECOMSLST",
    "FILECREATED",
    "FILEDATE",
    "FILEFNSLST",
    "FILENAMEFIELD",
    "FILEPKGCHANGES",
    "FILEPKGCOM",
    "FILEPKGTYPE",
    "FILEPOS",
    "FILES?",
    "FINDFILE",
    "FIX",
    "FIXP",
    "FIXSPELL",
    "FLESSP",
    "FLOAT",
    "FLOATP",
    "FLOOR",
    "FLTFMT",
    "FMAX",
    "FMIN",
    "FMINUS",
    "FNCHECK",
    "FNTYP",
    "FPLUS",
    "FQUOTIENT",
    "FRAMESCAN",
    "FREEVARS",
    "FREMAINDER",
    "FTIMES",
    "FULLNAME",
    "FUNCTION",
    "GAINSPACE",
    "GCD",
    "GDATE",
    "GENERATE",
    "GENERATOR",
    "GENSYM",
    "GEQ",
    "GETATOMVAL",
    "GETBRK",
    "GETCOMMENT",
    "GETCONTROL",
    "GETD",
    "GETDEF",
    "GETDELETECONTROL",
    "GETDESCRIPTORS",
    "GETECHOMODE",
    "GETEOFPTR",
    "GETFIELDSPECS",
    "GETFILEINFO",
    "GETFILEPTR",
    "GETHASH",
    "GETLIS",
    "GETPROP",
    "GETPROPLIST",
    "GETRAISE",
    "GETREADTABLE",
    "GETRELATION",
    "GETSEPR",
    "GETSYNTAX",
    "GETTEMPLATE",
    "GETTERMTABLE",
    "GETTOPVAL",
    "GLC",
    "GNC",
    "GO",
    "GREATERP",
    "HARRAY",
    "HARRAYP",
    "HARRAYSIZE",
    "HASDEF",
    "HCOPYALL",
    "HELP",
    "HISTORYFIND",
    "HISTORYMATCH",
    "HISTORYSAVE",
    "HPRINT",
    "HREAD",
    "I.S.OPR",
    "IDATE",
    "IDIFFERENCE",
    "IEQP",
    "IGEQ",
    "IGREATERP",
    "ILEQ",
    "ILESSP",
    "IMAG",
    "IMAX",
    "IMIN",
    "IMINUS",
    "IMOD",
    "INDEX-GENERATION",
    "INFILE",
    "INFILECOMS?",
    "INFILEP",
    "INPUT",
    "INSERT.STRING",
    "INTERSECTION",
    "IOFILE",
    "IPLUS",
    "IQUOTIENT",
    "IREMAINDER",
    "ITIMES",
    "KWOTE",
    "LAST",
    "LASTC",
    "LASTN",
    "LCONC",
    "LDIFF",
    "LDIFFERENCE",
    "LENGTH",
    "LEQ",
    "LESSP",
    "LINELENGTH",
    "LIST",
    "LISTFILES",
    "LISTGET",
    "LISTGETl",
    "LISTP",
    "LISTPUT",
    "LISTPUT1",
    "LISPX",
    "LISPXEVAL",
    "LISPXFIND",
    "LISPXPRINT",
    "LISPXPRINTDEF",
    "LISPXPRINl",
    "LISPXPRIN2",
    "LISPXREAD",
    "LISPXREADP",
    "LISPXSPACES",
    "LISPXSTATS",
    "LISPXTAB",
    "LISPXTERPRI",
    "LISPXUNREAD",
    "LISPXWATCH",
    "LISPX/",
    "LITATOM",
    "LLSH",
    "LOAD",
    "LOADCOMP",
    "LOADDEF",
    "LOADFNS",
    "LOADFROM",
    "LOADVARS",
    "LOAD?",
    "LOG",
    "LOGAND",
    "LOGNOT",
    "LOGOR",
    "LOGXOR",
    "LOGOUT",
    "LRSH",
    "LSH",
    "LSUBST",
    "L-CASE",
    "MAKEBITTABLE",
    "MAKEFILE",
    "MAKEFILES",
    "MAKEKEYLST",
    "MAKENEWCOM",
    "MAKE.STRING.FROM.LIST",
    "MAP",
    "MAPATOMS",
    "MAP2C",
    "MAP2CAR",
    "MAPC",
    "MAPCAR",
    "MAPCONC",
    "MAPDL",
    "MAPHASH",
    "MAPLIST",
    "MAPRELATION",
    "MAPRINT",
    "MARKASCHANGED",
    "MASTERSCOPE",
    "MATRIX",
    "MAX",
    "MAXP",
    "MDIFFERENCE",
    "MEAN",
    "MEDIAN",
    "MEMB",
    "MEMBER",
    "MERGE",
    "MERGEINSERT",
    "MIN",
    "MINP",
    "MINUS",
    "MINUSP",
    "MISPELLED?",
    "MKATOM",
    "MKLIST",
    "MKSTRING",
    "MOVD",
    "MOVD?",
    "MOVETOFILE",
    "MPLUS",
    "MTIMES",
    "MULTIFILEINDEX",
    "NARGS",
    "NCHARS",
    "NCONC",
    "NCONCl",
    "NCONS",
    "NCREATE",
    "NEGATE",
    "NEQ",
    "NEWISWORD",
    "NEW/FN",
    "NILL",
    "NLEFT",
    "NLISTP",
    "NLSETQ",
    "NOT",
    "NOTANY",
    "NOTEQUAL",
    "NOTEVERY",
    "NTH",
    "NTHCHAR",
    "NTHCHARCODE",
    "NULL",
    "NUMBERP",
    "NUMERIC-SORT",
    "NUMFORMATCODE",
    "ODDP",
    "ONEP",
    "OPENFILE",
    "OPENP",
    "OR",
    "OUTFILE",
    "OUTFILEP",
    "OUTPUT",
    "PACK",
    "PACKC",
    "PACK*",
    "PACKFILENAME",
    "PAGEFAULTS",
    "PARSERELATION",
    "PEEKC",
    "PF",
    "PLUS",
    "PLUSP",
    "POSITION",
    "POWEROFTWOP",
    "PP",
    "PRETTYCOMPRINT",
    "PRETTYDEF",
    "PRETTYPRINT",
    "PRIN1",
    "PRIN2",
    "PRIN3",
    "PRIN4",
    "PRINT",
    "PRINTHISTORY",
    "PRINTBELLS",
    "PRINTCOMMENT",
    "PRINTDATE",
    "PRINTDEF",
    "PRINTFNS",
    "PRINTLEVEL",
    "PRINTNUM",
    "PRODUCE",
    "PROG",
    "PROG1",
    "PROG2",
    "PROGN",
    "PROPNAMES",
    "PUTASSOC",
    "PUTD",
    "PUTDEF",
    "PUTDQ",
    "PUTDQ?",
    "PUTHASH",
    "PUTPROP",
    "PUTPROPS",
    "QUOTE",
    "QUOTIENT",
    "RADIX",
    "RAISE",
    "RAND",
    "RANDACCESSP",
    "RANDSET",
    "RATEST",
    "RATOM",
    "RATOMS",
    "READ",
    "READC",
    "READCOMMENT",
    "READFILE",
    "READLINE",
    "READMACROS",
    "READP",
    "READTABLEP",
    "READVISE",
    "REAL",
    "REALFRAMEP",
    "REALSTKNTH",
    "RECIPROCAL",
    "RECLOOK",
    "RECOMPILE",
    "RECORDACCESS",
    "RECORDFIELDNAMES",
    "REHASH",
    "RELSTK",
    "RELSTKP",
    "REMAINDER",
    "REMPROP",
    "REMPROPLIST",
    "REMOVE",
    "RENAME",
    "RENAMEFILE",
    "REPLACEFIELD",
    "RESET",
    "RESETFORM",
    "RESETLST",
    "RESETSAVE",
    "RESETTERMTABLE",
    "RESETUNDO",
    "RESETVAR",
    "RESETVARS",
    "RETAPPLY",
    "RETEVAL",
    "RETFROM",
    "RETTO",
    "RETURN",
    "REVERSE",
    "ROUNDED",
    "ROUNDTO",
    "RPAQ",
    "RPAQQ",
    "RPAQ?",
    "RPLACA",
    "RPLACD",
    "RPLCHARCODE",
    "RPLNODE",
    "RPLNODE2",
    "RPLSTRING",
    "RPT",
    "RPTQ",
    "RSH",
    "RSTRING",
    "SASSOC",
    "SAVEDEF",
    "SAVESET",
    "SAVESETQ",
    "SAVESETQQ",
    "SEARCHPDL",
    "SELCHARQ",
    "SELECTC",
    "SELECTION.SORT",
    "SELECTQ",
    "SEPRCASE",
    "SET",
    "SETA",
    "SETARG",
    "SETATOMVAL",
    "SETBRK",
    "SETCASEARRAY",
    "SETD",
    "SETERRORN",
    "SETFILEINFO",
    "SETFILEPTR",
    "SETLINELENGTH",
    "SETM",
    "SETPROPLIST",
    "SETQ",
    "SETQQ",
    "SETREADMACROFLG",
    "SETREADTABLE",
    "SETSEPR",
    "SETSTKNAME",
    "SETSYNONYM",
    "SETSYNTAX",
    "SETTERMTABLE",
    "SETTEMPLATE",
    "SETTOPVAL",
    "SHOWPRINT",
    "SHOWPRIN2",
    "SIGN",
    "SIN",
    "SINGLEFILEINDEX",
    "SKOR",
    "SKREAD",
    "SMALLP",
    "SMASHFILECOMS",
    "SOME",
    "SORT",
    "SPACES",
    "SPELLFILE",
    "SQRT",
    "STACKP",
    "STANDARD.DEVIATION",
    "STKAPPLY",
    "STKARGS",
    "STKEVAL",
    "STKNAME",
    "STKNTH",
    "STKNTHNAME",
    "STKPOS",
    "STKSCAN",
    "STORAGE",
    "STREQUAL",
    "STRING?",
    "STRMEMB",
    "STRPOS",
    "STRPOSL",
    "SUBATOM",
    "SUBLIS",
    "SUBPAIR",
    "SUBPR",
    "SUBRP",
    "SUBSET",
    "SUBST",
    "SUBSTITUTE.STRING",
    "SUBSTRING",
    "SUBl",
    "SYMBOLP",
    "SYNTAXP",
    "SYSIN",
    "SYSOUT",
    "SYSOUTP",
    "SYSPROPS",
    "SYSTEMTYPE",
    "TAB",
    "TAILP",
    "TAILP?",
    "TAN",
    "TCOMPL",
    "TCONC",
    "TERPRI",
    "TERMTABLEP",
    "TESTRELATION",
    "TIME",
    "TIMES",
    "TRACE",
    "TRANSPOSE",
    "TRIM",
    "TRUE",
    "TRUNCATE",
    "TYPESOF",
    "UNADVISE",
    "UNBREAK",
    "UNBREAKIN",
    "UNBREAK0",
    "UNDOLISPX",
    "UNDOLISPX1",
    "UNDONLSETQ",
    "UNION",
    "UNIQUE",
    "UNIQUE-UNION",
    "UNMARKASCHANGED",
    "UNPACK",
    "UNPACKFILENAME",
    "UNSAVEDEF",
    "UNSET",
    "UPDATEFN",
    "USERDATATYPES",
    "USEREXEC",
    "USERLISPXPRINT",
    "USERNAME",
    "U-CASE",
    "U-CASEP",
    "VALUEOF",
    "VARIABLES",
    "VARIANCE",
    "VIRGINFN",
    "WAITFORINPUT",
    "WHENCLOSE",
    "WHEREIS",
    "WRITEFILE",
    "ZERO",
    "ZEROP",
    "/MAPCONC",
    "/MOVD",
    "/PUTD",
    "/PUTPROP",
    "/REMPROP",
    "/RPLACA",
    "/RPLACD",
    0
};


const char*Builtins::variables[]= {
    "ADDSPELLFLG",
    "ADVISEDFNS",
    "AFTERSYSOUTFORMS",
    "ALAMS",
    "ARCHIVEFN",
    "ARCHIVELST",
    "BAKTRACELST",
    "BREAKRESETFORMS",
    "BRKCOMS",
    "BRKDW NTYPE",
    "BRKINFOLST",
    "BROKENFNS",
    "BUILDMAPFLG",
    "CHANGECHAR",
    "CLISPARRAY",
    "CLISPFLG",
    "CLISPHELPFLG",
    "CLISPIFTRANFLG",
    "CLISPIFYENGLSHFLG",
    "CLISPIFYPACKFLG",
    "CLISPIFYPRETTYFLG",
    "CLISPIFYUSERFN",
    "CLISPRETRANFLG",
    "CLREMPARSFLG",
    "CL:FLG",
    "COMMENTFLG",
    "COMPILETYPELST",
    "COMPILEUSERFN",
    "DFNFLG",
    "DIRCOMMANDS",
    "DISMISSINIT",
    "DISMISSMAX",
    "DWIMCHECKMRGSFLG",
    "DWMCHECKPROGLABELSFLG",
    "DWIMFLG",
    "DWIMIFYCOMPFLG",
    "DWIMIFYCOMPILEFLG",
    "DWIMIFYFLG",
    "DWIMLOADFNSFLG",
    "DWIMMESSGAG",
    "DWIMUSERFORMS",
    "DWIMWAIT",
    "EDITHISTORY",
    "EDITRDTBL",
    "ERRORTYPELST",
    "FAULTAPPLYFLG",
    "FAULTARGS",
    "FAULTFN",
    "FAULTX",
    "FILELST",
    "FILEPKGFLG",
    "FILERDTBL",
    "FIRSTCOL",
    "FIXSPELLDEFAULT",
    "FIXSPELLREL",
    "FUNNYATOMLST",
    "GAINSPACEFORMS",
    "GENNUM",
    "GREETDATES",
    "HELPCLOCK",
    "HELPDEPTH",
    "HELPTIME",
    "HISTORYSAVEFORMS",
    "IT",
    "LAMS",
    "LAPFLG",
    "LCFIL",
    "LISPXCOMS",
    "LISPXFINDSPLST",
    "LISPXFNS",
    "LISPXHISTORY",
    "LISPXHISTORYMACROS",
    "LISPXPRINTFLAG",
    "LISPXUSERFN",
    "LOADEDFILELST",
    "LSTFIL",
    "MAXLEVEL",
    "MAX.FIXP",
    "MAX.FLOATP",
    "MAX.SMALLP",
    "MIN.FIXP",
    "MIN.FLOATP",
    "MIN.SMALLP",
    "NLAMA",
    "NLAMS",
    "NOFIXFNSLST",
    "NOFIXVARSLST",
    "NOSPELLFLG",
    "NOTCOM PILEDFILES",
    "NOTLISTEDFILES",
    "PARENT",
    "PRETTYEQUIVLST",
    "PRETTYFLG",
    "PRETTYPRINTMACROS",
    "PRETTYPRINTTYPEM ACROS",
    "PRETTYTABFLG",
    "PROMPTCHARFORMS",
    "PROMPT#FLG",
    "RESETFORM S",
    "RUNONFLG",
    "SPELLINGSl",
    "SPELLINGS2",
    "SPELLINGS3",
    "STRF",
    "SVFLG",
    "SYSHASHARRAY",
    "SYSTATS",
    "TAIL",
    "TYPE-IN?",
    "USEMAPFLG",
    "USERINTERRUPTS",
    "USERWORDS",
    "IVALUE",
    "**COMMENT**FLG",
    "#CAREFULCOLUMNS",
    "#RPARS",
    0
};