X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fprofile.impure.lisp;h=95e4b7fcffc92e7097d76088b9acc5c066ba730e;hb=cf49f2d086069a9c1b57f501df9a6a0bd3a34c3c;hp=721fdeb9990efef58464f83800273a8dbb987c4f;hpb=eaeb81412400357c49efb44bdb257576c872be05;p=sbcl.git

diff --git a/tests/profile.impure.lisp b/tests/profile.impure.lisp
index 721fdeb..95e4b7f 100644
--- a/tests/profile.impure.lisp
+++ b/tests/profile.impure.lisp
@@ -80,7 +80,7 @@
 
 (in-package :cl-user)
 
-(with-test (:name (profile threads))
+(with-test (:name (profile :threads))
   (profile "PROFILE-TEST")
   ;; This used to signal an error with threads
   (let* ((n #+sb-thread 5 #-sb-thread 1)