summaryrefslogtreecommitdiff
path: root/tests/parallel-exec.sh
diff options
context:
space:
mode:
authorDouglas Katzman <dougk@google.com>2021-10-16 11:15:35 -0400
committerDouglas Katzman <dougk@google.com>2021-10-16 11:34:41 -0400
commit5c71a94cb756c5908fecda771c06e20691035311 (patch)
treec5015531fd5f83f49b2a699e4d921f2920e8c834 /tests/parallel-exec.sh
parent860f9efd8a78cb0c5c364c382ca3d8c58573fb90 (diff)
x86-64: optionally use GS segment as thread base
Use #+gs-segment-thread feature to enable. This will need performance testing. Allocations take at least 25 bytes more to encode because of the segment override prefix (which incurs extra latency from my understanding) and the 4-byte displacement for memory absolute addressing mode.
Diffstat (limited to 'tests/parallel-exec.sh')
-rwxr-xr-xtests/parallel-exec.sh4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/parallel-exec.sh b/tests/parallel-exec.sh
index 020417259..d95c51ff9 100755
--- a/tests/parallel-exec.sh
+++ b/tests/parallel-exec.sh
@@ -29,7 +29,9 @@ TEST_DIRECTORY=$junkdir SBCL_HOME=../obj/sbcl-home exec ../src/runtime/sbcl \
(require :sb-sprof)
(let ((*evaluator-mode* :compile))
(with-compilation-unit () (load"run-tests")))
-#+(and x86-64 linux sb-thread) (push :test-aprof *features*)
+#+(and x86-64 linux sb-thread)
+ (unless (find :gs-segment-thread sb-impl:+internal-features+)
+ (push :test-aprof *features*))
(in-package run-tests)
(import '(sb-alien:alien-funcall sb-alien:extern-alien
sb-alien:int sb-alien:c-string sb-alien:unsigned))