/[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.5 by camm, Tue Sep 23 21:48:26 2003 UTC revision 1.6 by camm, Fri Oct 3 16:03:15 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" #:g2399 "Break" "Return from BREAK." #:g2451 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" #:g2404 "Break" "Return from BREAK." #:g2456 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" #:g2503 lisp::*break-on-warnings* "~A~%Break entered because of *BREAK-ON-WARNINGS*." conditions::muffle-warning "Skip warning." #:g2539 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)) #:g2640 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 'compile2186|) 0 0) (#0#) (system::mfsfun (lisp::quote #1=#:|progn 'compile2198|) 1 0) (#1#) (system::mfsfun (lisp::quote #2=#:|progn 'compile2211|) 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 'compile2249|) 4 0) (#3#) (system::mfsfun (lisp::quote #4=#:|progn 'compile2261|) 5 0) (#4#) (system::mfsfun (lisp::quote #5=#:|progn 'compile2274|) 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-error) 15) (system::debug (lisp::quote conditions::signal) (lisp::quote (conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::coerce-to-condition) (lisp::quote (conditions::datum conditions::arguments conditions::default-type conditions::function-name))) (system::debug (lisp::quote conditions::error) (lisp::quote (conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::cerror) (lisp::quote (conditions::continue-string conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::break) (lisp::quote (conditions::format-string conditions::format-arguments))) (system::debug (lisp::quote conditions::warn) (lisp::quote (conditions::datum conditions::arguments conditions::value))) (system::debug (lisp::quote conditions::find-class-no-error) (lisp::quote (lisp::object #:g2639))))))                                       which is not ~A." "a warning condition" #:g2508 lisp::*break-on-warnings* "~A~%Break entered because of *BREAK-ON-WARNINGS*." conditions::muffle-warning "Skip warning." #:g2544 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)) #:g2645 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 'compile2191|) 0 0) (#0#) (system::mfsfun (lisp::quote #1=#:|progn 'compile2203|) 1 0) (#1#) (system::mfsfun (lisp::quote #2=#:|progn 'compile2216|) 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 'compile2254|) 4 0) (#3#) (system::mfsfun (lisp::quote #4=#:|progn 'compile2266|) 5 0) (#4#) (system::mfsfun (lisp::quote #5=#:|progn 'compile2279|) 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-error) 15) (system::debug (lisp::quote conditions::signal) (lisp::quote (conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::coerce-to-condition) (lisp::quote (conditions::datum conditions::arguments conditions::default-type conditions::function-name))) (system::debug (lisp::quote conditions::error) (lisp::quote (conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::cerror) (lisp::quote (conditions::continue-string conditions::datum conditions::arguments))) (system::debug (lisp::quote conditions::break) (lisp::quote (conditions::format-string conditions::format-arguments))) (system::debug (lisp::quote conditions::warn) (lisp::quote (conditions::datum conditions::arguments conditions::value))) (system::debug (lisp::quote conditions::find-class-no-error) (lisp::quote (lisp::object #:g2644))))))
7  )  )

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

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