/*Copyright (C) 1993, 1996 by Thomas Glen Smith. All Rights Reserved.*/ /* aplwkcm.h APL2 V1.0.0 *********************************************** * Table used in aplwksp to identify apl commands that start with a * * right parenthesis, e.g. )SAVE. * ***********************************************************************/ static int clear[] = { APL_C, APL_L, APL_E, APL_A, APL_R, 999}; static int copy[] = { APL_C, APL_O, APL_P, APL_Y, 999}; static int drop[] = { APL_D, APL_R, APL_O, APL_P, 999}; static int erase[] = { APL_E, APL_R, APL_A, APL_S, APL_E, 999}; static int fns[] = { APL_F, APL_N, APL_S, 999}; static int group[] = { APL_G, APL_R, APL_O, APL_U, APL_P, 999}; static int grp[] = { APL_G, APL_R, APL_P, 999}; static int grps[] = { APL_G, APL_R, APL_P, APL_S, 999}; static int lib[] = { APL_L, APL_I, APL_B, 999}; static int load[] = { APL_L, APL_O, APL_A, APL_D, 999}; static int off[] = { APL_O, APL_F, APL_F, 999}; static int pcopy[] = { APL_P, APL_C, APL_O, APL_P, APL_Y, 999}; static int read[] = { APL_R, APL_E, APL_A, APL_D, 999}; static int run[] = { APL_R, APL_U, APL_N, 999}; static int save[] = { APL_S, APL_A, APL_V, APL_E, 999}; static int si[] = { APL_S, APL_I, 999}; static int sinl[] = { APL_S, APL_I, APL_N, APL_L, 999}; static int vars[] = { APL_V, APL_A, APL_R, APL_S, 999}; static int write[] = { APL_W, APL_R, APL_I, APL_T, APL_E, 999}; static int wsid[] = { APL_W, APL_S, APL_I, APL_D, 999}; static int *table[] = { clear, copy, drop, erase, fns, group, grp, grps, lib, load, off, pcopy, read, run, save, si, sinl, vars, write, wsid, NULL };