Changeset 13091


Ignore:
Timestamp:
Oct 22, 2009, 10:02:39 PM (10 years ago)
Author:
gz
Message:

Add test for symbol-macrolet/special interaction

File:
1 edited

Legend:

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

    r13088 r13091  
    15721572      t)
    15731573  t)
     1574
     1575(deftest ccl.symbol-macrolet-special
     1576    (let ((x :special))
     1577      (declare (special x))
     1578      (symbol-macrolet ((x :symbol-macro))
     1579        (values x (locally (declare (special x)) x))))
     1580  :symbol-macro
     1581  :special)
Note: See TracChangeset for help on using the changeset viewer.