Commit 4864e9d7 authored by mthomas's avatar mthomas
Browse files

[project @ 2003-02-01 09:10:16 by mthomas]

Initialize stp->n_to_blocks as 0.  Add function for MinGW32 in Signals.c.
parent cfb71762
/* -----------------------------------------------------------------------------
* $Id: Signals.c,v 1.33 2003/01/25 15:54:50 wolfgang Exp $
* $Id: Signals.c,v 1.34 2003/02/01 09:10:16 mthomas Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -473,5 +473,18 @@ initDefaultHandlers()
ieee_set_fp_control(0);
#endif
}
#else /* mingw32_TARGET_OS */
#endif /*! mingw32_TARGET_OS */
// Handle all signals in the current thread.
// Called from Capability.c whenever the main capability is granted to a thread
// and in installDefaultHandlers
void
handleSignalsInThisThread()
{
#ifdef RTS_SUPPORTS_THREADS
#error "handleSignalsInThread needs to be sorted out for MinGW32"
/* signalHandlingThread = pthread_self();*/
#endif
}
#endif /* mingw32_TARGET_OS */
/* -----------------------------------------------------------------------------
* $Id: Storage.c,v 1.75 2003/01/29 10:28:56 simonmar Exp $
* $Id: Storage.c,v 1.76 2003/02/01 09:10:17 mthomas Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -148,6 +148,7 @@ initStorage( void )
stp = &generations[g].steps[s];
stp->no = s;
stp->blocks = NULL;
stp->n_to_blocks = 0;
stp->n_blocks = 0;
stp->gen = &generations[g];
stp->gen_no = g;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment