# --------------------------------------------------------------------------- #
-# $Id: Makefile,v 1.29 2000/03/31 04:13:27 andy Exp $ #
+# $Id: Makefile,v 1.30 2000/04/03 17:27:10 sewardj Exp $ #
# --------------------------------------------------------------------------- #
TOP = ..
### EXTREMELY hacky
hugs: $(C_OBJS) ../rts/Sanity.o ../rts/Assembler.o ../rts/Disassembler.o \
../rts/Evaluator.o ../rts/ForeignCall.o ../rts/GC.o ../rts/Printer.o \
- ../rts/StgCRun.o ../rts/PrimOps.o ../rts/libHSrts.a
+ ../rts/StgCRun.o ../rts/PrimOps.o ../rts/Prelude.o ../rts/libHSrts.a
$(CC) -o $@ $(CC_OPTS) $^ $(GHC_LIBS_NEEDED) \
-lbfd -liberty $(LIB_READLINE) $(LIB_DL) \
$(LIB_GMP) -lm
* included in the distribution.
*
* $RCSfile: machdep.c,v $
- * $Revision: 1.24 $
- * $Date: 2000/03/24 14:51:50 $
+ * $Revision: 1.25 $
+ * $Date: 2000/04/03 17:27:10 $
* ------------------------------------------------------------------------*/
#ifdef HAVE_SIGNAL_H
strcpy(searchBuf+nPath, ".u_hi");
if (readable(searchBuf)) {
*iAvail = TRUE;
+ *sExt = ".u_hi";
getFileInfo(searchBuf, iTime, iSize);
}
/* -----------------------------------------------------------------------------
- * $Id: Prelude.c,v 1.4 2000/03/24 15:19:29 sewardj Exp $
+ * $Id: Prelude.c,v 1.5 2000/04/03 17:27:10 sewardj Exp $
*
* (c) The GHC Team, 1998-2000
*
#include "Prelude.h"
#if defined(INTERPRETER)
-const StgClosure *ind_True_static_closure;
-const StgClosure *ind_False_static_closure;
+const StgClosure *ind_True_closure;
+const StgClosure *ind_False_closure;
const StgClosure *ind_unpackCString_closure;
const StgClosure *ind_stackOverflow_closure;
const StgClosure *ind_heapOverflow_closure;
-const StgClosure *ind_PutFullMVar_static_closure;
+const StgClosure *ind_PutFullMVar_closure;
const StgClosure *ind_BlockedOnDeadMVar_closure;
const StgClosure *ind_NonTermination_closure;
const StgClosure *ind_mainIO_closure;
if (ask_hugs_dynamic_linker == NULL) {
/* Hugs standalone mode. */
- ind_True_static_closure = NULL; /* True_static_closure; */
- ind_False_static_closure = NULL; /* False_static_closure; */
- ind_PutFullMVar_static_closure = NULL; /* PutFullMVar_static_closure; */
- ind_BlockedOnDeadMVar_closure = NULL; /* BlockedOnDeadMVar_static_closure; */
- ind_NonTermination_closure = NULL; /* NonTermination_static_closure; */
+ ind_True_closure = NULL; /* True__closure; */
+ ind_False_closure = NULL; /* False_closure; */
+ ind_PutFullMVar_closure = NULL; /* PutFullMVar_closure; */
+ ind_BlockedOnDeadMVar_closure = NULL; /* BlockedOnDeadMVar_closure; */
+ ind_NonTermination_closure = NULL; /* NonTermination_closure; */
ind_unpackCString_closure = NULL; /* unpackCString_closure; */
ind_stackOverflow_closure = stackOverflow_closure;
/* Hugs combined mode. */
void*(*ask)(char*) = ask_hugs_dynamic_linker;
- ind_True_static_closure
- = ask("PrelBase_True_static_closure");
- ind_False_static_closure
- = ask("PrelBase_False_static_closure");
- ind_PutFullMVar_static_closure
- = ask("PrelException_PutFullMVar_static_closure");
+ ind_True_closure
+ = ask("PrelBase_True_closure");
+ ind_False_closure
+ = ask("PrelBase_False_closure");
+ ind_PutFullMVar_closure
+ = ask("PrelException_PutFullMVar_closure");
ind_BlockedOnDeadMVar_closure
= ask("PrelException_BlockedOnDeadMVar_closure");
ind_NonTermination_closure