[project @ 1999-02-09 09:43:08 by simonm]

[ghc-hetmet.git] / ghc / interpreter / stgSubst.c

diff --git a/ghc/interpreter/stgSubst.c b/ghc/interpreter/stgSubst.c
index ccf0512..7b3d978 100644 (file)
--- a/ghc/interpreter/stgSubst.c
+++ b/ghc/interpreter/stgSubst.c
@@ -1,4 +1,4 @@
-/* -*- mode: hugs-c; -*- */
+
 /* --------------------------------------------------------------------------
  * Substitute variables in an expression
  *
@@ -7,17 +7,15 @@
  * Hugs version 1.4, December 1997
  *
  * $RCSfile: stgSubst.c,v $
- * $Revision: 1.2 $
- * $Date: 1998/12/02 13:22:40 $
+ * $Revision: 1.3 $
+ * $Date: 1999/02/03 17:08:40 $
  * ------------------------------------------------------------------------*/
 
 #include "prelude.h"
 #include "storage.h"
+#include "backend.h"
 #include "connect.h"
 #include "errors.h"
-#include "stg.h"
-
-#include "stgSubst.h"
 
 /* --------------------------------------------------------------------------
  * Local function prototypes: