Mercurial > emacs
comparison src/buffer.c @ 9438:d9dc17134dde
(buffer_slot_type_mismatch): Test against Lisp_Misc.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 11 Oct 1994 07:46:22 +0000 |
| parents | 06c286dec485 |
| children | 4bb620c9a075 |
comparison
equal
deleted
inserted
replaced
| 9437:c7d7fb56b42d | 9438:d9dc17134dde |
|---|---|
| 2438 | 2438 |
| 2439 switch (XINT (*(Lisp_Object *)(offset + (char *)&buffer_local_types))) | 2439 switch (XINT (*(Lisp_Object *)(offset + (char *)&buffer_local_types))) |
| 2440 { | 2440 { |
| 2441 case Lisp_Int: type_name = "integers"; break; | 2441 case Lisp_Int: type_name = "integers"; break; |
| 2442 case Lisp_String: type_name = "strings"; break; | 2442 case Lisp_String: type_name = "strings"; break; |
| 2443 case Lisp_Marker: type_name = "markers"; break; | 2443 case Lisp_Misc: type_name = "markers"; break; |
| 2444 case Lisp_Symbol: type_name = "symbols"; break; | 2444 case Lisp_Symbol: type_name = "symbols"; break; |
| 2445 case Lisp_Cons: type_name = "lists"; break; | 2445 case Lisp_Cons: type_name = "lists"; break; |
| 2446 case Lisp_Vector: type_name = "vectors"; break; | 2446 case Lisp_Vector: type_name = "vectors"; break; |
| 2447 default: | 2447 default: |
| 2448 abort (); | 2448 abort (); |
