| commit | aaadb1d5a2a799afeb0d052b55db5747120d574e | |
| author | Stas Boukarev <stassats@gmail.com> | |
| Sun, 25 Dec 2016 15:35:45 +0000 (25 18:35 +0300) | ||
| committer | Stas Boukarev <stassats@gmail.com> | |
| Sat, 31 Dec 2016 13:52:15 +0000 (31 16:52 +0300) | ||
| tree | 8259a0bebd57cbd4a8f7f933242c8d6a33f66fc8 | treesnapshot (tar.gz zip) |
| parent | 078dd83a3d2de6a0709a63ed5adfa3f5ea1860ff | commitdiff |
Reduce WITH-SIMPLE-RESTART and RESTART-CASE expansion.
Avoid open coding FORMAT used for producing the error message.
Instead of wrapping the body in WITH-CONDITION-RESTARTS transform it
into a function which will signal the condition while wrapped in
WITH-CONDITION-RESTARTS.
Avoid open coding FORMAT used for producing the error message.
Instead of wrapping the body in WITH-CONDITION-RESTARTS transform it
into a function which will signal the condition while wrapped in
WITH-CONDITION-RESTARTS.
| package-data-list.lisp-expr | diffblobblamehistory | |
| src/code/defboot.lisp | diffblobblamehistory | |
| src/code/target-error.lisp | diffblobblamehistory |