diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-07-10 15:14:06 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-07-10 15:14:06 +0000 |
| commit | d9f20043f1bff6d3731e62de4db4d98fcff57498 (patch) | |
| tree | af52a1c17cfe5977f0c01e1f141e70c4c58df315 /rts/Linker.c | |
| parent | a5b95b1f569d05b2a04583ff6042add3efaaefc3 (diff) | |
| download | haskell-d9f20043f1bff6d3731e62de4db4d98fcff57498.tar.gz | |
add threadStatus# primop, for querying the status of a ThreadId#
Diffstat (limited to 'rts/Linker.c')
| -rw-r--r-- | rts/Linker.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index d1550e1eb5..318b3f070d 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -768,6 +768,7 @@ typedef struct _RtsSymbolVal { SymX(stg_upd_frame_info) \ SymX(suspendThread) \ SymX(takeMVarzh_fast) \ + SymX(threadStatuszh_fast) \ SymX(timesIntegerzh_fast) \ SymX(tryPutMVarzh_fast) \ SymX(tryTakeMVarzh_fast) \ |