Ignore:
Timestamp:
Oct 18, 2010, 10:36:38 PM (9 years ago)
Author:
gz
Message:

Don't muffle warnings when running test, as that affects the return values from compile-file. Tweak tests to not cause warnings

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tests/ansi-tests/add-method.lsp

    r8991 r14368  
    3434(deftest add-method.error.3
    3535  (let* ((gf (eval '(defgeneric add-method-gf-05 (x &optional y)
    36                       (:method ((x t) &optional y) 'a))))
     36                      (:method ((x t) &optional y) y 'a))))
    3737         (method (find-method #'add-method-gf-05 nil (list (find-class t))))
    3838         (gf2 (eval '(defgeneric add-method-gf-06 (x y)))))
     
    7575(deftest add-method.error.8
    7676  (let* ((gf (eval '(defgeneric add-method-gf-11 (x &key y)
    77                       (:method ((x t) &key y) 'a))))
     77                      (:method ((x t) &key y) y 'a))))
    7878         (method (find-method #'add-method-gf-11 nil (list (find-class t))))
    7979         (gf2 (eval '(defgeneric add-method-gf-12 (x)))))
Note: See TracChangeset for help on using the changeset viewer.