79 |
("FEpackage_error" :package-error "A package error occurred on ~S: ~S." |
("FEpackage_error" :package-error "A package error occurred on ~S: ~S." |
80 |
internal-package-error :package :message) ; |<function>| |top - base| |
internal-package-error :package :message) ; |<function>| |top - base| |
81 |
("FEtoo_few_arguments" :too-few-arguments "~S [or a callee] requires more than ~R argument~:p." |
("FEtoo_few_arguments" :too-few-arguments "~S [or a callee] requires more than ~R argument~:p." |
82 |
internal-simple-control-error) ; |<function>| |top - base| |
internal-simple-program-error) ; |<function>| |top - base| |
83 |
("FEtoo_few_argumentsF" :too-few-arguments "Too few arguments." |
; ("FEtoo_few_argumentsF" :too-few-arguments "Too few arguments." |
84 |
internal-simple-control-error) ; |<function>| |args| |
; internal-simple-control-error) ; |<function>| |args| |
85 |
("FEtoo_many_arguments" :too-many-arguments "~S [or a callee] requires less than ~R argument~:p." |
("FEtoo_many_arguments" :too-many-arguments "~S [or a callee] requires less than ~R argument~:p." |
86 |
internal-simple-control-error) ; |<function>| |top - base| |
internal-simple-program-error) ; |<function>| |top - base| |
87 |
("FEtoo_many_argumentsF" :too-many-arguments "Too many arguments." |
; ("FEtoo_many_argumentsF" :too-many-arguments "Too many arguments." |
88 |
internal-simple-control-error) ; |<function>| |args| |
; internal-simple-control-error) ; |<function>| |args| |
89 |
("FEinvalid_macro_call" :invalid-form "Invalid macro call to ~S." |
("FEinvalid_macro_call" :invalid-form "Invalid macro call to ~S." |
90 |
internal-simple-program-error) ; |<function>| |
internal-simple-program-error) ; |<function>| |
91 |
("FEunexpected_keyword" :unexpected-keyword "~S does not allow the keyword ~S." |
("FEunexpected_keyword" :unexpected-keyword "~S does not allow the keyword ~S." |
92 |
internal-simple-control-error) ; |<function>| |key| |
internal-simple-program-error) ; |<function>| |key| |
93 |
("FEunbound_variable" :unbound-variable "The variable ~S is unbound." |
("FEunbound_variable" :unbound-variable "The variable ~S is unbound." |
94 |
internal-unbound-variable :name) ; |sym| |
internal-unbound-variable :name) ; |sym| |
95 |
("FEundefined_function" :undefined-function "The function ~S is undefined." |
("FEundefined_function" :undefined-function "The function ~S is undefined." |
98 |
internal-simple-program-error) ; |obj| |
internal-simple-program-error) ; |obj| |
99 |
("check_arg_failed" :too-few-arguments "~S [or a callee] requires ~R argument~:p,~%\ |
("check_arg_failed" :too-few-arguments "~S [or a callee] requires ~R argument~:p,~%\ |
100 |
but only ~R ~:*~[were~;was~:;were~] supplied." |
but only ~R ~:*~[were~;was~:;were~] supplied." |
101 |
internal-simple-control-error) ; |<function>| |n| |top - base| |
internal-simple-program-error) ; |<function>| |n| |top - base| |
102 |
("check_arg_failed" :too-many-arguments "~S [or a callee] requires only ~R argument~:p,~%\ |
; ("check_arg_failed" :too-many-arguments "~S [or a callee] requires only ~R argument~:p,~%\ |
103 |
but ~R ~:*~[were~;was~:;were~] supplied." |
;but ~R ~:*~[were~;was~:;were~] supplied." |
104 |
internal-simple-control-error) ; |<function>| |n| |top - base| |
; internal-simple-program-error) ; |<function>| |n| |top - base| |
105 |
("ck_larg_at_least" :error "APPLY sended too few arguments to LAMBDA." |
("ck_larg_at_least" :error "APPLY sended too few arguments to LAMBDA." |
106 |
internal-simple-control-error) |
internal-simple-control-error) |
107 |
("ck_larg_exactly" :error "APPLY sended too few arguments to LAMBDA." |
("ck_larg_exactly" :error "APPLY sended too few arguments to LAMBDA." |
108 |
internal-simple-control-error) |
internal-simple-control-error) |
109 |
("keyword_value_mismatch" :error "Keywords and values do not match." |
("keyword_value_mismatch" :error "Keywords and values do not match." |
110 |
internal-simple-error) ;?? |
internal-simple-program-error) ;?? |
111 |
("not_a_keyword" :error "~S is not a keyword." |
("not_a_keyword" :error "~S is not a keyword." |
112 |
internal-simple-error) ;?? |
internal-simple-program-error) ;?? |
113 |
("illegal_declare" :invalid-form "~S is an illegal declaration form." |
("illegal_declare" :invalid-form "~S is an illegal declaration form." |
114 |
internal-simple-program-error) |
internal-simple-program-error) |
115 |
("not_a_symbol" :invalid-variable "~S is not a symbol." |
("not_a_symbol" :invalid-variable "~S is not a symbol." |
120 |
internal-simple-error) |
internal-simple-error) |
121 |
("vfun_wrong_number_of_args" :error "Expected ~S args but received ~S args" |
("vfun_wrong_number_of_args" :error "Expected ~S args but received ~S args" |
122 |
internal-simple-control-error) |
internal-simple-control-error) |
|
|
|
123 |
("end_of_stream" :error "Unexpected end of ~S." |
("end_of_stream" :error "Unexpected end of ~S." |
124 |
internal-end-of-file :stream) |
internal-end-of-file :stream) |
125 |
("open_stream" :error "~S is an illegal IF-DOES-NOT-EXIST option." |
("open_stream" :error "~S is an illegal IF-DOES-NOT-EXIST option." |