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

Diff of /gcl/clcs/clcs_condition_definitions.data

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

revision 1.7 by camm, Tue Oct 7 21:07:34 2003 UTC revision 1.8 by camm, Thu Oct 23 15:30:03 2003 UTC
# Line 1  Line 1 
1                
2  #(#!  #(#!
3  (lisp::in-package "CONDITIONS")  (lisp::in-package "CONDITIONS")
4  #(:clos-conditions lisp::*features* :defstruct-conditions (conditions::simple-condition-format-string conditions::simple-condition-format-arguments conditions::type-error-datum conditions::type-error-expected-type conditions::case-failure-name conditions::case-failure-possibilities conditions::stream-error-stream conditions::file-error-pathname conditions::package-error-package conditions::cell-error-name conditions::arithmetic-error-operation conditions::internal-error-function-name) lisp::warning lisp::standard-class (lisp::condition) (lisp::warning (lisp::condition)) conditions::*condition-class-list* system::s-data lisp::serious-condition (lisp::condition) (lisp::serious-condition (lisp::condition)) conditions::error (lisp::serious-condition) (conditions::error (lisp::serious-condition)) lisp::simple-condition (lisp::condition) :name conditions::format-string :readers (conditions::simple-condition-format-string) :writers :initargs (:format-string) (:type lisp::string) :initfunction conditions::format-arguments (conditions::simple-condition-format-arguments) (:format-arguments) (:initform (lisp::quote lisp::nil)) (lisp::simple-condition (lisp::condition) (:format-string . lisp::string) (:format-arguments . lisp::t)) pcl::print-object ((conditions::x lisp::simple-condition) lisp::stream) lisp::*print-escape* pcl::fast-method-call lisp::nil pcl::std-instance pcl::*funcallable-instance-marker* pcl::method-call conditions::case-failure conditions::etypecase :datum :expected-type (lisp::or . #0=(pcl::method-call lisp::function)) :possibilities #0# "No next method." lisp::standard-method (lisp::simple-condition lisp::t) (conditions::x lisp::stream) :fast-function (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::simple-warning (lisp::simple-condition lisp::warning) (lisp::simple-warning (lisp::simple-condition lisp::warning)) conditions::simple-error (lisp::simple-condition conditions::error) (conditions::simple-error (lisp::simple-condition conditions::error)) lisp::storage-condition (lisp::serious-condition) (lisp::storage-condition (lisp::serious-condition)) conditions::stack-overflow (lisp::storage-condition) (conditions::stack-overflow (lisp::storage-condition)) conditions::storage-exhausted (lisp::storage-condition) (conditions::storage-exhausted (lisp::storage-condition)) lisp::type-error (conditions::error) conditions::datum (conditions::type-error-datum) (:datum) conditions::expected-type (conditions::type-error-expected-type) (:expected-type) (lisp::type-error (conditions::error) (:datum . lisp::t) (:expected-type . lisp::t)) ((conditions::x lisp::type-error) lisp::stream) lisp::nil (lisp::or . #1=(pcl::method-call lisp::function)) #1# "~S is not of type ~S." (lisp::type-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::simple-type-error (lisp::simple-condition lisp::type-error) (lisp::simple-type-error (lisp::simple-condition lisp::type-error)) (lisp::type-error) conditions::name (conditions::case-failure-name) (:name) conditions::possibilities (conditions::case-failure-possibilities) (:possibilities) (conditions::case-failure (lisp::type-error) (:name . lisp::t) (:possibilities . lisp::t)) ((conditions::x conditions::case-failure) lisp::stream) lisp::nil (lisp::or . #2=(pcl::method-call lisp::function)) #2# "~S fell through ~S expression.~%Wanted one of ~:S." (conditions::case-failure lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::program-error (conditions::error) (lisp::program-error (conditions::error)) lisp::control-error (conditions::error) (lisp::control-error (conditions::error)) lisp::parse-error (conditions::error) (lisp::parse-error (conditions::error)) lisp::stream-error (conditions::error) lisp::stream (conditions::stream-error-stream) (:stream) (lisp::stream-error (conditions::error) (:stream . lisp::t)) lisp::end-of-file (lisp::stream-error) (lisp::end-of-file (lisp::stream-error)) ((conditions::x lisp::end-of-file) lisp::stream) lisp::nil (lisp::or . #3=(pcl::method-call lisp::function)) #3# "Unexpected end of file on ~S." (lisp::end-of-file lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::file-error (conditions::error) lisp::pathname (conditions::file-error-pathname) (:pathname) (lisp::file-error (conditions::error) (:pathname . lisp::t)) lisp::package-error (conditions::error) lisp::package (conditions::package-error-package) (:package) conditions::message (conditions::package-error-message) (:message) (lisp::package-error (conditions::error) (:package . lisp::t) (:message . lisp::t)) ((conditions::x lisp::package-error) lisp::stream) lisp::nil (lisp::or . #4=(pcl::method-call lisp::function)) #4# "A package error occurred on ~S: ~S." (lisp::package-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::cell-error (conditions::error) (conditions::cell-error-name) (:name) (lisp::cell-error (conditions::error) (:name . lisp::t)) lisp::unbound-variable (lisp::cell-error) (lisp::unbound-variable (lisp::cell-error)) ((conditions::x lisp::unbound-variable) lisp::stream) lisp::nil (lisp::or . #5=(pcl::method-call lisp::function)) #5# "The variable ~S is unbound." (lisp::unbound-variable lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::undefined-function (lisp::cell-error) (lisp::undefined-function (lisp::cell-error)) ((conditions::x lisp::undefined-function) lisp::stream) lisp::nil (lisp::or . #6=(pcl::method-call lisp::function)) #6# "The function ~S is undefined." (lisp::undefined-function lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) lisp::arithmetic-error (conditions::error) conditions::operation (conditions::arithmetic-error-operation) (:operation) (lisp::arithmetic-error (conditions::error) (:operation . lisp::t)) lisp::division-by-zero (lisp::arithmetic-error) (lisp::division-by-zero (lisp::arithmetic-error)) lisp::floating-point-overflow (lisp::arithmetic-error) (lisp::floating-point-overflow (lisp::arithmetic-error)) lisp::floating-point-underflow (lisp::arithmetic-error) (lisp::floating-point-underflow (lisp::arithmetic-error)) conditions::abort-failure (lisp::control-error) (conditions::abort-failure (lisp::control-error)) ((conditions::x conditions::abort-failure) lisp::stream) lisp::nil (lisp::or . #7=(pcl::method-call lisp::function)) #7# "Abort failed." (conditions::abort-failure lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) conditions::internal-warning (lisp::warning) conditions::function-name (conditions::internal-error-function-name) (:function-name) (:initform (lisp::quote lisp::nil)) (conditions::internal-warning (lisp::warning) (:function-name . lisp::t)) ((conditions::x conditions::internal-warning) lisp::stream) lisp::nil (lisp::or . #8=(pcl::method-call lisp::function)) #8# "Warning in ~S [or a callee]: " lisp::nil (lisp::or . #9=(pcl::method-call lisp::function)) #9# (conditions::internal-warning lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) conditions::internal-error (conditions::error) (conditions::internal-error-function-name) (:function-name) (:initform (lisp::quote lisp::nil)) (conditions::internal-error (conditions::error) (:function-name . lisp::t)) ((conditions::x conditions::internal-error) lisp::stream) lisp::nil (lisp::or . #10=(pcl::method-call lisp::function)) #10# "Error in ~S [or a callee]: " lisp::nil (lisp::or . #11=(pcl::method-call lisp::function)) #11# (conditions::internal-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) "Error in ~S [or a callee]: " "Warning in ~S [or a callee]: " conditions::internal-simple-error (conditions::internal-error lisp::simple-condition) (conditions::internal-simple-error (conditions::internal-error lisp::simple-condition)) ((conditions::x conditions::internal-simple-error) lisp::stream) lisp::nil (lisp::or . #12=(pcl::method-call lisp::function)) #12# (conditions::internal-simple-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) conditions::internal-simple-warning (conditions::internal-warning lisp::simple-condition) (conditions::internal-simple-warning (conditions::internal-warning lisp::simple-condition)) ((conditions::x conditions::internal-simple-warning) lisp::stream) lisp::nil (lisp::or . #13=(pcl::method-call lisp::function)) #13# (conditions::internal-simple-warning lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2) :needs-next-methods-p lisp::t)) conditions::internal-type-error (conditions::internal-error lisp::type-error) (conditions::internal-type-error (conditions::internal-error lisp::type-error)) conditions::internal-package-error (conditions::internal-error lisp::package-error) (conditions::internal-package-error (conditions::internal-error lisp::package-error)) conditions::internal-simple-program-error (conditions::internal-simple-error lisp::program-error) (conditions::internal-simple-program-error (conditions::internal-simple-error lisp::program-error)) conditions::internal-simple-parse-error (conditions::internal-simple-error lisp::parse-error) (conditions::internal-simple-parse-error (conditions::internal-simple-error lisp::parse-error)) conditions::internal-simple-control-error (conditions::internal-simple-error lisp::control-error) (conditions::internal-simple-control-error (conditions::internal-simple-error lisp::control-error)) conditions::internal-unbound-variable (conditions::internal-error lisp::unbound-variable) (conditions::internal-unbound-variable (conditions::internal-error lisp::unbound-variable)) conditions::internal-undefined-function (conditions::internal-error lisp::undefined-function) (conditions::internal-undefined-function (conditions::internal-error lisp::undefined-function)) conditions::internal-end-of-file (conditions::internal-error lisp::end-of-file) (conditions::internal-end-of-file (conditions::internal-error lisp::end-of-file)) conditions::internal-simple-file-error (conditions::internal-simple-error lisp::file-error) (conditions::internal-simple-file-error (conditions::internal-simple-error lisp::file-error)) conditions::internal-simple-stream-error (conditions::internal-simple-error lisp::stream-error) (conditions::internal-simple-stream-error (conditions::internal-simple-error lisp::stream-error)) conditions::*simple-condition-class* lisp::remove pcl::load-defclass #14=#:|Defclass WARNING2235| #15=#:|Defclass SERIOUS-CONDITION2324| #16=#:|Defclass ERROR2413| conditions::simple-condition-format-string conditions::simple-condition-format-arguments pcl::false #17=#:|Defclass SIMPLE-CONDITION2510| pcl::proclaim-defgeneric system::structure-subtype-p pcl::cclosure-env-nthcdr lisp::error conditions::simple-condition-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))| pcl::load-defmethod #18=#:|Defclass SIMPLE-WARNING2806| #19=#:|Defclass SIMPLE-ERROR2895| #20=#:|Defclass STORAGE-CONDITION2984| #21=#:|Defclass STACK-OVERFLOW3073| #22=#:|Defclass STORAGE-EXHAUSTED3162| #23=#:|Defclass TYPE-ERROR3251| conditions::type-error-datum conditions::type-error-expected-type conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))| #24=#:|Defclass SIMPLE-TYPE-ERROR3551| #25=#:|Defclass CASE-FAILURE3640| conditions::case-failure-name conditions::case-failure-possibilities conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))| #26=#:|Defclass PROGRAM-ERROR3940| #27=#:|Defclass CONTROL-ERROR4029| #28=#:|Defclass PARSE-ERROR4118| #29=#:|Defclass STREAM-ERROR4207| #30=#:|Defclass END-OF-FILE4297| conditions::stream-error-stream conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))| #31=#:|Defclass FILE-ERROR4595| #32=#:|Defclass PACKAGE-ERROR4685| conditions::package-error-package conditions::package-error-message conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))| #33=#:|Defclass CELL-ERROR4985| #34=#:|Defclass UNBOUND-VARIABLE5075| conditions::cell-error-name conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))| #35=#:|Defclass UNDEFINED-FUNCTION5373| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))| #36=#:|Defclass ARITHMETIC-ERROR5671| #37=#:|Defclass DIVISION-BY-ZERO5761| #38=#:|Defclass FLOATING-POINT-OVERFLOW5850| #39=#:|Defclass FLOATING-POINT-UNDERFLOW5939| #40=#:|Defclass ABORT-FAILURE6028| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))| #41=#:|Defclass INTERNAL-WARNING6330| conditions::internal-error-function-name conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))| #42=#:|Defclass INTERNAL-ERROR6745| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))| #43=#:|Defclass INTERNAL-SIMPLE-ERROR7184| conditions::internal-simple-error-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))| #44=#:|Defclass INTERNAL-SIMPLE-WARNING7478| conditions::internal-simple-warning-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))| #45=#:|Defclass INTERNAL-TYPE-ERROR7772| #46=#:|Defclass INTERNAL-PACKAGE-ERROR7861| #47=#:|Defclass INTERNAL-SIMPLE-PROGRAM-ERROR7950| #48=#:|Defclass INTERNAL-SIMPLE-PARSE-ERROR8039| #49=#:|Defclass INTERNAL-SIMPLE-CONTROL-ERROR8128| #50=#:|Defclass INTERNAL-UNBOUND-VARIABLE8217| #51=#:|Defclass INTERNAL-UNDEFINED-FUNCTION8306| #52=#:|Defclass INTERNAL-END-OF-FILE8395| #53=#:|Defclass INTERNAL-SIMPLE-FILE-ERROR8484| #54=#:|Defclass INTERNAL-SIMPLE-STREAM-ERROR8573| system::*make-special pcl::find-class lisp::typep pcl::class-precedence-list (system::%init . #((system::mfsfun (lisp::quote #55=#:|progn 'compile2169|) 0 0) (#55#) (system::mfsfun (lisp::quote #56=#:|progn 'compile2189|) 1 0) (#56#) (system::mf (lisp::quote #14#) 2) (system::mfsfun (lisp::quote #57=#:|progn 'compile2251|) 3 0) (#57#) (system::mfsfun (lisp::quote #58=#:|progn 'compile2268|) 4 0) (#58#) (system::mfsfun (lisp::quote #59=#:|progn 'compile2292|) 5 0) (#59#) (system::mfsfun (lisp::quote #60=#:|progn 'compile2304|) 6 0) (#60#) (system::mf (lisp::quote #15#) 7) (system::mfsfun (lisp::quote #61=#:|progn 'compile2340|) 8 0) (#61#) (system::mfsfun (lisp::quote #62=#:|progn 'compile2357|) 9 0) (#62#) (system::mfsfun (lisp::quote #63=#:|progn 'compile2381|) 10 0) (#63#) (system::mfsfun (lisp::quote #64=#:|progn 'compile2393|) 11 0) (#64#) (system::mf (lisp::quote #16#) 12) (system::mfsfun (lisp::quote #65=#:|progn 'compile2429|) 13 0) (#65#) (system::mfsfun (lisp::quote #66=#:|progn 'compile2446|) 14 0) (#66#) (system::mfsfun (lisp::quote #67=#:|progn 'compile2470|) 15 0) (#67#) (system::mfsfun (lisp::quote #68=#:|progn 'compile2482|) 16 0) (#68#) (system::mfsfun (lisp::quote conditions::simple-condition-printer) 17 2) (system::mf (lisp::quote #17#) 18) (system::mfsfun (lisp::quote #69=#:|progn 'compile2528|) 19 0) (#69#) (system::mfsfun (lisp::quote #70=#:|progn 'compile2545|) 20 0) (#70#) (system::mfsfun (lisp::quote #71=#:|progn 'compile2569|) 21 0) (#71#) (system::mfsfun (lisp::quote #72=#:|progn 'compile2585|) 22 0) (#72#) (system::setvv 36 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))|) 23) (system::mfsfun (lisp::quote #73=#:|progn 'compile2778|) 24 0) (#73#) (system::mfsfun (lisp::quote #74=#:|progn 'compile2786|) 25 0) (#74#) (system::mf (lisp::quote #18#) 26) (system::mfsfun (lisp::quote #75=#:|progn 'compile2822|) 27 0) (#75#) (system::mfsfun (lisp::quote #76=#:|progn 'compile2839|) 28 0) (#76#) (system::mfsfun (lisp::quote #77=#:|progn 'compile2863|) 29 0) (#77#) (system::mfsfun (lisp::quote #78=#:|progn 'compile2875|) 30 0) (#78#) (system::mf (lisp::quote #19#) 31) (system::mfsfun (lisp::quote #79=#:|progn 'compile2911|) 32 0) (#79#) (system::mfsfun (lisp::quote #80=#:|progn 'compile2928|) 33 0) (#80#) (system::mfsfun (lisp::quote #81=#:|progn 'compile2952|) 34 0) (#81#) (system::mfsfun (lisp::quote #82=#:|progn 'compile2964|) 35 0) (#82#) (system::mf (lisp::quote #20#) 36) (system::mfsfun (lisp::quote #83=#:|progn 'compile3000|) 37 0) (#83#) (system::mfsfun (lisp::quote #84=#:|progn 'compile3017|) 38 0) (#84#) (system::mfsfun (lisp::quote #85=#:|progn 'compile3041|) 39 0) (#85#) (system::mfsfun (lisp::quote #86=#:|progn 'compile3053|) 40 0) (#86#) (system::mf (lisp::quote #21#) 41) (system::mfsfun (lisp::quote #87=#:|progn 'compile3089|) 42 0) (#87#) (system::mfsfun (lisp::quote #88=#:|progn 'compile3106|) 43 0) (#88#) (system::mfsfun (lisp::quote #89=#:|progn 'compile3130|) 44 0) (#89#) (system::mfsfun (lisp::quote #90=#:|progn 'compile3142|) 45 0) (#90#) (system::mf (lisp::quote #22#) 46) (system::mfsfun (lisp::quote #91=#:|progn 'compile3178|) 47 0) (#91#) (system::mfsfun (lisp::quote #92=#:|progn 'compile3195|) 48 0) (#92#) (system::mfsfun (lisp::quote #93=#:|progn 'compile3219|) 49 0) (#93#) (system::mfsfun (lisp::quote #94=#:|progn 'compile3231|) 50 0) (#94#) (system::mf (lisp::quote #23#) 51) (system::mfsfun (lisp::quote #95=#:|progn 'compile3269|) 52 0) (#95#) (system::mfsfun (lisp::quote #96=#:|progn 'compile3286|) 53 0) (#96#) (system::mfsfun (lisp::quote #97=#:|progn 'compile3310|) 54 0) (#97#) (system::mfsfun (lisp::quote #98=#:|progn 'compile3326|) 55 0) (#98#) (system::setvv 78 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))|) 56) (system::mfsfun (lisp::quote #99=#:|progn 'compile3523|) 57 0) (#99#) (system::mfsfun (lisp::quote #100=#:|progn 'compile3531|) 58 0) (#100#) (system::mf (lisp::quote #24#) 59) (system::mfsfun (lisp::quote #101=#:|progn 'compile3567|) 60 0) (#101#) (system::mfsfun (lisp::quote #102=#:|progn 'compile3584|) 61 0) (#102#) (system::mfsfun (lisp::quote #103=#:|progn 'compile3608|) 62 0) (#103#) (system::mfsfun (lisp::quote #104=#:|progn 'compile3620|) 63 0) (#104#) (system::mf (lisp::quote #25#) 64) (system::mfsfun (lisp::quote #105=#:|progn 'compile3658|) 65 0) (#105#) (system::mfsfun (lisp::quote #106=#:|progn 'compile3675|) 66 0) (#106#) (system::mfsfun (lisp::quote #107=#:|progn 'compile3699|) 67 0) (#107#) (system::mfsfun (lisp::quote #108=#:|progn 'compile3715|) 68 0) (#108#) (system::setvv 97 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))|) 69) (system::mfsfun (lisp::quote #109=#:|progn 'compile3912|) 70 0) (#109#) (system::mfsfun (lisp::quote #110=#:|progn 'compile3920|) 71 0) (#110#) (system::mf (lisp::quote #26#) 72) (system::mfsfun (lisp::quote #111=#:|progn 'compile3956|) 73 0) (#111#) (system::mfsfun (lisp::quote #112=#:|progn 'compile3973|) 74 0) (#112#) (system::mfsfun (lisp::quote #113=#:|progn 'compile3997|) 75 0) (#113#) (system::mfsfun (lisp::quote #114=#:|progn 'compile4009|) 76 0) (#114#) (system::mf (lisp::quote #27#) 77) (system::mfsfun (lisp::quote #115=#:|progn 'compile4045|) 78 0) (#115#) (system::mfsfun (lisp::quote #116=#:|progn 'compile4062|) 79 0) (#116#) (system::mfsfun (lisp::quote #117=#:|progn 'compile4086|) 80 0) (#117#) (system::mfsfun (lisp::quote #118=#:|progn 'compile4098|) 81 0) (#118#) (system::mf (lisp::quote #28#) 82) (system::mfsfun (lisp::quote #119=#:|progn 'compile4134|) 83 0) (#119#) (system::mfsfun (lisp::quote #120=#:|progn 'compile4151|) 84 0) (#120#) (system::mfsfun (lisp::quote #121=#:|progn 'compile4175|) 85 0) (#121#) (system::mfsfun (lisp::quote #122=#:|progn 'compile4187|) 86 0) (#122#) (system::mf (lisp::quote #29#) 87) (system::mfsfun (lisp::quote #123=#:|progn 'compile4224|) 88 0) (#123#) (system::mfsfun (lisp::quote #124=#:|progn 'compile4241|) 89 0) (#124#) (system::mfsfun (lisp::quote #125=#:|progn 'compile4265|) 90 0) (#125#) (system::mfsfun (lisp::quote #126=#:|progn 'compile4277|) 91 0) (#126#) (system::mf (lisp::quote #30#) 92) (system::mfsfun (lisp::quote #127=#:|progn 'compile4313|) 93 0) (#127#) (system::mfsfun (lisp::quote #128=#:|progn 'compile4330|) 94 0) (#128#) (system::mfsfun (lisp::quote #129=#:|progn 'compile4354|) 95 0) (#129#) (system::mfsfun (lisp::quote #130=#:|progn 'compile4370|) 96 0) (#130#) (system::setvv 123 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))|) 97) (system::mfsfun (lisp::quote #131=#:|progn 'compile4567|) 98 0) (#131#) (system::mfsfun (lisp::quote #132=#:|progn 'compile4575|) 99 0) (#132#) (system::mf (lisp::quote #31#) 100) (system::mfsfun (lisp::quote #133=#:|progn 'compile4612|) 101 0) (#133#) (system::mfsfun (lisp::quote #134=#:|progn 'compile4629|) 102 0) (#134#) (system::mfsfun (lisp::quote #135=#:|progn 'compile4653|) 103 0) (#135#) (system::mfsfun (lisp::quote #136=#:|progn 'compile4665|) 104 0) (#136#) (system::mf (lisp::quote #32#) 105) (system::mfsfun (lisp::quote #137=#:|progn 'compile4703|) 106 0) (#137#) (system::mfsfun (lisp::quote #138=#:|progn 'compile4720|) 107 0) (#138#) (system::mfsfun (lisp::quote #139=#:|progn 'compile4744|) 108 0) (#139#) (system::mfsfun (lisp::quote #140=#:|progn 'compile4760|) 109 0) (#140#) (system::setvv 146 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))|) 110) (system::mfsfun (lisp::quote #141=#:|progn 'compile4957|) 111 0) (#141#) (system::mfsfun (lisp::quote #142=#:|progn 'compile4965|) 112 0) (#142#) (system::mf (lisp::quote #33#) 113) (system::mfsfun (lisp::quote #143=#:|progn 'compile5002|) 114 0) (#143#) (system::mfsfun (lisp::quote #144=#:|progn 'compile5019|) 115 0) (#144#) (system::mfsfun (lisp::quote #145=#:|progn 'compile5043|) 116 0) (#145#) (system::mfsfun (lisp::quote #146=#:|progn 'compile5055|) 117 0) (#146#) (system::mf (lisp::quote #34#) 118) (system::mfsfun (lisp::quote #147=#:|progn 'compile5091|) 119 0) (#147#) (system::mfsfun (lisp::quote #148=#:|progn 'compile5108|) 120 0) (#148#) (system::mfsfun (lisp::quote #149=#:|progn 'compile5132|) 121 0) (#149#) (system::mfsfun (lisp::quote #150=#:|progn 'compile5148|) 122 0) (#150#) (system::setvv 162 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))|) 123) (system::mfsfun (lisp::quote #151=#:|progn 'compile5345|) 124 0) (#151#) (system::mfsfun (lisp::quote #152=#:|progn 'compile5353|) 125 0) (#152#) (system::mf (lisp::quote #35#) 126) (system::mfsfun (lisp::quote #153=#:|progn 'compile5389|) 127 0) (#153#) (system::mfsfun (lisp::quote #154=#:|progn 'compile5406|) 128 0) (#154#) (system::mfsfun (lisp::quote #155=#:|progn 'compile5430|) 129 0) (#155#) (system::mfsfun (lisp::quote #156=#:|progn 'compile5446|) 130 0) (#156#) (system::setvv 173 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))|) 131) (system::mfsfun (lisp::quote #157=#:|progn 'compile5643|) 132 0) (#157#) (system::mfsfun (lisp::quote #158=#:|progn 'compile5651|) 133 0) (#158#) (system::mf (lisp::quote #36#) 134) (system::mfsfun (lisp::quote #159=#:|progn 'compile5688|) 135 0) (#159#) (system::mfsfun (lisp::quote #160=#:|progn 'compile5705|) 136 0) (#160#) (system::mfsfun (lisp::quote #161=#:|progn 'compile5729|) 137 0) (#161#) (system::mfsfun (lisp::quote #162=#:|progn 'compile5741|) 138 0) (#162#) (system::mf (lisp::quote #37#) 139) (system::mfsfun (lisp::quote #163=#:|progn 'compile5777|) 140 0) (#163#) (system::mfsfun (lisp::quote #164=#:|progn 'compile5794|) 141 0) (#164#) (system::mfsfun (lisp::quote #165=#:|progn 'compile5818|) 142 0) (#165#) (system::mfsfun (lisp::quote #166=#:|progn 'compile5830|) 143 0) (#166#) (system::mf (lisp::quote #38#) 144) (system::mfsfun (lisp::quote #167=#:|progn 'compile5866|) 145 0) (#167#) (system::mfsfun (lisp::quote #168=#:|progn 'compile5883|) 146 0) (#168#) (system::mfsfun (lisp::quote #169=#:|progn 'compile5907|) 147 0) (#169#) (system::mfsfun (lisp::quote #170=#:|progn 'compile5919|) 148 0) (#170#) (system::mf (lisp::quote #39#) 149) (system::mfsfun (lisp::quote #171=#:|progn 'compile5955|) 150 0) (#171#) (system::mfsfun (lisp::quote #172=#:|progn 'compile5972|) 151 0) (#172#) (system::mfsfun (lisp::quote #173=#:|progn 'compile5996|) 152 0) (#173#) (system::mfsfun (lisp::quote #174=#:|progn 'compile6008|) 153 0) (#174#) (system::mf (lisp::quote #40#) 154) (system::mfsfun (lisp::quote #175=#:|progn 'compile6044|) 155 0) (#175#) (system::mfsfun (lisp::quote #176=#:|progn 'compile6061|) 156 0) (#176#) (system::mfsfun (lisp::quote #177=#:|progn 'compile6085|) 157 0) (#177#) (system::mfsfun (lisp::quote #178=#:|progn 'compile6101|) 158 0) (#178#) (system::setvv 199 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))|) 159) (system::mfsfun (lisp::quote #179=#:|progn 'compile6302|) 160 0) (#179#) (system::mfsfun (lisp::quote #180=#:|progn 'compile6310|) 161 0) (#180#) (system::mf (lisp::quote #41#) 162) (system::mfsfun (lisp::quote #181=#:|progn 'compile6347|) 163 0) (#181#) (system::mfsfun (lisp::quote #182=#:|progn 'compile6364|) 164 0) (#182#) (system::mfsfun (lisp::quote #183=#:|progn 'compile6388|) 165 0) (#183#) (system::mfsfun (lisp::quote #184=#:|progn 'compile6404|) 166 0) (#184#) (system::setvv 214 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 218 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))|) 167) (system::mfsfun (lisp::quote #185=#:|progn 'compile6717|) 168 0) (#185#) (system::mfsfun (lisp::quote #186=#:|progn 'compile6725|) 169 0) (#186#) (system::mf (lisp::quote #42#) 170) (system::mfsfun (lisp::quote #187=#:|progn 'compile6762|) 171 0) (#187#) (system::mfsfun (lisp::quote #188=#:|progn 'compile6779|) 172 0) (#188#) (system::mfsfun (lisp::quote #189=#:|progn 'compile6803|) 173 0) (#189#) (system::mfsfun (lisp::quote #190=#:|progn 'compile6819|) 174 0) (#190#) (system::setvv 231 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 235 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))|) 175) (system::mfsfun (lisp::quote #191=#:|progn 'compile7132|) 176 0) (#191#) (system::mfsfun (lisp::quote #192=#:|progn 'compile7140|) 177 0) (#192#) (system::mfsfun (lisp::quote conditions::internal-simple-error-printer) 178 2) (system::mf (lisp::quote conditions::internal-simple-warning-printer) 179) (system::mf (lisp::quote #43#) 180) (system::mfsfun (lisp::quote #193=#:|progn 'compile7200|) 181 0) (#193#) (system::mfsfun (lisp::quote #194=#:|progn 'compile7217|) 182 0) (#194#) (system::mfsfun (lisp::quote #195=#:|progn 'compile7241|) 183 0) (#195#) (system::mfsfun (lisp::quote #196=#:|progn 'compile7257|) 184 0) (#196#) (system::setvv 247 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))|) 185) (system::mfsfun (lisp::quote #197=#:|progn 'compile7450|) 186 0) (#197#) (system::mfsfun (lisp::quote #198=#:|progn 'compile7458|) 187 0) (#198#) (system::mf (lisp::quote #44#) 188) (system::mfsfun (lisp::quote #199=#:|progn 'compile7494|) 189 0) (#199#) (system::mfsfun (lisp::quote #200=#:|progn 'compile7511|) 190 0) (#200#) (system::mfsfun (lisp::quote #201=#:|progn 'compile7535|) 191 0) (#201#) (system::mfsfun (lisp::quote #202=#:|progn 'compile7551|) 192 0) (#202#) (system::setvv 257 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))|) 193) (system::mfsfun (lisp::quote #203=#:|progn 'compile7744|) 194 0) (#203#) (system::mfsfun (lisp::quote #204=#:|progn 'compile7752|) 195 0) (#204#) (system::mf (lisp::quote #45#) 196) (system::mfsfun (lisp::quote #205=#:|progn 'compile7788|) 197 0) (#205#) (system::mfsfun (lisp::quote #206=#:|progn 'compile7805|) 198 0) (#206#) (system::mfsfun (lisp::quote #207=#:|progn 'compile7829|) 199 0) (#207#) (system::mfsfun (lisp::quote #208=#:|progn 'compile7841|) 200 0) (#208#) (system::mf (lisp::quote #46#) 201) (system::mfsfun (lisp::quote #209=#:|progn 'compile7877|) 202 0) (#209#) (system::mfsfun (lisp::quote #210=#:|progn 'compile7894|) 203 0) (#210#) (system::mfsfun (lisp::quote #211=#:|progn 'compile7918|) 204 0) (#211#) (system::mfsfun (lisp::quote #212=#:|progn 'compile7930|) 205 0) (#212#) (system::mf (lisp::quote #47#) 206) (system::mfsfun (lisp::quote #213=#:|progn 'compile7966|) 207 0) (#213#) (system::mfsfun (lisp::quote #214=#:|progn 'compile7983|) 208 0) (#214#) (system::mfsfun (lisp::quote #215=#:|progn 'compile8007|) 209 0) (#215#) (system::mfsfun (lisp::quote #216=#:|progn 'compile8019|) 210 0) (#216#) (system::mf (lisp::quote #48#) 211) (system::mfsfun (lisp::quote #217=#:|progn 'compile8055|) 212 0) (#217#) (system::mfsfun (lisp::quote #218=#:|progn 'compile8072|) 213 0) (#218#) (system::mfsfun (lisp::quote #219=#:|progn 'compile8096|) 214 0) (#219#) (system::mfsfun (lisp::quote #220=#:|progn 'compile8108|) 215 0) (#220#) (system::mf (lisp::quote #49#) 216) (system::mfsfun (lisp::quote #221=#:|progn 'compile8144|) 217 0) (#221#) (system::mfsfun (lisp::quote #222=#:|progn 'compile8161|) 218 0) (#222#) (system::mfsfun (lisp::quote #223=#:|progn 'compile8185|) 219 0) (#223#) (system::mfsfun (lisp::quote #224=#:|progn 'compile8197|) 220 0) (#224#) (system::mf (lisp::quote #50#) 221) (system::mfsfun (lisp::quote #225=#:|progn 'compile8233|) 222 0) (#225#) (system::mfsfun (lisp::quote #226=#:|progn 'compile8250|) 223 0) (#226#) (system::mfsfun (lisp::quote #227=#:|progn 'compile8274|) 224 0) (#227#) (system::mfsfun (lisp::quote #228=#:|progn 'compile8286|) 225 0) (#228#) (system::mf (lisp::quote #51#) 226) (system::mfsfun (lisp::quote #229=#:|progn 'compile8322|) 227 0) (#229#) (system::mfsfun (lisp::quote #230=#:|progn 'compile8339|) 228 0) (#230#) (system::mfsfun (lisp::quote #231=#:|progn 'compile8363|) 229 0) (#231#) (system::mfsfun (lisp::quote #232=#:|progn 'compile8375|) 230 0) (#232#) (system::mf (lisp::quote #52#) 231) (system::mfsfun (lisp::quote #233=#:|progn 'compile8411|) 232 0) (#233#) (system::mfsfun (lisp::quote #234=#:|progn 'compile8428|) 233 0) (#234#) (system::mfsfun (lisp::quote #235=#:|progn 'compile8452|) 234 0) (#235#) (system::mfsfun (lisp::quote #236=#:|progn 'compile8464|) 235 0) (#236#) (system::mf (lisp::quote #53#) 236) (system::mfsfun (lisp::quote #237=#:|progn 'compile8500|) 237 0) (#237#) (system::mfsfun (lisp::quote #238=#:|progn 'compile8517|) 238 0) (#238#) (system::mfsfun (lisp::quote #239=#:|progn 'compile8541|) 239 0) (#239#) (system::mfsfun (lisp::quote #240=#:|progn 'compile8553|) 240 0) (#240#) (system::mf (lisp::quote #54#) 241) (system::mfsfun (lisp::quote #241=#:|progn 'compile8589|) 242 0) (#241#) (system::mfsfun (lisp::quote #242=#:|progn 'compile8606|) 243 0) (#242#) (system::mfsfun (lisp::quote #243=#:|progn 'compile8630|) 244 0) (#243#) (system::mfsfun (lisp::quote #244=#:|progn 'compile8642|) 245 0) (#244#) (system::mfsfun (lisp::quote #245=#:|progn 'compile8658|) 246 0) (#245#) (system::mfsfun (lisp::quote #246=#:|progn 'compile8670|) 247 0) (#246#) (system::mfsfun (lisp::quote #247=#:|progn 'compile8683|) 248 0) (#247#) (system::mfsfun (lisp::quote conditions::simple-condition-class-p) 249 1) (system::debug (lisp::quote #56#) (lisp::quote (conditions::sym))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::internal-simple-warning-printer) (lisp::quote (lisp::condition lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))))))  #(:clos-conditions lisp::*features* :defstruct-conditions (conditions::simple-condition-format-string conditions::simple-condition-format-arguments conditions::type-error-datum conditions::type-error-expected-type conditions::case-failure-name conditions::case-failure-possibilities conditions::stream-error-stream conditions::file-error-pathname conditions::package-error-package conditions::cell-error-name conditions::arithmetic-error-operation conditions::internal-error-function-name) lisp::warning lisp::standard-class (lisp::condition) (lisp::warning (lisp::condition)) conditions::*condition-class-list* system::s-data lisp::serious-condition (lisp::condition) (lisp::serious-condition (lisp::condition)) conditions::error (lisp::serious-condition) (conditions::error (lisp::serious-condition)) lisp::simple-condition (lisp::condition) :name conditions::format-string :readers (conditions::simple-condition-format-string) :writers :initargs (:format-string) (:type lisp::string) :initfunction conditions::format-arguments (conditions::simple-condition-format-arguments) (:format-arguments) (:initform (lisp::quote lisp::nil)) (lisp::simple-condition (lisp::condition) (:format-string . lisp::string) (:format-arguments . lisp::t)) pcl::print-object ((conditions::x lisp::simple-condition) lisp::stream) lisp::*print-escape* pcl::fast-method-call lisp::nil pcl::std-instance pcl::*funcallable-instance-marker* pcl::method-call conditions::case-failure conditions::etypecase :datum :expected-type (lisp::or . #0=(pcl::method-call lisp::function)) :possibilities #0# lisp::nil (lisp::or . #1=(pcl::method-call lisp::function)) #1# ((pcl::print-object lisp::nil (lisp::simple-condition lisp::t))) lisp::standard-method (lisp::simple-condition lisp::t) (conditions::x lisp::stream) :fast-function (:plist (:arg-info (2))) lisp::simple-warning (lisp::simple-condition lisp::warning) (lisp::simple-warning (lisp::simple-condition lisp::warning)) conditions::simple-error (lisp::simple-condition conditions::error) (conditions::simple-error (lisp::simple-condition conditions::error)) lisp::storage-condition (lisp::serious-condition) (lisp::storage-condition (lisp::serious-condition)) conditions::stack-overflow (lisp::storage-condition) (conditions::stack-overflow (lisp::storage-condition)) conditions::storage-exhausted (lisp::storage-condition) (conditions::storage-exhausted (lisp::storage-condition)) lisp::type-error (conditions::error) conditions::datum (conditions::type-error-datum) (:datum) conditions::expected-type (conditions::type-error-expected-type) (:expected-type) (lisp::type-error (conditions::error) (:datum . lisp::t) (:expected-type . lisp::t)) ((conditions::x lisp::type-error) lisp::stream) "~S is not of type ~S." lisp::nil (lisp::or . #2=(pcl::method-call lisp::function)) #2# lisp::nil (lisp::or . #3=(pcl::method-call lisp::function)) #3# ((pcl::print-object lisp::nil (lisp::type-error lisp::t))) (lisp::type-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::simple-type-error (lisp::simple-condition lisp::type-error) (lisp::simple-type-error (lisp::simple-condition lisp::type-error)) (lisp::type-error) conditions::name (conditions::case-failure-name) (:name) conditions::possibilities (conditions::case-failure-possibilities) (:possibilities) (conditions::case-failure (lisp::type-error) (:name . lisp::t) (:possibilities . lisp::t)) ((conditions::x conditions::case-failure) lisp::stream) "~S fell through ~S expression.~%Wanted one of ~:S." lisp::nil (lisp::or . #4=(pcl::method-call lisp::function)) #4# lisp::nil (lisp::or . #5=(pcl::method-call lisp::function)) #5# ((pcl::print-object lisp::nil (conditions::case-failure lisp::t))) (conditions::case-failure lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::program-error (conditions::error) (lisp::program-error (conditions::error)) lisp::control-error (conditions::error) (lisp::control-error (conditions::error)) lisp::parse-error (conditions::error) (lisp::parse-error (conditions::error)) lisp::stream-error (conditions::error) lisp::stream (conditions::stream-error-stream) (:stream) (lisp::stream-error (conditions::error) (:stream . lisp::t)) lisp::end-of-file (lisp::stream-error) (lisp::end-of-file (lisp::stream-error)) ((conditions::x lisp::end-of-file) lisp::stream) "Unexpected end of file on ~S." lisp::nil (lisp::or . #6=(pcl::method-call lisp::function)) #6# lisp::nil (lisp::or . #7=(pcl::method-call lisp::function)) #7# ((pcl::print-object lisp::nil (lisp::end-of-file lisp::t))) (lisp::end-of-file lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::file-error (conditions::error) lisp::pathname (conditions::file-error-pathname) (:pathname) (lisp::file-error (conditions::error) (:pathname . lisp::t)) lisp::package-error (conditions::error) lisp::package (conditions::package-error-package) (:package) conditions::message (conditions::package-error-message) (:message) (lisp::package-error (conditions::error) (:package . lisp::t) (:message . lisp::t)) ((conditions::x lisp::package-error) lisp::stream) "A package error occurred on ~S: ~S." lisp::nil (lisp::or . #8=(pcl::method-call lisp::function)) #8# lisp::nil (lisp::or . #9=(pcl::method-call lisp::function)) #9# ((pcl::print-object lisp::nil (lisp::package-error lisp::t))) (lisp::package-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::cell-error (conditions::error) (conditions::cell-error-name) (:name) (lisp::cell-error (conditions::error) (:name . lisp::t)) lisp::unbound-variable (lisp::cell-error) (lisp::unbound-variable (lisp::cell-error)) ((conditions::x lisp::unbound-variable) lisp::stream) "The variable ~S is unbound." lisp::nil (lisp::or . #10=(pcl::method-call lisp::function)) #10# lisp::nil (lisp::or . #11=(pcl::method-call lisp::function)) #11# ((pcl::print-object lisp::nil (lisp::unbound-variable lisp::t))) (lisp::unbound-variable lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::undefined-function (lisp::cell-error) (lisp::undefined-function (lisp::cell-error)) ((conditions::x lisp::undefined-function) lisp::stream) "The function ~S is undefined." lisp::nil (lisp::or . #12=(pcl::method-call lisp::function)) #12# lisp::nil (lisp::or . #13=(pcl::method-call lisp::function)) #13# ((pcl::print-object lisp::nil (lisp::undefined-function lisp::t))) (lisp::undefined-function lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) lisp::arithmetic-error (conditions::error) conditions::operation (conditions::arithmetic-error-operation) (:operation) (lisp::arithmetic-error (conditions::error) (:operation . lisp::t)) lisp::division-by-zero (lisp::arithmetic-error) (lisp::division-by-zero (lisp::arithmetic-error)) lisp::floating-point-overflow (lisp::arithmetic-error) (lisp::floating-point-overflow (lisp::arithmetic-error)) lisp::floating-point-underflow (lisp::arithmetic-error) (lisp::floating-point-underflow (lisp::arithmetic-error)) conditions::abort-failure (lisp::control-error) (conditions::abort-failure (lisp::control-error)) ((conditions::x conditions::abort-failure) lisp::stream) "Abort failed." lisp::nil (lisp::or . #14=(pcl::method-call lisp::function)) #14# lisp::nil (lisp::or . #15=(pcl::method-call lisp::function)) #15# ((pcl::print-object lisp::nil (conditions::abort-failure lisp::t))) (conditions::abort-failure lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) conditions::internal-warning (lisp::warning) conditions::function-name (conditions::internal-error-function-name) (:function-name) (:initform (lisp::quote lisp::nil)) (conditions::internal-warning (lisp::warning) (:function-name . lisp::t)) ((conditions::x conditions::internal-warning) lisp::stream) "Warning in ~S [or a callee]: " lisp::nil (lisp::or . #16=(pcl::method-call lisp::function)) #16# lisp::nil (lisp::or . #17=(pcl::method-call lisp::function)) #17# ((pcl::print-object lisp::nil (conditions::internal-warning lisp::t))) (conditions::internal-warning lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) conditions::internal-error (conditions::error) (conditions::internal-error-function-name) (:function-name) (:initform (lisp::quote lisp::nil)) (conditions::internal-error (conditions::error) (:function-name . lisp::t)) ((conditions::x conditions::internal-error) lisp::stream) "Error in ~S [or a callee]: " lisp::nil (lisp::or . #18=(pcl::method-call lisp::function)) #18# lisp::nil (lisp::or . #19=(pcl::method-call lisp::function)) #19# ((pcl::print-object lisp::nil (conditions::internal-error lisp::t))) (conditions::internal-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) "Error in ~S [or a callee]: " "Warning in ~S [or a callee]: " conditions::internal-simple-error (conditions::internal-error lisp::simple-condition) (conditions::internal-simple-error (conditions::internal-error lisp::simple-condition)) ((conditions::x conditions::internal-simple-error) lisp::stream) lisp::nil (lisp::or . #20=(pcl::method-call lisp::function)) #20# lisp::nil (lisp::or . #21=(pcl::method-call lisp::function)) #21# ((pcl::print-object lisp::nil (conditions::internal-simple-error lisp::t))) (conditions::internal-simple-error lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) conditions::internal-simple-warning (conditions::internal-warning lisp::simple-condition) (conditions::internal-simple-warning (conditions::internal-warning lisp::simple-condition)) ((conditions::x conditions::internal-simple-warning) lisp::stream) lisp::nil (lisp::or . #22=(pcl::method-call lisp::function)) #22# lisp::nil (lisp::or . #23=(pcl::method-call lisp::function)) #23# ((pcl::print-object lisp::nil (conditions::internal-simple-warning lisp::t))) (conditions::internal-simple-warning lisp::t) (conditions::x lisp::stream) (:plist (:arg-info (2))) conditions::internal-type-error (conditions::internal-error lisp::type-error) (conditions::internal-type-error (conditions::internal-error lisp::type-error)) conditions::internal-package-error (conditions::internal-error lisp::package-error) (conditions::internal-package-error (conditions::internal-error lisp::package-error)) conditions::internal-simple-program-error (conditions::internal-simple-error lisp::program-error) (conditions::internal-simple-program-error (conditions::internal-simple-error lisp::program-error)) conditions::internal-simple-parse-error (conditions::internal-simple-error lisp::parse-error) (conditions::internal-simple-parse-error (conditions::internal-simple-error lisp::parse-error)) conditions::internal-simple-control-error (conditions::internal-simple-error lisp::control-error) (conditions::internal-simple-control-error (conditions::internal-simple-error lisp::control-error)) conditions::internal-unbound-variable (conditions::internal-error lisp::unbound-variable) (conditions::internal-unbound-variable (conditions::internal-error lisp::unbound-variable)) conditions::internal-undefined-function (conditions::internal-error lisp::undefined-function) (conditions::internal-undefined-function (conditions::internal-error lisp::undefined-function)) conditions::internal-end-of-file (conditions::internal-error lisp::end-of-file) (conditions::internal-end-of-file (conditions::internal-error lisp::end-of-file)) conditions::internal-simple-file-error (conditions::internal-simple-error lisp::file-error) (conditions::internal-simple-file-error (conditions::internal-simple-error lisp::file-error)) conditions::internal-simple-stream-error (conditions::internal-simple-error lisp::stream-error) (conditions::internal-simple-stream-error (conditions::internal-simple-error lisp::stream-error)) conditions::*simple-condition-class* lisp::remove pcl::load-defclass #24=#:|Defclass WARNING2262| #25=#:|Defclass SERIOUS-CONDITION2351| #26=#:|Defclass ERROR2440| conditions::simple-condition-format-string conditions::simple-condition-format-arguments pcl::false #27=#:|Defclass SIMPLE-CONDITION2537| pcl::proclaim-defgeneric conditions::simple-condition-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))| pcl::load-defmethod #28=#:|Defclass SIMPLE-WARNING2979| #29=#:|Defclass SIMPLE-ERROR3068| #30=#:|Defclass STORAGE-CONDITION3157| #31=#:|Defclass STACK-OVERFLOW3246| #32=#:|Defclass STORAGE-EXHAUSTED3335| #33=#:|Defclass TYPE-ERROR3424| conditions::type-error-datum conditions::type-error-expected-type conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))| #34=#:|Defclass SIMPLE-TYPE-ERROR3874| #35=#:|Defclass CASE-FAILURE3963| conditions::case-failure-name conditions::case-failure-possibilities conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))| #36=#:|Defclass PROGRAM-ERROR4413| #37=#:|Defclass CONTROL-ERROR4502| #38=#:|Defclass PARSE-ERROR4591| #39=#:|Defclass STREAM-ERROR4680| #40=#:|Defclass END-OF-FILE4770| conditions::stream-error-stream conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))| #41=#:|Defclass FILE-ERROR5218| #42=#:|Defclass PACKAGE-ERROR5308| conditions::package-error-package conditions::package-error-message conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))| #43=#:|Defclass CELL-ERROR5758| #44=#:|Defclass UNBOUND-VARIABLE5848| conditions::cell-error-name conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))| #45=#:|Defclass UNDEFINED-FUNCTION6296| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))| #46=#:|Defclass ARITHMETIC-ERROR6744| #47=#:|Defclass DIVISION-BY-ZERO6834| #48=#:|Defclass FLOATING-POINT-OVERFLOW6923| #49=#:|Defclass FLOATING-POINT-UNDERFLOW7012| #50=#:|Defclass ABORT-FAILURE7101| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))| #51=#:|Defclass INTERNAL-WARNING7557| conditions::internal-error-function-name conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))| #52=#:|Defclass INTERNAL-ERROR8014| conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))| #53=#:|Defclass INTERNAL-SIMPLE-ERROR8495| conditions::internal-simple-error-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))| #54=#:|Defclass INTERNAL-SIMPLE-WARNING8935| conditions::internal-simple-warning-printer conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))| #55=#:|Defclass INTERNAL-TYPE-ERROR9375| #56=#:|Defclass INTERNAL-PACKAGE-ERROR9464| #57=#:|Defclass INTERNAL-SIMPLE-PROGRAM-ERROR9553| #58=#:|Defclass INTERNAL-SIMPLE-PARSE-ERROR9642| #59=#:|Defclass INTERNAL-SIMPLE-CONTROL-ERROR9731| #60=#:|Defclass INTERNAL-UNBOUND-VARIABLE9820| #61=#:|Defclass INTERNAL-UNDEFINED-FUNCTION9909| #62=#:|Defclass INTERNAL-END-OF-FILE9998| #63=#:|Defclass INTERNAL-SIMPLE-FILE-ERROR10087| #64=#:|Defclass INTERNAL-SIMPLE-STREAM-ERROR10176| system::*make-special pcl::find-class lisp::typep pcl::class-precedence-list system::structure-subtype-p pcl::cclosure-env-nthcdr pcl::call-no-next-method (system::%init . #((system::mfsfun (lisp::quote #65=#:|progn 'compile2196|) 0 0) (#65#) (system::mfsfun (lisp::quote #66=#:|progn 'compile2216|) 1 0) (#66#) (system::mf (lisp::quote #24#) 2) (system::mfsfun (lisp::quote #67=#:|progn 'compile2278|) 3 0) (#67#) (system::mfsfun (lisp::quote #68=#:|progn 'compile2295|) 4 0) (#68#) (system::mfsfun (lisp::quote #69=#:|progn 'compile2319|) 5 0) (#69#) (system::mfsfun (lisp::quote #70=#:|progn 'compile2331|) 6 0) (#70#) (system::mf (lisp::quote #25#) 7) (system::mfsfun (lisp::quote #71=#:|progn 'compile2367|) 8 0) (#71#) (system::mfsfun (lisp::quote #72=#:|progn 'compile2384|) 9 0) (#72#) (system::mfsfun (lisp::quote #73=#:|progn 'compile2408|) 10 0) (#73#) (system::mfsfun (lisp::quote #74=#:|progn 'compile2420|) 11 0) (#74#) (system::mf (lisp::quote #26#) 12) (system::mfsfun (lisp::quote #75=#:|progn 'compile2456|) 13 0) (#75#) (system::mfsfun (lisp::quote #76=#:|progn 'compile2473|) 14 0) (#76#) (system::mfsfun (lisp::quote #77=#:|progn 'compile2497|) 15 0) (#77#) (system::mfsfun (lisp::quote #78=#:|progn 'compile2509|) 16 0) (#78#) (system::mfsfun (lisp::quote conditions::simple-condition-printer) 17 2) (system::mf (lisp::quote #27#) 18) (system::mfsfun (lisp::quote #79=#:|progn 'compile2555|) 19 0) (#79#) (system::mfsfun (lisp::quote #80=#:|progn 'compile2572|) 20 0) (#80#) (system::mfsfun (lisp::quote #81=#:|progn 'compile2596|) 21 0) (#81#) (system::mfsfun (lisp::quote #82=#:|progn 'compile2612|) 22 0) (#82#) (system::setvv 36 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 47 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))|) 23) (system::mfsfun (lisp::quote #83=#:|progn 'compile2951|) 24 0) (#83#) (system::mfsfun (lisp::quote #84=#:|progn 'compile2959|) 25 0) (#84#) (system::mf (lisp::quote #28#) 26) (system::mfsfun (lisp::quote #85=#:|progn 'compile2995|) 27 0) (#85#) (system::mfsfun (lisp::quote #86=#:|progn 'compile3012|) 28 0) (#86#) (system::mfsfun (lisp::quote #87=#:|progn 'compile3036|) 29 0) (#87#) (system::mfsfun (lisp::quote #88=#:|progn 'compile3048|) 30 0) (#88#) (system::mf (lisp::quote #29#) 31) (system::mfsfun (lisp::quote #89=#:|progn 'compile3084|) 32 0) (#89#) (system::mfsfun (lisp::quote #90=#:|progn 'compile3101|) 33 0) (#90#) (system::mfsfun (lisp::quote #91=#:|progn 'compile3125|) 34 0) (#91#) (system::mfsfun (lisp::quote #92=#:|progn 'compile3137|) 35 0) (#92#) (system::mf (lisp::quote #30#) 36) (system::mfsfun (lisp::quote #93=#:|progn 'compile3173|) 37 0) (#93#) (system::mfsfun (lisp::quote #94=#:|progn 'compile3190|) 38 0) (#94#) (system::mfsfun (lisp::quote #95=#:|progn 'compile3214|) 39 0) (#95#) (system::mfsfun (lisp::quote #96=#:|progn 'compile3226|) 40 0) (#96#) (system::mf (lisp::quote #31#) 41) (system::mfsfun (lisp::quote #97=#:|progn 'compile3262|) 42 0) (#97#) (system::mfsfun (lisp::quote #98=#:|progn 'compile3279|) 43 0) (#98#) (system::mfsfun (lisp::quote #99=#:|progn 'compile3303|) 44 0) (#99#) (system::mfsfun (lisp::quote #100=#:|progn 'compile3315|) 45 0) (#100#) (system::mf (lisp::quote #32#) 46) (system::mfsfun (lisp::quote #101=#:|progn 'compile3351|) 47 0) (#101#) (system::mfsfun (lisp::quote #102=#:|progn 'compile3368|) 48 0) (#102#) (system::mfsfun (lisp::quote #103=#:|progn 'compile3392|) 49 0) (#103#) (system::mfsfun (lisp::quote #104=#:|progn 'compile3404|) 50 0) (#104#) (system::mf (lisp::quote #33#) 51) (system::mfsfun (lisp::quote #105=#:|progn 'compile3442|) 52 0) (#105#) (system::mfsfun (lisp::quote #106=#:|progn 'compile3459|) 53 0) (#106#) (system::mfsfun (lisp::quote #107=#:|progn 'compile3483|) 54 0) (#107#) (system::mfsfun (lisp::quote #108=#:|progn 'compile3499|) 55 0) (#108#) (system::setvv 82 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 85 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))|) 56) (system::mfsfun (lisp::quote #109=#:|progn 'compile3846|) 57 0) (#109#) (system::mfsfun (lisp::quote #110=#:|progn 'compile3854|) 58 0) (#110#) (system::mf (lisp::quote #34#) 59) (system::mfsfun (lisp::quote #111=#:|progn 'compile3890|) 60 0) (#111#) (system::mfsfun (lisp::quote #112=#:|progn 'compile3907|) 61 0) (#112#) (system::mfsfun (lisp::quote #113=#:|progn 'compile3931|) 62 0) (#113#) (system::mfsfun (lisp::quote #114=#:|progn 'compile3943|) 63 0) (#114#) (system::mf (lisp::quote #35#) 64) (system::mfsfun (lisp::quote #115=#:|progn 'compile3981|) 65 0) (#115#) (system::mfsfun (lisp::quote #116=#:|progn 'compile3998|) 66 0) (#116#) (system::mfsfun (lisp::quote #117=#:|progn 'compile4022|) 67 0) (#117#) (system::mfsfun (lisp::quote #118=#:|progn 'compile4038|) 68 0) (#118#) (system::setvv 105 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 108 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))|) 69) (system::mfsfun (lisp::quote #119=#:|progn 'compile4385|) 70 0) (#119#) (system::mfsfun (lisp::quote #120=#:|progn 'compile4393|) 71 0) (#120#) (system::mf (lisp::quote #36#) 72) (system::mfsfun (lisp::quote #121=#:|progn 'compile4429|) 73 0) (#121#) (system::mfsfun (lisp::quote #122=#:|progn 'compile4446|) 74 0) (#122#) (system::mfsfun (lisp::quote #123=#:|progn 'compile4470|) 75 0) (#123#) (system::mfsfun (lisp::quote #124=#:|progn 'compile4482|) 76 0) (#124#) (system::mf (lisp::quote #37#) 77) (system::mfsfun (lisp::quote #125=#:|progn 'compile4518|) 78 0) (#125#) (system::mfsfun (lisp::quote #126=#:|progn 'compile4535|) 79 0) (#126#) (system::mfsfun (lisp::quote #127=#:|progn 'compile4559|) 80 0) (#127#) (system::mfsfun (lisp::quote #128=#:|progn 'compile4571|) 81 0) (#128#) (system::mf (lisp::quote #38#) 82) (system::mfsfun (lisp::quote #129=#:|progn 'compile4607|) 83 0) (#129#) (system::mfsfun (lisp::quote #130=#:|progn 'compile4624|) 84 0) (#130#) (system::mfsfun (lisp::quote #131=#:|progn 'compile4648|) 85 0) (#131#) (system::mfsfun (lisp::quote #132=#:|progn 'compile4660|) 86 0) (#132#) (system::mf (lisp::quote #39#) 87) (system::mfsfun (lisp::quote #133=#:|progn 'compile4697|) 88 0) (#133#) (system::mfsfun (lisp::quote #134=#:|progn 'compile4714|) 89 0) (#134#) (system::mfsfun (lisp::quote #135=#:|progn 'compile4738|) 90 0) (#135#) (system::mfsfun (lisp::quote #136=#:|progn 'compile4750|) 91 0) (#136#) (system::mf (lisp::quote #40#) 92) (system::mfsfun (lisp::quote #137=#:|progn 'compile4786|) 93 0) (#137#) (system::mfsfun (lisp::quote #138=#:|progn 'compile4803|) 94 0) (#138#) (system::mfsfun (lisp::quote #139=#:|progn 'compile4827|) 95 0) (#139#) (system::mfsfun (lisp::quote #140=#:|progn 'compile4843|) 96 0) (#140#) (system::setvv 135 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 138 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))|) 97) (system::mfsfun (lisp::quote #141=#:|progn 'compile5190|) 98 0) (#141#) (system::mfsfun (lisp::quote #142=#:|progn 'compile5198|) 99 0) (#142#) (system::mf (lisp::quote #41#) 100) (system::mfsfun (lisp::quote #143=#:|progn 'compile5235|) 101 0) (#143#) (system::mfsfun (lisp::quote #144=#:|progn 'compile5252|) 102 0) (#144#) (system::mfsfun (lisp::quote #145=#:|progn 'compile5276|) 103 0) (#145#) (system::mfsfun (lisp::quote #146=#:|progn 'compile5288|) 104 0) (#146#) (system::mf (lisp::quote #42#) 105) (system::mfsfun (lisp::quote #147=#:|progn 'compile5326|) 106 0) (#147#) (system::mfsfun (lisp::quote #148=#:|progn 'compile5343|) 107 0) (#148#) (system::mfsfun (lisp::quote #149=#:|progn 'compile5367|) 108 0) (#149#) (system::mfsfun (lisp::quote #150=#:|progn 'compile5383|) 109 0) (#150#) (system::setvv 162 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 165 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))|) 110) (system::mfsfun (lisp::quote #151=#:|progn 'compile5730|) 111 0) (#151#) (system::mfsfun (lisp::quote #152=#:|progn 'compile5738|) 112 0) (#152#) (system::mf (lisp::quote #43#) 113) (system::mfsfun (lisp::quote #153=#:|progn 'compile5775|) 114 0) (#153#) (system::mfsfun (lisp::quote #154=#:|progn 'compile5792|) 115 0) (#154#) (system::mfsfun (lisp::quote #155=#:|progn 'compile5816|) 116 0) (#155#) (system::mfsfun (lisp::quote #156=#:|progn 'compile5828|) 117 0) (#156#) (system::mf (lisp::quote #44#) 118) (system::mfsfun (lisp::quote #157=#:|progn 'compile5864|) 119 0) (#157#) (system::mfsfun (lisp::quote #158=#:|progn 'compile5881|) 120 0) (#158#) (system::mfsfun (lisp::quote #159=#:|progn 'compile5905|) 121 0) (#159#) (system::mfsfun (lisp::quote #160=#:|progn 'compile5921|) 122 0) (#160#) (system::setvv 182 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 185 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))|) 123) (system::mfsfun (lisp::quote #161=#:|progn 'compile6268|) 124 0) (#161#) (system::mfsfun (lisp::quote #162=#:|progn 'compile6276|) 125 0) (#162#) (system::mf (lisp::quote #45#) 126) (system::mfsfun (lisp::quote #163=#:|progn 'compile6312|) 127 0) (#163#) (system::mfsfun (lisp::quote #164=#:|progn 'compile6329|) 128 0) (#164#) (system::mfsfun (lisp::quote #165=#:|progn 'compile6353|) 129 0) (#165#) (system::mfsfun (lisp::quote #166=#:|progn 'compile6369|) 130 0) (#166#) (system::setvv 197 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 200 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))|) 131) (system::mfsfun (lisp::quote #167=#:|progn 'compile6716|) 132 0) (#167#) (system::mfsfun (lisp::quote #168=#:|progn 'compile6724|) 133 0) (#168#) (system::mf (lisp::quote #46#) 134) (system::mfsfun (lisp::quote #169=#:|progn 'compile6761|) 135 0) (#169#) (system::mfsfun (lisp::quote #170=#:|progn 'compile6778|) 136 0) (#170#) (system::mfsfun (lisp::quote #171=#:|progn 'compile6802|) 137 0) (#171#) (system::mfsfun (lisp::quote #172=#:|progn 'compile6814|) 138 0) (#172#) (system::mf (lisp::quote #47#) 139) (system::mfsfun (lisp::quote #173=#:|progn 'compile6850|) 140 0) (#173#) (system::mfsfun (lisp::quote #174=#:|progn 'compile6867|) 141 0) (#174#) (system::mfsfun (lisp::quote #175=#:|progn 'compile6891|) 142 0) (#175#) (system::mfsfun (lisp::quote #176=#:|progn 'compile6903|) 143 0) (#176#) (system::mf (lisp::quote #48#) 144) (system::mfsfun (lisp::quote #177=#:|progn 'compile6939|) 145 0) (#177#) (system::mfsfun (lisp::quote #178=#:|progn 'compile6956|) 146 0) (#178#) (system::mfsfun (lisp::quote #179=#:|progn 'compile6980|) 147 0) (#179#) (system::mfsfun (lisp::quote #180=#:|progn 'compile6992|) 148 0) (#180#) (system::mf (lisp::quote #49#) 149) (system::mfsfun (lisp::quote #181=#:|progn 'compile7028|) 150 0) (#181#) (system::mfsfun (lisp::quote #182=#:|progn 'compile7045|) 151 0) (#182#) (system::mfsfun (lisp::quote #183=#:|progn 'compile7069|) 152 0) (#183#) (system::mfsfun (lisp::quote #184=#:|progn 'compile7081|) 153 0) (#184#) (system::mf (lisp::quote #50#) 154) (system::mfsfun (lisp::quote #185=#:|progn 'compile7117|) 155 0) (#185#) (system::mfsfun (lisp::quote #186=#:|progn 'compile7134|) 156 0) (#186#) (system::mfsfun (lisp::quote #187=#:|progn 'compile7158|) 157 0) (#187#) (system::mfsfun (lisp::quote #188=#:|progn 'compile7174|) 158 0) (#188#) (system::setvv 227 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 230 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))|) 159) (system::mfsfun (lisp::quote #189=#:|progn 'compile7529|) 160 0) (#189#) (system::mfsfun (lisp::quote #190=#:|progn 'compile7537|) 161 0) (#190#) (system::mf (lisp::quote #51#) 162) (system::mfsfun (lisp::quote #191=#:|progn 'compile7574|) 163 0) (#191#) (system::mfsfun (lisp::quote #192=#:|progn 'compile7591|) 164 0) (#192#) (system::mfsfun (lisp::quote #193=#:|progn 'compile7615|) 165 0) (#193#) (system::mfsfun (lisp::quote #194=#:|progn 'compile7631|) 166 0) (#194#) (system::setvv 246 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 249 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))|) 167) (system::mfsfun (lisp::quote #195=#:|progn 'compile7986|) 168 0) (#195#) (system::mfsfun (lisp::quote #196=#:|progn 'compile7994|) 169 0) (#196#) (system::mf (lisp::quote #52#) 170) (system::mfsfun (lisp::quote #197=#:|progn 'compile8031|) 171 0) (#197#) (system::mfsfun (lisp::quote #198=#:|progn 'compile8048|) 172 0) (#198#) (system::mfsfun (lisp::quote #199=#:|progn 'compile8072|) 173 0) (#199#) (system::mfsfun (lisp::quote #200=#:|progn 'compile8088|) 174 0) (#200#) (system::setvv 264 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 267 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))|) 175) (system::mfsfun (lisp::quote #201=#:|progn 'compile8443|) 176 0) (#201#) (system::mfsfun (lisp::quote #202=#:|progn 'compile8451|) 177 0) (#202#) (system::mfsfun (lisp::quote conditions::internal-simple-error-printer) 178 2) (system::mf (lisp::quote conditions::internal-simple-warning-printer) 179) (system::mf (lisp::quote #53#) 180) (system::mfsfun (lisp::quote #203=#:|progn 'compile8511|) 181 0) (#203#) (system::mfsfun (lisp::quote #204=#:|progn 'compile8528|) 182 0) (#204#) (system::mfsfun (lisp::quote #205=#:|progn 'compile8552|) 183 0) (#205#) (system::mfsfun (lisp::quote #206=#:|progn 'compile8568|) 184 0) (#206#) (system::setvv 280 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 283 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))|) 185) (system::mfsfun (lisp::quote #207=#:|progn 'compile8907|) 186 0) (#207#) (system::mfsfun (lisp::quote #208=#:|progn 'compile8915|) 187 0) (#208#) (system::mf (lisp::quote #54#) 188) (system::mfsfun (lisp::quote #209=#:|progn 'compile8951|) 189 0) (#209#) (system::mfsfun (lisp::quote #210=#:|progn 'compile8968|) 190 0) (#210#) (system::mfsfun (lisp::quote #211=#:|progn 'compile8992|) 191 0) (#211#) (system::mfsfun (lisp::quote #212=#:|progn 'compile9008|) 192 0) (#212#) (system::setvv 294 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::setvv 297 (compiler::name-to-sd (lisp::quote pcl::std-instance))) (system::mf (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))|) 193) (system::mfsfun (lisp::quote #213=#:|progn 'compile9347|) 194 0) (#213#) (system::mfsfun (lisp::quote #214=#:|progn 'compile9355|) 195 0) (#214#) (system::mf (lisp::quote #55#) 196) (system::mfsfun (lisp::quote #215=#:|progn 'compile9391|) 197 0) (#215#) (system::mfsfun (lisp::quote #216=#:|progn 'compile9408|) 198 0) (#216#) (system::mfsfun (lisp::quote #217=#:|progn 'compile9432|) 199 0) (#217#) (system::mfsfun (lisp::quote #218=#:|progn 'compile9444|) 200 0) (#218#) (system::mf (lisp::quote #56#) 201) (system::mfsfun (lisp::quote #219=#:|progn 'compile9480|) 202 0) (#219#) (system::mfsfun (lisp::quote #220=#:|progn 'compile9497|) 203 0) (#220#) (system::mfsfun (lisp::quote #221=#:|progn 'compile9521|) 204 0) (#221#) (system::mfsfun (lisp::quote #222=#:|progn 'compile9533|) 205 0) (#222#) (system::mf (lisp::quote #57#) 206) (system::mfsfun (lisp::quote #223=#:|progn 'compile9569|) 207 0) (#223#) (system::mfsfun (lisp::quote #224=#:|progn 'compile9586|) 208 0) (#224#) (system::mfsfun (lisp::quote #225=#:|progn 'compile9610|) 209 0) (#225#) (system::mfsfun (lisp::quote #226=#:|progn 'compile9622|) 210 0) (#226#) (system::mf (lisp::quote #58#) 211) (system::mfsfun (lisp::quote #227=#:|progn 'compile9658|) 212 0) (#227#) (system::mfsfun (lisp::quote #228=#:|progn 'compile9675|) 213 0) (#228#) (system::mfsfun (lisp::quote #229=#:|progn 'compile9699|) 214 0) (#229#) (system::mfsfun (lisp::quote #230=#:|progn 'compile9711|) 215 0) (#230#) (system::mf (lisp::quote #59#) 216) (system::mfsfun (lisp::quote #231=#:|progn 'compile9747|) 217 0) (#231#) (system::mfsfun (lisp::quote #232=#:|progn 'compile9764|) 218 0) (#232#) (system::mfsfun (lisp::quote #233=#:|progn 'compile9788|) 219 0) (#233#) (system::mfsfun (lisp::quote #234=#:|progn 'compile9800|) 220 0) (#234#) (system::mf (lisp::quote #60#) 221) (system::mfsfun (lisp::quote #235=#:|progn 'compile9836|) 222 0) (#235#) (system::mfsfun (lisp::quote #236=#:|progn 'compile9853|) 223 0) (#236#) (system::mfsfun (lisp::quote #237=#:|progn 'compile9877|) 224 0) (#237#) (system::mfsfun (lisp::quote #238=#:|progn 'compile9889|) 225 0) (#238#) (system::mf (lisp::quote #61#) 226) (system::mfsfun (lisp::quote #239=#:|progn 'compile9925|) 227 0) (#239#) (system::mfsfun (lisp::quote #240=#:|progn 'compile9942|) 228 0) (#240#) (system::mfsfun (lisp::quote #241=#:|progn 'compile9966|) 229 0) (#241#) (system::mfsfun (lisp::quote #242=#:|progn 'compile9978|) 230 0) (#242#) (system::mf (lisp::quote #62#) 231) (system::mfsfun (lisp::quote #243=#:|progn 'compile10014|) 232 0) (#243#) (system::mfsfun (lisp::quote #244=#:|progn 'compile10031|) 233 0) (#244#) (system::mfsfun (lisp::quote #245=#:|progn 'compile10055|) 234 0) (#245#) (system::mfsfun (lisp::quote #246=#:|progn 'compile10067|) 235 0) (#246#) (system::mf (lisp::quote #63#) 236) (system::mfsfun (lisp::quote #247=#:|progn 'compile10103|) 237 0) (#247#) (system::mfsfun (lisp::quote #248=#:|progn 'compile10120|) 238 0) (#248#) (system::mfsfun (lisp::quote #249=#:|progn 'compile10144|) 239 0) (#249#) (system::mfsfun (lisp::quote #250=#:|progn 'compile10156|) 240 0) (#250#) (system::mf (lisp::quote #64#) 241) (system::mfsfun (lisp::quote #251=#:|progn 'compile10192|) 242 0) (#251#) (system::mfsfun (lisp::quote #252=#:|progn 'compile10209|) 243 0) (#252#) (system::mfsfun (lisp::quote #253=#:|progn 'compile10233|) 244 0) (#253#) (system::mfsfun (lisp::quote #254=#:|progn 'compile10245|) 245 0) (#254#) (system::mfsfun (lisp::quote #255=#:|progn 'compile10261|) 246 0) (#255#) (system::mfsfun (lisp::quote #256=#:|progn 'compile10273|) 247 0) (#256#) (system::mfsfun (lisp::quote #257=#:|progn 'compile10286|) 248 0) (#257#) (system::mfsfun (lisp::quote conditions::simple-condition-class-p) 249 1) (system::debug (lisp::quote #66#) (lisp::quote (conditions::sym))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (SIMPLE-CONDITION T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (TYPE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (CASE-FAILURE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (END-OF-FILE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (PACKAGE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNBOUND-VARIABLE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (UNDEFINED-FUNCTION T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (ABORT-FAILURE T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-WARNING T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::internal-simple-warning-printer) (lisp::quote (lisp::condition lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-ERROR T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))) (system::debug (lisp::quote conditions::|(PCL::FAST-METHOD PRINT-OBJECT (INTERNAL-SIMPLE-WARNING T))|) (lisp::quote (pcl::.pv-cell. pcl::.next-method-call. conditions::x lisp::stream))))))
5  )  )

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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