[project @ 1996-01-08 20:28:12 by partain]

[ghc-hetmet.git] / ghc / runtime / main / TopClosure.lc

diff --git a/ghc/runtime/main/TopClosure.lc b/ghc/runtime/main/TopClosure.lc
new file mode 100644 (file)
index 0000000..e2d670c
--- /dev/null
+++ b/ghc/runtime/main/TopClosure.lc
@@ -0,0 +1,8 @@
+/* this one will be linked in for Haskell 1.2 */
+\begin{code}
+#include "rtsdefs.h"
+
+EXTDATA(Main_mainPrimIO_closure);
+
+P_ TopClosure = Main_mainPrimIO_closure;
+\end{code}