Parent Directory | Revision Log | Patch
revision 1.9 by pfdietz, Sun May 4 12:34:11 2003 UTC | revision 1.10 by pfdietz, Sun May 4 13:37:08 2003 UTC | |
---|---|---|
# | Line 101 | Line 101 |
101 | 1 2 3) | 1 2 3) |
102 | ||
103 | (deftest destructuring-bind.22 | (deftest destructuring-bind.22 |
104 | (destructuring-bind (x y &key) '(1 2) (values x y)) | (destructuring-bind (x y &key) '(:a 2) (values x y)) |
105 | 1 2) | :a 2) |
106 | ||
107 | (deftest destructuring-bind.23 | (deftest destructuring-bind.23 |
108 | (destructuring-bind (&rest x &key) '(1) x) | (destructuring-bind (&rest x &key) '(:allow-other-keys 1) x) |
109 | (1)) | (:allow-other-keys 1)) |
110 | ||
111 | ;;; Error cases | ;;; Error cases |
112 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |