Mercurial > emacs
changeset 42274:093178b691f0
(wrong_type_argument): Remove mocklisp case.
| author | Pavel Janík <Pavel@Janik.cz> |
|---|---|
| date | Sat, 22 Dec 2001 13:58:42 +0000 |
| parents | c72c3ea311e6 |
| children | 4bb44400f978 |
| files | src/data.c |
| diffstat | 1 files changed, 0 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/src/data.c Sat Dec 22 13:57:51 2001 +0000 +++ b/src/data.c Sat Dec 22 13:58:42 2001 +0000 @@ -114,15 +114,6 @@ register Lisp_Object tem; do { - if (!EQ (Vmocklisp_arguments, Qt)) - { - if (STRINGP (value) && - (EQ (predicate, Qintegerp) || EQ (predicate, Qinteger_or_marker_p))) - return Fstring_to_number (value, Qnil); - if (INTEGERP (value) && EQ (predicate, Qstringp)) - return Fnumber_to_string (value); - } - /* If VALUE is not even a valid Lisp object, abort here where we can get a backtrace showing where it came from. */ if ((unsigned int) XGCTYPE (value) >= Lisp_Type_Limit)