[project @ 2000-03-08 22:05:43 by andy]
[ghc-hetmet.git] / ghc / interpreter / command.h
index b6a1018..f2f30fb 100644 (file)
@@ -1,14 +1,15 @@
 /* --------------------------------------------------------------------------
  * Interpreter command structure
  *
- * Hugs 98 is Copyright (c) Mark P Jones, Alastair Reid and the Yale
- * Haskell Group 1994-99, and is distributed as Open Source software
- * under the Artistic License; see the file "Artistic" that is included
- * in the distribution for details.
+ * 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.
  *
  * $RCSfile: command.h,v $
- * $Revision: 1.4 $
- * $Date: 1999/04/27 10:06:48 $
+ * $Revision: 1.6 $
+ * $Date: 1999/10/15 22:35:05 $
  * ------------------------------------------------------------------------*/
 
 typedef Int Command;
@@ -40,6 +41,9 @@ extern Command readCommand Args((struct cmd *, Char, Char));
 #define SETMODULE 17
 #define DUMP    18
 #define STATS   19
-#define NOCMD   20
+#define BROWSE  20
+#define XPLAIN  21
+#define PNTVER  22
+#define NOCMD   23
 
 /*-------------------------------------------------------------------------*/