diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2018-05-03 12:42:24 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-05-03 15:01:17 -0400 |
commit | 6462d90d01bcb07b8bff63689e8f2c8c20044952 (patch) | |
tree | e198502f5c132160ef888c24196625a910bb525e /rts/RtsFlags.c | |
parent | 721e82644b49da59e84c409562a63e7df75068bb (diff) | |
download | haskell-6462d90d01bcb07b8bff63689e8f2c8c20044952.tar.gz |
rts: Throw better error if --numa is used without libnuma support
Test Plan: Validate, run program with `+RTS --numa` without libnuma
support compiled in
Reviewers: erikd, simonmar
Subscribers: thomie, carter
GHC Trac Issues: #14956
Differential Revision: https://phabricator.haskell.org/D4556
Diffstat (limited to 'rts/RtsFlags.c')
-rw-r--r-- | rts/RtsFlags.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c index 461c41643c..7c292d2044 100644 --- a/rts/RtsFlags.c +++ b/rts/RtsFlags.c @@ -906,6 +906,12 @@ error = true; } #if defined(THREADED_RTS) else if (!strncmp("numa", &rts_argv[arg][2], 4)) { + if (!osBuiltWithNumaSupport()) { + errorBelch("%s: This GHC build was compiled without NUMA support.", + rts_argv[arg]); + error = true; + break; + } OPTION_SAFE; StgWord mask; if (rts_argv[arg][6] == '=') { |