diff options
-rw-r--r-- | swank-client-test.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/swank-client-test.lisp b/swank-client-test.lisp index d8c83eb..d5385d3 100644 --- a/swank-client-test.lisp +++ b/swank-client-test.lisp @@ -67,7 +67,7 @@ (let* ((server-ports (loop repeat +server-count+ collect (create-swank-server))) (connections (loop for port in server-ports collect (slime-connect "localhost" port))) (work (make-array +server-count+ - :initial-contents (loop for i from 2 collect i repeat +server-count+))) + :initial-contents (loop for i from 2 repeat +server-count+ collect i))) (golden (map 'vector (lambda (x) (* x 2)) work))) (unwind-protect (let ((results (make-array +server-count+ :initial-element nil)) |