comparison src/data.c @ 5381:4f39e57a82b4

Improve read-only error reporting. -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2011-03-17 Didier Verna <didier@xemacs.org> * data.c (init_errors_once_early): Define Qextent_read_only error. * lisp.h: Declare it. * extents.c (verify_extent_mapper): Signal an extent-read-only error instead of a buffer-read-only one.
author Didier Verna <didier@lrde.epita.fr>
date Thu, 17 Mar 2011 16:20:09 +0100
parents d967d96ca043
children 4dee0387b9de
comparison
equal deleted inserted replaced
5380:919c77c567bb 5381:4f39e57a82b4
48 Lisp_Object Qvoid_variable, Qcyclic_variable_indirection; 48 Lisp_Object Qvoid_variable, Qcyclic_variable_indirection;
49 Lisp_Object Qvoid_function, Qcyclic_function_indirection; 49 Lisp_Object Qvoid_function, Qcyclic_function_indirection;
50 Lisp_Object Qinvalid_operation, Qinvalid_change, Qprinting_unreadable_object; 50 Lisp_Object Qinvalid_operation, Qinvalid_change, Qprinting_unreadable_object;
51 Lisp_Object Qsetting_constant; 51 Lisp_Object Qsetting_constant;
52 Lisp_Object Qediting_error; 52 Lisp_Object Qediting_error;
53 Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; 53 Lisp_Object Qbeginning_of_buffer, Qend_of_buffer;
54 Lisp_Object Qbuffer_read_only, Qextent_read_only;
54 Lisp_Object Qio_error, Qfile_error, Qconversion_error, Qend_of_file; 55 Lisp_Object Qio_error, Qfile_error, Qconversion_error, Qend_of_file;
55 Lisp_Object Qtext_conversion_error; 56 Lisp_Object Qtext_conversion_error;
56 Lisp_Object Qarith_error, Qrange_error, Qdomain_error; 57 Lisp_Object Qarith_error, Qrange_error, Qdomain_error;
57 Lisp_Object Qsingularity_error, Qoverflow_error, Qunderflow_error; 58 Lisp_Object Qsingularity_error, Qoverflow_error, Qunderflow_error;
58 Lisp_Object Qintegerp, Qnatnump, Qnonnegativep, Qsymbolp; 59 Lisp_Object Qintegerp, Qnatnump, Qnonnegativep, Qsymbolp;
3491 3492
3492 DEFERROR_STANDARD (Qediting_error, Qinvalid_operation); 3493 DEFERROR_STANDARD (Qediting_error, Qinvalid_operation);
3493 DEFERROR_STANDARD (Qbeginning_of_buffer, Qediting_error); 3494 DEFERROR_STANDARD (Qbeginning_of_buffer, Qediting_error);
3494 DEFERROR_STANDARD (Qend_of_buffer, Qediting_error); 3495 DEFERROR_STANDARD (Qend_of_buffer, Qediting_error);
3495 DEFERROR (Qbuffer_read_only, "Buffer is read-only", Qediting_error); 3496 DEFERROR (Qbuffer_read_only, "Buffer is read-only", Qediting_error);
3497 DEFERROR (Qextent_read_only, "Extent is read-only", Qediting_error);
3496 3498
3497 DEFERROR (Qio_error, "IO Error", Qinvalid_operation); 3499 DEFERROR (Qio_error, "IO Error", Qinvalid_operation);
3498 DEFERROR_STANDARD (Qfile_error, Qio_error); 3500 DEFERROR_STANDARD (Qfile_error, Qio_error);
3499 DEFERROR (Qend_of_file, "End of file or stream", Qfile_error); 3501 DEFERROR (Qend_of_file, "End of file or stream", Qfile_error);
3500 DEFERROR_STANDARD (Qconversion_error, Qio_error); 3502 DEFERROR_STANDARD (Qconversion_error, Qio_error);