Changeset 12853 for trunk/tests


Ignore:
Timestamp:
Sep 21, 2009, 12:47:57 PM (10 years ago)
Author:
gz
Message:

add test for ticket #592; conditionalize out some tests not in trunk yet

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tests/ansi-tests/ccl.lsp

    r12586 r12853  
    14751475
    14761476
     1477#+ccl-0711 (progn ;; not merged yet
    14771478(deftest ccl.61783-1
    14781479    (test-compiler-warning "(defgeneric ccl.61783-1 (x y))
     
    15261527                            (defgeneric ccl.61783-6-rev (x &key a &allow-other-keys))")
    15271528  ())
    1528 
    1529 
     1529) ;; #+ccl-0711
     1530
     1531
     1532(deftest ccl.bug#592
     1533    (test-compiler-warning "(macrolet ((tag () 1))
     1534                              (eval-when (:compile-toplevel :load-toplevel :execute)
     1535                                (assert (= 1 (tag)))))")
     1536  ())
Note: See TracChangeset for help on using the changeset viewer.