Changeset 12560 for trunk/tests


Ignore:
Timestamp:
Aug 10, 2009, 1:17:14 PM (10 years ago)
Author:
gz
Message:

a few regression tests

File:
1 edited

Legend:

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

    r12553 r12560  
    10551055          (values (read-from-string (prin1-to-string "123456789012345")))))
    10561056  "123456789012345")
     1057
     1058(deftest ccl.63842a
     1059    (test-compiler-warning "(defun ccl.63842a-1 () (declare (inline ccl.63842a-2)))")
     1060  (:unknown-declaration-function))
     1061
     1062(deftest ccl.63842b
     1063    (test-compiler-warning "(defun ccl.63842b-1 () (declare (dynamic-extent #'ccl.63842b-2)))")
     1064  (:unknown-declaration-function))
    10571065
    10581066(deftest ccl.decl.1
     
    14481456
    14491457
     1458;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     1459
     1460(deftest ccl.56248a
     1461    (test-compiler-warning "(defmacro ccl.56248a (&whole whole) t)")
     1462  (:unused))
     1463
     1464(deftest ccl.56248b
     1465    (test-compiler-warning "(defmacro ccl.56248b (&environment env) t)")
     1466  (:unused))
Note: See TracChangeset for help on using the changeset viewer.