diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-03-30 10:19:34 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-03-30 10:19:34 +0000 |
| commit | 035b8ebb5405efbcbfd3474821a877add1feca1e (patch) | |
| tree | 21268304729a0b1f118593ae912516a0d3070308 /rts/RtsUtils.h | |
| parent | 41147ad2a9ca84ebe66386b3b0043cb7b48ddcd8 (diff) | |
| download | haskell-035b8ebb5405efbcbfd3474821a877add1feca1e.tar.gz | |
Add a debug check for a non-empty FPU stack on x86 (see #4914)
Diffstat (limited to 'rts/RtsUtils.h')
| -rw-r--r-- | rts/RtsUtils.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h index 1bf840bb88..b571126828 100644 --- a/rts/RtsUtils.h +++ b/rts/RtsUtils.h @@ -46,6 +46,8 @@ void printRtsInfo(void); /* Alternate to raise(3) for threaded rts, for OpenBSD */ int genericRaise(int sig); +void checkFPUStack(void); + #include "EndPrivate.h" #endif /* RTSUTILS_H */ |