diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-09-24 17:00:30 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-09-24 17:00:30 +0200 |
| commit | 417ac76fc4b289f5135680ee7300fee2dd31f1e6 (patch) | |
| tree | db0901f65843dc04573d75c2727be797a76de096 /Lisp/compiler-macros.lisp | |
| parent | 0544272da832227ad04ae1a48c478a166e81077d (diff) | |
Fix condition signalling.
darcs-hash:d14fd897e9b232e09261823625f1083b6d37aa11
Diffstat (limited to 'Lisp/compiler-macros.lisp')
| -rw-r--r-- | Lisp/compiler-macros.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Lisp/compiler-macros.lisp b/Lisp/compiler-macros.lisp index ba29c2d..2661687 100644 --- a/Lisp/compiler-macros.lisp +++ b/Lisp/compiler-macros.lisp @@ -15,7 +15,7 @@ (serious-condition () (warn (make-condition - 'style-warning + 'simple-style-warning :format-control "~S designates an unknown ~ method selector." @@ -38,7 +38,7 @@ (selector ,method-name) (serious-condition () (warn - (make-condition 'style-warning + (make-condition 'simple-style-warning :format-control "~S designates an unknown ~ method selector." @@ -60,7 +60,7 @@ (selector ',method-name) (serious-condition () (warn - (make-condition 'style-warning + (make-condition 'simple-style-warning :format-control "~S designates an unknown ~ method selector." |