code.delx.au - gnu-emacs-elpa/blob - packages/context-coloring/fixtures/test/condition-case.el

   1 (condition-case err
   2     (progn err free)
   3   (error err free)
   4   ((debug error) err free))
   5
   6 (condition-case-unless-debug nil
   7     ;; c
   8     (let () nil)
   9   (error (let () nil))
  10   "s")