/[gcl]/gcl/clcs/clcs_handler.lisp
ViewVC logotype

Diff of /gcl/clcs/clcs_handler.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by camm, Wed Feb 26 22:21:34 2003 UTC revision 1.2 by camm, Mon Sep 22 21:55:53 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)
140      (ignore-errors (find-class object)))
141    

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26