mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-15 05:43:19 -08:00
Code Issues Projects Releases Packages Wiki Activity

Removed unused FEtype_error_flaot

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2010-02-25 17:38:14 +01:00
parent 871104a0cc
commit 6dac1d197f
2 changed files with 0 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/c/typespec.d
View file

@ -22,11 +22,6 @@ FEtype_error_cons(cl_object x) {
FEwrong_type_argument(@'cons', x);
}
void
FEtype_error_float(cl_object x) {
FEwrong_type_argument(@'float', x);
}
void
FEtype_error_list(cl_object x) {
FEwrong_type_argument(@'list', x);

1
src/h/external.h
View file

@ -1698,7 +1698,6 @@ extern ECL_API void assert_type_proper_list(cl_object p);
extern ECL_API cl_object cl_type_of(cl_object x);
extern ECL_API void FEtype_error_cons(cl_object x) ecl_attr_noreturn;
extern ECL_API void FEtype_error_float(cl_object x) ecl_attr_noreturn;
extern ECL_API void FEtype_error_list(cl_object x) ecl_attr_noreturn;
extern ECL_API void FEtype_error_proper_list(cl_object x) ecl_attr_noreturn;
extern ECL_API void FEtype_error_alist(cl_object x) ecl_attr_noreturn;