command.h 1.23 KB
Newer Older
1 2 3
/* --------------------------------------------------------------------------
 * Interpreter command structure
 *
andy's avatar
andy committed
4 5 6 7 8
 * The Hugs 98 system is Copyright (c) Mark P Jones, Alastair Reid, the
 * Yale Haskell Group, and the Oregon Graduate Institute of Science and
 * Technology, 1994-1999, All rights reserved.  It is distributed as
 * free software under the license in the file "License", which is
 * included in the distribution.
9 10
 *
 * $RCSfile: command.h,v $
andy's avatar
andy committed
11 12
 * $Revision: 1.6 $
 * $Date: 1999/10/15 22:35:05 $
13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
 * ------------------------------------------------------------------------*/

typedef Int Command;

struct cmd {
    String cmdString;
    Command cmdCode;
};

extern Command readCommand Args((struct cmd *, Char, Char));

#define EDIT    0
#define FIND    1
#define LOAD    2
#define ALSO    3
#define PROJECT 4
#define RELOAD  5
#define EVAL    6
#define TYPEOF  7
#define HELP    8
#define NAMES   9
#define BADCMD  10
#define SET     11
#define QUIT    12
#define SYSTEM  13
#define CHGDIR  14
#define INFO    15
#define COLLECT 16
#define SETMODULE 17
42 43
#define DUMP    18
#define STATS   19
andy's avatar
andy committed
44 45 46 47
#define BROWSE  20
#define XPLAIN  21
#define PNTVER  22
#define NOCMD   23
48 49

/*-------------------------------------------------------------------------*/