diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-12-07 15:46:27 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-12-07 16:06:42 +0000 |
| commit | 8b48562e8cd773b4bc162edb4fc6d05a7654c7e1 (patch) | |
| tree | 19bb15c2af5bee9f8fa12a071ebb5fd824b18ee5 /rts | |
| parent | eea40328004e3cad1fdd31004337e10e6ae5fc52 (diff) | |
| download | haskell-8b48562e8cd773b4bc162edb4fc6d05a7654c7e1.tar.gz | |
Define getNumberOfProcessors() even when !THREADED_RTS
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Linker.c | 1 | ||||
| -rw-r--r-- | rts/posix/OSThreads.c | 7 | ||||
| -rw-r--r-- | rts/win32/OSThreads.c | 5 |
3 files changed, 12 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index f45c105bdc..7e3c7b1167 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -850,6 +850,7 @@ typedef struct _RtsSymbolVal { SymI_HasProto(stg_readTVarIOzh) \ SymI_HasProto(resumeThread) \ SymI_HasProto(setNumCapabilities) \ + SymI_HasProto(getNumberOfProcessors) \ SymI_HasProto(resolveObjs) \ SymI_HasProto(stg_retryzh) \ SymI_HasProto(rts_apply) \ diff --git a/rts/posix/OSThreads.c b/rts/posix/OSThreads.c index e25cdc1e81..b1be93d04b 100644 --- a/rts/posix/OSThreads.c +++ b/rts/posix/OSThreads.c @@ -308,4 +308,9 @@ forkOS_createThread ( HsStablePtr entry STG_UNUSED ) return -1; } -#endif /* !defined(THREADED_RTS) */ +nat getNumberOfProcessors (void) +{ + return 1; +} + +#endif diff --git a/rts/win32/OSThreads.c b/rts/win32/OSThreads.c index c85dd2f854..fe24babb8b 100644 --- a/rts/win32/OSThreads.c +++ b/rts/win32/OSThreads.c @@ -308,4 +308,9 @@ forkOS_createThread ( HsStablePtr entry STG_UNUSED ) return -1; } +nat getNumberOfProcessors (void) +{ + return 1; +} + #endif /* !defined(THREADED_RTS) */ |