Mercurial > emacs
diff src/data.c @ 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 | f5dbdfc9fe27 |
| children | bc5d63652a0a 1b036641f108 |
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)
