/[gcl]/gcl/lsp/serror.data
ViewVC logotype

Diff of /gcl/lsp/serror.data

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

revision 1.4 by camm, Fri Aug 2 22:23:59 2002 UTC revision 1.5 by camm, Sat Oct 5 18:34:15 2002 UTC
# Line 19  signaled at this point in the stack.  Fo Line 19  signaled at this point in the stack.  Fo
19   (cond-error (er) (1+ u)   (cond-error (er) (1+ u)
20    ((null u) (princ er) (princ \"null arg to u\"))    ((null u) (princ er) (princ \"null arg to u\"))
21    ((symbolp u) (princ \"symbol arg\"))    ((symbolp u) (princ \"symbol arg\"))
22    (t 0))" #4#) (system::putprop (lisp::quote serror::cond-any-error) (lisp::quote 2) #5#) (system::mm (lisp::quote serror::cond-any-error) 2) (system::mfvfun (lisp::quote system::universal-error-handler) 3 16384) (system::mf (lisp::quote serror::inf-signal) 4) (system::putprop (lisp::quote serror::def-error-type) (lisp::quote 2) #5#) (system::mm (lisp::quote serror::def-error-type) 5) (system::mf (lisp::quote serror::|WTA-tester|) 6) (system::putprop (lisp::quote serror::wta) (lisp::quote (lisp::deftype serror::wta lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|WTA-tester|))))) #6=(lisp::quote system::deftype-form)) (system::mf (lisp::quote #7=#:g1034) 7) (system::putprop (lisp::quote serror::wta) (lisp::symbol-function (lisp::quote #7#)) #8=(lisp::quote system::deftype-definition)) (system::putprop (lisp::quote serror::wta) lisp::nil #9=(lisp::quote system::type-documentation)) (system::mf (lisp::quote serror::|SUBSCRIPT-OUT-OF-BOUNDS-tester|) 8) (system::putprop (lisp::quote serror::subscript-out-of-bounds) (lisp::quote (lisp::deftype serror::subscript-out-of-bounds lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|SUBSCRIPT-OUT-OF-BOUNDS-tester|))))) #6#) (system::mf (lisp::quote #10=#:g1035) 9) (system::putprop (lisp::quote serror::subscript-out-of-bounds) (lisp::symbol-function (lisp::quote #10#)) #8#) (system::putprop (lisp::quote serror::subscript-out-of-bounds) lisp::nil #9#) (system::mf (lisp::quote serror::|ERROR-tester|) 10) (system::putprop (lisp::quote lisp::error) (lisp::quote (lisp::deftype lisp::error lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|ERROR-tester|))))) #6#) (system::mf (lisp::quote #11=#:g1036) 11) (system::putprop (lisp::quote lisp::error) (lisp::symbol-function (lisp::quote #11#)) #8#) (system::putprop (lisp::quote lisp::error) lisp::nil #9#) (system::mf (lisp::quote serror::|WRONG-TYPE-ARGUMENT-tester|) 12) (system::putprop (lisp::quote serror::wrong-type-argument) (lisp::quote (lisp::deftype serror::wrong-type-argument lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|WRONG-TYPE-ARGUMENT-tester|))))) #6#) (system::mf (lisp::quote #12=#:g1037) 13) (system::putprop (lisp::quote serror::wrong-type-argument) (lisp::symbol-function (lisp::quote #12#)) #8#) (system::putprop (lisp::quote serror::wrong-type-argument) lisp::nil #9#) (system::mf (lisp::quote serror::|TOO-FEW-ARGUMENTS-tester|) 14) (system::putprop (lisp::quote serror::too-few-arguments) (lisp::quote (lisp::deftype serror::too-few-arguments lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|TOO-FEW-ARGUMENTS-tester|))))) #6#) (system::mf (lisp::quote #13=#:g1038) 15) (system::putprop (lisp::quote serror::too-few-arguments) (lisp::symbol-function (lisp::quote #13#)) #8#) (system::putprop (lisp::quote serror::too-few-arguments) lisp::nil #9#) (system::mf (lisp::quote serror::|TOO-MANY-ARGUMENTS-tester|) 16) (system::putprop (lisp::quote serror::too-many-arguments) (lisp::quote (lisp::deftype serror::too-many-arguments lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|TOO-MANY-ARGUMENTS-tester|))))) #6#) (system::mf (lisp::quote #14=#:g1039) 17) (system::putprop (lisp::quote serror::too-many-arguments) (lisp::symbol-function (lisp::quote #14#)) #8#) (system::putprop (lisp::quote serror::too-many-arguments) lisp::nil #9#) (system::mf (lisp::quote serror::|UNEXPECTED-KEYWORD-tester|) 18) (system::putprop (lisp::quote serror::unexpected-keyword) (lisp::quote (lisp::deftype serror::unexpected-keyword lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNEXPECTED-KEYWORD-tester|))))) #6#) (system::mf (lisp::quote #15=#:g1040) 19) (system::putprop (lisp::quote serror::unexpected-keyword) (lisp::symbol-function (lisp::quote #15#)) #8#) (system::putprop (lisp::quote serror::unexpected-keyword) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-FORM-tester|) 20) (system::putprop (lisp::quote serror::invalid-form) (lisp::quote (lisp::deftype serror::invalid-form lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-FORM-tester|))))) #6#) (system::mf (lisp::quote #16=#:g1041) 21) (system::putprop (lisp::quote serror::invalid-form) (lisp::symbol-function (lisp::quote #16#)) #8#) (system::putprop (lisp::quote serror::invalid-form) lisp::nil #9#) (system::mf (lisp::quote serror::|UNBOUND-VARIABLE-tester|) 22) (system::putprop (lisp::quote serror::unbound-variable) (lisp::quote (lisp::deftype serror::unbound-variable lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNBOUND-VARIABLE-tester|))))) #6#) (system::mf (lisp::quote #17=#:g1042) 23) (system::putprop (lisp::quote serror::unbound-variable) (lisp::symbol-function (lisp::quote #17#)) #8#) (system::putprop (lisp::quote serror::unbound-variable) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-VARIABLE-tester|) 24) (system::putprop (lisp::quote serror::invalid-variable) (lisp::quote (lisp::deftype serror::invalid-variable lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-VARIABLE-tester|))))) #6#) (system::mf (lisp::quote #18=#:g1043) 25) (system::putprop (lisp::quote serror::invalid-variable) (lisp::symbol-function (lisp::quote #18#)) #8#) (system::putprop (lisp::quote serror::invalid-variable) lisp::nil #9#) (system::mf (lisp::quote serror::|UNDEFINED-FUNCTION-tester|) 26) (system::putprop (lisp::quote serror::undefined-function) (lisp::quote (lisp::deftype serror::undefined-function lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNDEFINED-FUNCTION-tester|))))) #6#) (system::mf (lisp::quote #19=#:g1044) 27) (system::putprop (lisp::quote serror::undefined-function) (lisp::symbol-function (lisp::quote #19#)) #8#) (system::putprop (lisp::quote serror::undefined-function) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-FUNCTION-tester|) 28) (system::putprop (lisp::quote serror::invalid-function) (lisp::quote (lisp::deftype serror::invalid-function lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-FUNCTION-tester|))))) #6#) (system::mf (lisp::quote #20=#:g1045) 29) (system::putprop (lisp::quote serror::invalid-function) (lisp::symbol-function (lisp::quote #20#)) #8#) (system::putprop (lisp::quote serror::invalid-function) lisp::nil #9#) (system::mm (lisp::quote serror::condition-case) 30))))    (t 0))" #4#) (system::putprop (lisp::quote serror::cond-any-error) (lisp::quote 2) #5#) (system::mm (lisp::quote serror::cond-any-error) 2) (system::mfvfun (lisp::quote system::universal-error-handler) 3 16384) (system::mf (lisp::quote serror::inf-signal) 4) (system::putprop (lisp::quote serror::def-error-type) (lisp::quote 2) #5#) (system::mm (lisp::quote serror::def-error-type) 5) (system::mf (lisp::quote serror::|WTA-tester|) 6) (system::putprop (lisp::quote serror::wta) (lisp::quote (lisp::deftype serror::wta lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|WTA-tester|))))) #6=(lisp::quote system::deftype-form)) (system::mf (lisp::quote #7=#:g1034) 7) (system::putprop (lisp::quote serror::wta) (lisp::symbol-function (lisp::quote #7#)) #8=(lisp::quote system::deftype-definition)) (system::putprop (lisp::quote serror::wta) lisp::nil #9=(lisp::quote system::type-documentation)) (system::mf (lisp::quote serror::|SUBSCRIPT-OUT-OF-BOUNDS-tester|) 8) (system::putprop (lisp::quote serror::subscript-out-of-bounds) (lisp::quote (lisp::deftype serror::subscript-out-of-bounds lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|SUBSCRIPT-OUT-OF-BOUNDS-tester|))))) #6#) (system::mf (lisp::quote #10=#:g1035) 9) (system::putprop (lisp::quote serror::subscript-out-of-bounds) (lisp::symbol-function (lisp::quote #10#)) #8#) (system::putprop (lisp::quote serror::subscript-out-of-bounds) lisp::nil #9#) (system::mf (lisp::quote serror::|ERROR-tester|) 10) (system::putprop (lisp::quote lisp::error) (lisp::quote (lisp::deftype lisp::error lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|ERROR-tester|))))) #6#) (system::mf (lisp::quote #11=#:g1036) 11) (system::putprop (lisp::quote lisp::error) (lisp::symbol-function (lisp::quote #11#)) #8#) (system::putprop (lisp::quote lisp::error) lisp::nil #9#) (system::mf (lisp::quote serror::|WRONG-TYPE-ARGUMENT-tester|) 12) (system::putprop (lisp::quote serror::wrong-type-argument) (lisp::quote (lisp::deftype serror::wrong-type-argument lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|WRONG-TYPE-ARGUMENT-tester|))))) #6#) (system::mf (lisp::quote #12=#:g1037) 13) (system::putprop (lisp::quote serror::wrong-type-argument) (lisp::symbol-function (lisp::quote #12#)) #8#) (system::putprop (lisp::quote serror::wrong-type-argument) lisp::nil #9#) (system::mf (lisp::quote serror::|TOO-FEW-ARGUMENTS-tester|) 14) (system::putprop (lisp::quote serror::too-few-arguments) (lisp::quote (lisp::deftype serror::too-few-arguments lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|TOO-FEW-ARGUMENTS-tester|))))) #6#) (system::mf (lisp::quote #13=#:g1038) 15) (system::putprop (lisp::quote serror::too-few-arguments) (lisp::symbol-function (lisp::quote #13#)) #8#) (system::putprop (lisp::quote serror::too-few-arguments) lisp::nil #9#) (system::mf (lisp::quote serror::|TOO-MANY-ARGUMENTS-tester|) 16) (system::putprop (lisp::quote serror::too-many-arguments) (lisp::quote (lisp::deftype serror::too-many-arguments lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|TOO-MANY-ARGUMENTS-tester|))))) #6#) (system::mf (lisp::quote #14=#:g1039) 17) (system::putprop (lisp::quote serror::too-many-arguments) (lisp::symbol-function (lisp::quote #14#)) #8#) (system::putprop (lisp::quote serror::too-many-arguments) lisp::nil #9#) (system::mf (lisp::quote serror::|UNEXPECTED-KEYWORD-tester|) 18) (system::putprop (lisp::quote serror::unexpected-keyword) (lisp::quote (lisp::deftype serror::unexpected-keyword lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNEXPECTED-KEYWORD-tester|))))) #6#) (system::mf (lisp::quote #15=#:g1040) 19) (system::putprop (lisp::quote serror::unexpected-keyword) (lisp::symbol-function (lisp::quote #15#)) #8#) (system::putprop (lisp::quote serror::unexpected-keyword) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-FORM-tester|) 20) (system::putprop (lisp::quote serror::invalid-form) (lisp::quote (lisp::deftype serror::invalid-form lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-FORM-tester|))))) #6#) (system::mf (lisp::quote #16=#:g1041) 21) (system::putprop (lisp::quote serror::invalid-form) (lisp::symbol-function (lisp::quote #16#)) #8#) (system::putprop (lisp::quote serror::invalid-form) lisp::nil #9#) (system::mf (lisp::quote serror::|UNBOUND-VARIABLE-tester|) 22) (system::putprop (lisp::quote lisp::unbound-variable) (lisp::quote (lisp::deftype lisp::unbound-variable lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNBOUND-VARIABLE-tester|))))) #6#) (system::mf (lisp::quote #17=#:g1042) 23) (system::putprop (lisp::quote lisp::unbound-variable) (lisp::symbol-function (lisp::quote #17#)) #8#) (system::putprop (lisp::quote lisp::unbound-variable) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-VARIABLE-tester|) 24) (system::putprop (lisp::quote serror::invalid-variable) (lisp::quote (lisp::deftype serror::invalid-variable lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-VARIABLE-tester|))))) #6#) (system::mf (lisp::quote #18=#:g1043) 25) (system::putprop (lisp::quote serror::invalid-variable) (lisp::symbol-function (lisp::quote #18#)) #8#) (system::putprop (lisp::quote serror::invalid-variable) lisp::nil #9#) (system::mf (lisp::quote serror::|UNDEFINED-FUNCTION-tester|) 26) (system::putprop (lisp::quote lisp::undefined-function) (lisp::quote (lisp::deftype lisp::undefined-function lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|UNDEFINED-FUNCTION-tester|))))) #6#) (system::mf (lisp::quote #19=#:g1044) 27) (system::putprop (lisp::quote lisp::undefined-function) (lisp::symbol-function (lisp::quote #19#)) #8#) (system::putprop (lisp::quote lisp::undefined-function) lisp::nil #9#) (system::mf (lisp::quote serror::|INVALID-FUNCTION-tester|) 28) (system::putprop (lisp::quote serror::invalid-function) (lisp::quote (lisp::deftype serror::invalid-function lisp::nil (lisp::list #0# #1# (lisp::list #2# (lisp::quote serror::|INVALID-FUNCTION-tester|))))) #6#) (system::mf (lisp::quote #20=#:g1045) 29) (system::putprop (lisp::quote serror::invalid-function) (lisp::symbol-function (lisp::quote #20#)) #8#) (system::putprop (lisp::quote serror::invalid-function) lisp::nil #9#) (system::mm (lisp::quote serror::condition-case) 30))))
23  )  )

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

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