summaryrefslogtreecommitdiff
path: root/rts/RtsFlags.c
diff options
context:
space:
mode:
authorBen Gamari <bgamari.foss@gmail.com>2018-05-03 12:42:24 -0400
committerBen Gamari <ben@smart-cactus.org>2018-05-03 15:01:17 -0400
commit6462d90d01bcb07b8bff63689e8f2c8c20044952 (patch)
treee198502f5c132160ef888c24196625a910bb525e /rts/RtsFlags.c
parent721e82644b49da59e84c409562a63e7df75068bb (diff)
downloadhaskell-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.c6
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] == '=') {