[project @ 1998-12-02 13:17:09 by simonm]
[ghc-hetmet.git] / ghc / interpreter / command.h
1 /* --------------------------------------------------------------------------
2  * Interpreter command structure
3  *
4  * Copyright (c) The University of Nottingham and Yale University, 1994-1997.
5  * All rights reserved. See NOTICE for details and conditions of use etc...
6  * Hugs version 1.4, December 1997
7  *
8  * $RCSfile: command.h,v $
9  * $Revision: 1.2 $
10  * $Date: 1998/12/02 13:22:01 $
11  * ------------------------------------------------------------------------*/
12
13 typedef Int Command;
14
15 struct cmd {
16     String cmdString;
17     Command cmdCode;
18 };
19
20 extern Command readCommand Args((struct cmd *, Char, Char));
21
22 #define EDIT    0
23 #define FIND    1
24 #define LOAD    2
25 #define ALSO    3
26 #define PROJECT 4
27 #define RELOAD  5
28 #define EVAL    6
29 #define TYPEOF  7
30 #define HELP    8
31 #define NAMES   9
32 #define BADCMD  10
33 #define SET     11
34 #define QUIT    12
35 #define SYSTEM  13
36 #define CHGDIR  14
37 #define INFO    15
38 #define COLLECT 16
39 #define SETMODULE 17
40 #define SHOWVERSION 18
41 #define NOCMD   19
42
43 /*-------------------------------------------------------------------------*/