diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-10-31 09:41:05 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2022-10-31 09:42:48 -0400 |
| commit | b3cebbf31cb96c1ef402a4dbd617805423b51593 (patch) | |
| tree | bdb6c53ad467178554cfbf1777c8c2a413d090f5 /rts/Task.c | |
| parent | 270037faa124bf59dda8ba4f3d73b97d4c109a5f (diff) | |
| download | haskell-wip/program-invocation-short-name.tar.gz | |
rts: Check for program_invocation_short_name via autoconfwip/program-invocation-short-name
Instead of assuming support on all Linuxes.
Diffstat (limited to 'rts/Task.c')
| -rw-r--r-- | rts/Task.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Task.c b/rts/Task.c index 5c6d3cdf44..6dbc597769 100644 --- a/rts/Task.c +++ b/rts/Task.c @@ -477,7 +477,7 @@ startWorkerTask (Capability *cap) // Set the name of the worker thread to the original process name followed by // ":w", but only if we're on Linux where the program_invocation_short_name // global is available. -#if defined(linux_HOST_OS) +#if defined(HAVE_PROGRAM_INVOCATION_SHORT_NAME) size_t procname_len = strlen(program_invocation_short_name); char worker_name[16]; // The kernel only allocates 16 bytes for thread names, so we truncate if the |