summaryrefslogtreecommitdiff
path: root/tests/parallel-exec.sh
diff options
context:
space:
mode:
authorDouglas Katzman <dougk@google.com>2019-12-16 10:23:12 -0500
committerDouglas Katzman <dougk@google.com>2019-12-16 10:23:12 -0500
commit79337ab44c83d454aa88c9f24afb88041a2a06b8 (patch)
tree406f25851169a9fcf9f7e7853a23c65528eaa094 /tests/parallel-exec.sh
parentc926a1366c42e460d2f7ea6997a98b928af89178 (diff)
Move a test and mark it known failing in parallel-exec
Diffstat (limited to 'tests/parallel-exec.sh')
-rwxr-xr-xtests/parallel-exec.sh7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/parallel-exec.sh b/tests/parallel-exec.sh
index cfde914fa..d39fff831 100755
--- a/tests/parallel-exec.sh
+++ b/tests/parallel-exec.sh
@@ -77,9 +77,10 @@ TEST_DIRECTORY=/var/tmp/junk SBCL_HOME=../obj/sbcl-home exec ../src/runtime/sbcl
(alien-funcall (extern-alien "_exit" (function (values) int)) 0))
(t
(setq sb-c::*static-vop-usage-counts* (make-hash-table))
- (pure-runner (list (concatenate 'string file ".lisp"))
- (if (search "-cload" file) 'cload-test 'load-test)
- (make-broadcast-stream))
+ (let ((*features* (cons :parallel-test-runner *features*)))
+ (pure-runner (list (concatenate 'string file ".lisp"))
+ (if (search "-cload" file) 'cload-test 'load-test)
+ (make-broadcast-stream)))
(with-open-file (output (format nil "$logdir/~a.vop-usage" file)
:direction :output)
(sb-int:dohash ((name count) sb-c::*static-vop-usage-counts*)