Mercurial > emacs
comparison src/editfns.c @ 46464:e05dd5b81fc7
(general_insert_function): Insertion function now
takes pointer to const for input data.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Tue, 16 Jul 2002 19:48:12 +0000 |
parents | 8e01c92219ab |
children | 8587dd21917c |
comparison
equal
deleted
inserted
replaced
46463:8cdf38364f8d | 46464:e05dd5b81fc7 |
---|---|
74 static void update_buffer_properties P_ ((int, int)); | 74 static void update_buffer_properties P_ ((int, int)); |
75 static Lisp_Object region_limit P_ ((int)); | 75 static Lisp_Object region_limit P_ ((int)); |
76 static int lisp_time_argument P_ ((Lisp_Object, time_t *, int *)); | 76 static int lisp_time_argument P_ ((Lisp_Object, time_t *, int *)); |
77 static size_t emacs_memftimeu P_ ((char *, size_t, const char *, | 77 static size_t emacs_memftimeu P_ ((char *, size_t, const char *, |
78 size_t, const struct tm *, int)); | 78 size_t, const struct tm *, int)); |
79 static void general_insert_function P_ ((void (*) (unsigned char *, int), | 79 static void general_insert_function P_ ((void (*) (const unsigned char *, int), |
80 void (*) (Lisp_Object, int, int, int, | 80 void (*) (Lisp_Object, int, int, int, |
81 int, int), | 81 int, int), |
82 int, int, Lisp_Object *)); | 82 int, int, Lisp_Object *)); |
83 static Lisp_Object subst_char_in_region_unwind P_ ((Lisp_Object)); | 83 static Lisp_Object subst_char_in_region_unwind P_ ((Lisp_Object)); |
84 static Lisp_Object subst_char_in_region_unwind_1 P_ ((Lisp_Object)); | 84 static Lisp_Object subst_char_in_region_unwind_1 P_ ((Lisp_Object)); |
1899 INSERT_FROM_STRING_FUNC as the last argument. */ | 1899 INSERT_FROM_STRING_FUNC as the last argument. */ |
1900 | 1900 |
1901 static void | 1901 static void |
1902 general_insert_function (insert_func, insert_from_string_func, | 1902 general_insert_function (insert_func, insert_from_string_func, |
1903 inherit, nargs, args) | 1903 inherit, nargs, args) |
1904 void (*insert_func) P_ ((unsigned char *, int)); | 1904 void (*insert_func) P_ ((const unsigned char *, int)); |
1905 void (*insert_from_string_func) P_ ((Lisp_Object, int, int, int, int, int)); | 1905 void (*insert_from_string_func) P_ ((Lisp_Object, int, int, int, int, int)); |
1906 int inherit, nargs; | 1906 int inherit, nargs; |
1907 register Lisp_Object *args; | 1907 register Lisp_Object *args; |
1908 { | 1908 { |
1909 register int argnum; | 1909 register int argnum; |