Commit 5c0bf9d0 authored by Attila Lendvai's avatar Attila Lendvai

Merge conflicts around the conditions

parent 95f39525
......@@ -5,3 +5,17 @@
use as an initialization form for structure and class-slots, and
a default value for required keyword arguments."
(error "Required argument ~@[~S ~]missing." name))
(define-condition simple-style-warning (style-warning simple-warning)
(defun simple-style-warning (message &rest args)
(warn 'simple-style-warning :format-control message :format-arguments args))
(defmacro ignore-some-conditions ((&rest conditions) &body body)
"Similar to CL:IGNORE-ERRORS but the (unevaluated) CONDITIONS
list determines which specific conditions are to be ignored."
(progn ,@body)
,@(loop for condition in conditions collect
`(,condition (c) (values nil c)))))
......@@ -115,6 +115,15 @@
;; Errors
;; Conditions
v v v v v v v
;; Features
;; Features
^ ^ ^ ^ ^ ^ ^
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment