diff --git a/src/clos/conditions.lsp b/src/clos/conditions.lsp
index 02179c3bc..6760b82e6 100644
--- a/src/clos/conditions.lsp
+++ b/src/clos/conditions.lsp
@@ -527,6 +527,8 @@ returns with NIL."
 
 (define-condition style-warning (warning) ())
 
+(define-condition simple-style-warning (style-warning simple-condition) ())
+
 (define-condition simple-error (simple-condition error) ())
 
 (define-condition storage-condition (serious-condition) ())