diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/aprof.impure.lisp | 3 | ||||
-rwxr-xr-x | tests/parallel-exec.sh | 4 |
2 files changed, 4 insertions, 3 deletions
diff --git a/tests/aprof.impure.lisp b/tests/aprof.impure.lisp index a0e5c8bce..d34fce44b 100644 --- a/tests/aprof.impure.lisp +++ b/tests/aprof.impure.lisp @@ -97,8 +97,7 @@ sb-vm:: (declare (optimize sb-c::instrument-consing)) (list* (load-time-value(gensym)) :if-exists x)) -(import '(sb-vm::thread-base-tn - sb-vm::thread-boxed-tlab-slot sb-vm::thread-unboxed-tlab-slot +(import '(sb-vm::thread-boxed-tlab-slot sb-vm::thread-unboxed-tlab-slot sb-vm::rcx-tn sb-vm::rbp-tn sb-vm::r9-tn sb-vm::r10-tn sb-vm::rsi-tn sb-vm:cons-size sb-vm:n-word-bytes sb-vm::ea sb-vm:nil-value 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)) |