소스 검색

test suite: cosmetic changes

Anton Vodonosov 13 년 전
부모
커밋
6fc1ce884f
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      test/test.lisp

+ 1 - 1
test/test.lisp

@@ -19,7 +19,7 @@
     (handler-bind ((invoked (lambda (i)
                               (let ((invocation (cons (method i) (args i))))
                                 (when (equalp invocation expected-invocation)
-                                  (return-from assert-invoked-impl nil))
+                                  (RETURN-FROM assert-invoked-impl nil))
                                 (push invocation actual-invocations)))))
       (funcall body-fn))
     (let ((*package* (find-package :keyword))) ; ensures package prefixes are printed