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

Diff of /gcl/clcs/clcs_handler.data

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

revision 1.3 by camm, Thu Feb 27 23:54:22 2003 UTC revision 1.4 by camm, Mon Sep 22 22:03:48 2003 UTC
# Line 2  Line 2 
2  #(#!  #(#!
3  (lisp::in-package "CONDITIONS")  (lisp::in-package "CONDITIONS")
4  #(conditions::*handler-clusters* "Ill-formed handler bindings." lisp::let lisp::cons lisp::list lisp::quote conditions::*break-on-signals* lisp::simple-condition conditions::signal "~A~%Break entered because of *BREAK-ON-SIGNALS*." "Ignore the additional arguments." lisp::simple-type-error :datum :expected-type lisp::null :format-string "You may not supply additional arguments ~  #(conditions::*handler-clusters* "Ill-formed handler bindings." lisp::let lisp::cons lisp::list lisp::quote conditions::*break-on-signals* lisp::simple-condition conditions::signal "~A~%Break entered because of *BREAK-ON-SIGNALS*." "Ignore the additional arguments." lisp::simple-type-error :datum :expected-type lisp::null :format-string "You may not supply additional arguments ~
5                                       when giving ~S to ~S." :format-arguments (lisp::or lisp::symbol lisp::string) "Bad argument to ~S: ~S" conditions::simple-error conditions::error conditions::*restart-clusters* :name conditions::continue :function :report-function "~A" #:g2394 "Break" "Return from BREAK." #:g2446 lisp::simple-warning conditions::warn lisp::warning conditions::store-value "Supply a new value of ~S." lisp::condition :interactive-function "The value of ~S is ~S, ~                                       when giving ~S to ~S." :format-arguments (lisp::or lisp::symbol lisp::string) "Bad argument to ~S: ~S" conditions::simple-error conditions::error conditions::*restart-clusters* :name conditions::continue :function :report-function "~A" #:g2397 "Break" "Return from BREAK." #:g2449 lisp::simple-warning conditions::warn lisp::warning conditions::store-value "Supply a new value of ~S." lisp::condition :interactive-function "The value of ~S is ~S, ~
6                                       which is not ~A." "a warning condition" #:g2498 lisp::*break-on-warnings* "~A~%Break entered because of *BREAK-ON-WARNINGS*." conditions::muffle-warning "Skip warning." #:g2534 lisp::*error-output* "~&Warning:~%~A~%" :no-error "NORMAL-RETURN" "ERROR-RETURN" lisp::block lisp::multiple-value-call lisp::function lisp::lambda lisp::return-from conditions::handler-case lisp::tagbody conditions::handler-bind (conditions::temp) lisp::setq conditions::temp lisp::go lisp::progn (conditions::error (lisp::condition) (lisp::values lisp::nil lisp::condition)) system::*make-special lisp::nil lisp::every conditions::coerce-to-condition lisp::typep conditions::break conditions::conditionp conditions::cerror conditions::condition-class-p conditions::make-condition conditions::invoke-debugger conditions::make-restart conditions::read-evaluated-form lisp::remove (system::%init . #((system::setvv 67 (system::mc lisp::nil 15)) (system::mfsfun (lisp::quote #0=#:|progn 'compile2181|) 0 0) (#0#) (system::mfsfun (lisp::quote #1=#:|progn 'compile2193|) 1 0) (#1#) (system::mfsfun (lisp::quote #2=#:|progn 'compile2206|) 2 0) (#2#) (system::putprop (lisp::quote conditions::handler-bind) (lisp::quote 1) (lisp::quote system::pretty-print-format)) (system::mm (lisp::quote conditions::handler-bind) 3) (system::mfsfun (lisp::quote #3=#:|progn 'compile2244|) 4 0) (#3#) (system::mfsfun (lisp::quote #4=#:|progn 'compile2256|) 5 0) (#4#) (system::mfsfun (lisp::quote #5=#:|progn 'compile2269|) 6 0) (#5#) (system::mfvfun (lisp::quote conditions::signal) 7 16385) (system::mf (lisp::quote conditions::coerce-to-condition) 8) (system::mf (lisp::quote conditions::error) 9) (system::mfvfun (lisp::quote conditions::cerror) 10 16386) (system::mfvfun (lisp::quote conditions::break) 11 16384) (system::mfvfun (lisp::quote conditions::warn) 12 16385) (system::mm (lisp::quote conditions::handler-case) 13) (system::mm (lisp::quote conditions::ignore-errors) 14))))                                       which is not ~A." "a warning condition" #:g2501 lisp::*break-on-warnings* "~A~%Break entered because of *BREAK-ON-WARNINGS*." conditions::muffle-warning "Skip warning." #:g2537 lisp::*error-output* "~&Warning:~%~A~%" :no-error "NORMAL-RETURN" "ERROR-RETURN" lisp::block lisp::multiple-value-call lisp::function lisp::lambda lisp::return-from conditions::handler-case lisp::tagbody conditions::handler-bind (conditions::temp) lisp::setq conditions::temp lisp::go lisp::progn (conditions::error (lisp::condition) (lisp::values lisp::nil lisp::condition)) #:g2638 system::*make-special lisp::nil lisp::every conditions::coerce-to-condition lisp::typep conditions::break conditions::conditionp conditions::cerror conditions::condition-class-p conditions::make-condition conditions::invoke-debugger conditions::make-restart conditions::read-evaluated-form lisp::remove pcl::find-class (system::%init . #((system::setvv 68 (system::mc lisp::nil 16)) (system::mfsfun (lisp::quote #0=#:|progn 'compile2184|) 0 0) (#0#) (system::mfsfun (lisp::quote #1=#:|progn 'compile2196|) 1 0) (#1#) (system::mfsfun (lisp::quote #2=#:|progn 'compile2209|) 2 0) (#2#) (system::putprop (lisp::quote conditions::handler-bind) (lisp::quote 1) (lisp::quote system::pretty-print-format)) (system::mm (lisp::quote conditions::handler-bind) 3) (system::mfsfun (lisp::quote #3=#:|progn 'compile2247|) 4 0) (#3#) (system::mfsfun (lisp::quote #4=#:|progn 'compile2259|) 5 0) (#4#) (system::mfsfun (lisp::quote #5=#:|progn 'compile2272|) 6 0) (#5#) (system::mfvfun (lisp::quote conditions::signal) 7 16385) (system::mf (lisp::quote conditions::coerce-to-condition) 8) (system::mf (lisp::quote conditions::error) 9) (system::mfvfun (lisp::quote conditions::cerror) 10 16386) (system::mfvfun (lisp::quote conditions::break) 11 16384) (system::mfvfun (lisp::quote conditions::warn) 12 16385) (system::mm (lisp::quote conditions::handler-case) 13) (system::mm (lisp::quote conditions::ignore-errors) 14) (system::mf (lisp::quote conditions::find-class-no-error1) 15))))
7  )  )

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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