diff options
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) */ |