Parent Directory | Revision Log | Patch
revision 1.2 by camm, Mon Sep 22 21:55:53 2003 UTC | revision 1.3 by camm, Thu Oct 23 15:08:38 2003 UTC | |
---|---|---|
# | Line 136 | Line 136 |
136 | `(HANDLER-CASE (PROGN ,@FORMS) | `(HANDLER-CASE (PROGN ,@FORMS) |
137 | (ERROR (CONDITION) (VALUES NIL CONDITION)))) | (ERROR (CONDITION) (VALUES NIL CONDITION)))) |
138 | ||
139 | (defun conditions::find-class-no-error (object) | ;#+pcl |
140 | (ignore-errors (find-class object))) | ;(defun conditions::find-class-no-error (object) |
141 | ; (ignore-errors (find-class object))) | |
142 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |