Skip to content

Instantly share code, notes, and snippets.

@carboleum

carboleum/error.lisp

Last active August 23, 2020 16:07
Show Gist options
  • Save carboleum/38e4a5baf898134a0335c4f391c3478b to your computer and use it in GitHub Desktop.
Save carboleum/38e4a5baf898134a0335c4f391c3478b to your computer and use it in GitHub Desktop.
Download ZIP
error handling with common lisp
Raw
error.lisp
(define-condition my-error (condition)
((message :initarg :message :reader message)))
(handler-case (signal 'my-error :message "Damned! an error!")
(my-error (e) (warn "~s" (message e))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment