diff options
| author | Jan D | 2010-07-02 14:19:53 +0200 |
|---|---|---|
| committer | Jan D | 2010-07-02 14:19:53 +0200 |
| commit | f57e2426f0e8a6b251be71b6f62237fd286998ea (patch) | |
| tree | a8db36e415ea69b4196881b44122454317510f46 /src/lread.c | |
| parent | 383e09700c9b3d175c506301d363be4597827db7 (diff) | |
| download | emacs-f57e2426f0e8a6b251be71b6f62237fd286998ea.tar.gz emacs-f57e2426f0e8a6b251be71b6f62237fd286998ea.zip | |
Remove __P and P_ from .c and .m files and definition of P_
* lisp.h:
* atimer.h: Remove define for P_.
* alloc.c: Remove __P and P_ from .c and .m files.
* atimer.c:
* buffer.c:
* callint.c:
* category.c:
* charset.c:
* chartab.c:
* cm.c:
* coding.c:
* composite.c:
* data.c:
* dired.c:
* dispnew.c:
* doc.c:
* editfns.c:
* emacs.c:
* eval.c:
* fileio.c:
* filelock.c:
* fns.c:
* font.c:
* fontset.c:
* frame.c:
* ftfont.c:
* ftxfont.c:
* gmalloc.c:
* gtkutil.c:
* image.c:
* indent.c:
* intervals.c:
* keyboard.c:
* keymap.c:
* lread.c:
* marker.c:
* menu.c:
* minibuf.c:
* print.c:
* process.c:
* scroll.c:
* search.c:
* sound.c:
* strftime.c:
* syntax.c:
* sysdep.c:
* term.c:
* terminal.c:
* textprop.c:
* unexalpha.c:
* w32console.c:
* w32fns.c:
* w32font.c:
* w32menu.c:
* w32term.c:
* w32uniscribe.c:
* window.c:
* xdisp.c:
* xfaces.c:
* xfns.c:
* xfont.c:
* xftfont.c:
* xmenu.c:
* xselect.c:
* xterm.c: Likewise.
* ebrowse.c: Remove P_ and __P.
* etags.c:
* movemail.c:
* pop.c:
* update-game-score.c: Likewise.
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 54 |
1 files changed, 27 insertions, 27 deletions
diff --git a/src/lread.c b/src/lread.c index c73f7f32e51..16efd7114ea 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -219,18 +219,18 @@ int force_load_messages; | |||
| 219 | 219 | ||
| 220 | static Lisp_Object Vbytecomp_version_regexp; | 220 | static Lisp_Object Vbytecomp_version_regexp; |
| 221 | 221 | ||
| 222 | static int read_emacs_mule_char P_ ((int, int (*) (int, Lisp_Object), | 222 | static int read_emacs_mule_char (int, int (*) (int, Lisp_Object), |
| 223 | Lisp_Object)); | 223 | Lisp_Object); |
| 224 | 224 | ||
| 225 | static void readevalloop P_ ((Lisp_Object, FILE*, Lisp_Object, | 225 | static void readevalloop (Lisp_Object, FILE*, Lisp_Object, |
| 226 | Lisp_Object (*) (), int, | 226 | Lisp_Object (*) (), int, |
| 227 | Lisp_Object, Lisp_Object, | 227 | Lisp_Object, Lisp_Object, |
| 228 | Lisp_Object, Lisp_Object)); | 228 | Lisp_Object, Lisp_Object); |
| 229 | static Lisp_Object load_unwind P_ ((Lisp_Object)); | 229 | static Lisp_Object load_unwind (Lisp_Object); |
| 230 | static Lisp_Object load_descriptor_unwind P_ ((Lisp_Object)); | 230 | static Lisp_Object load_descriptor_unwind (Lisp_Object); |
| 231 | 231 | ||
| 232 | static void invalid_syntax P_ ((const char *, int)) NO_RETURN; | 232 | static void invalid_syntax (const char *, int) NO_RETURN; |
| 233 | static void end_of_file_error P_ (()) NO_RETURN; | 233 | static void end_of_file_error () NO_RETURN; |
| 234 | 234 | ||
| 235 | 235 | ||
| 236 | /* Functions that read one byte from the current source READCHARFUN | 236 | /* Functions that read one byte from the current source READCHARFUN |
| @@ -239,9 +239,9 @@ static void end_of_file_error P_ (()) NO_RETURN; | |||
| 239 | is 0 or positive, it unreads C, and the return value is not | 239 | is 0 or positive, it unreads C, and the return value is not |
| 240 | interesting. */ | 240 | interesting. */ |
| 241 | 241 | ||
| 242 | static int readbyte_for_lambda P_ ((int, Lisp_Object)); | 242 | static int readbyte_for_lambda (int, Lisp_Object); |
| 243 | static int readbyte_from_file P_ ((int, Lisp_Object)); | 243 | static int readbyte_from_file (int, Lisp_Object); |
| 244 | static int readbyte_from_string P_ ((int, Lisp_Object)); | 244 | static int readbyte_from_string (int, Lisp_Object); |
| 245 | 245 | ||
| 246 | /* Handle unreading and rereading of characters. | 246 | /* Handle unreading and rereading of characters. |
| 247 | Write READCHAR to read a character, | 247 | Write READCHAR to read a character, |
| @@ -268,7 +268,7 @@ readchar (readcharfun, multibyte) | |||
| 268 | { | 268 | { |
| 269 | Lisp_Object tem; | 269 | Lisp_Object tem; |
| 270 | register int c; | 270 | register int c; |
| 271 | int (*readbyte) P_ ((int, Lisp_Object)); | 271 | int (*readbyte) (int, Lisp_Object); |
| 272 | unsigned char buf[MAX_MULTIBYTE_LENGTH]; | 272 | unsigned char buf[MAX_MULTIBYTE_LENGTH]; |
| 273 | int i, len; | 273 | int i, len; |
| 274 | int emacs_mule_encoding = 0; | 274 | int emacs_mule_encoding = 0; |
| @@ -575,7 +575,7 @@ extern char emacs_mule_bytes[256]; | |||
| 575 | static int | 575 | static int |
| 576 | read_emacs_mule_char (c, readbyte, readcharfun) | 576 | read_emacs_mule_char (c, readbyte, readcharfun) |
| 577 | int c; | 577 | int c; |
| 578 | int (*readbyte) P_ ((int, Lisp_Object)); | 578 | int (*readbyte) (int, Lisp_Object); |
| 579 | Lisp_Object readcharfun; | 579 | Lisp_Object readcharfun; |
| 580 | { | 580 | { |
| 581 | /* Emacs-mule coding uses at most 4-byte for one character. */ | 581 | /* Emacs-mule coding uses at most 4-byte for one character. */ |
| @@ -635,19 +635,19 @@ read_emacs_mule_char (c, readbyte, readcharfun) | |||
| 635 | } | 635 | } |
| 636 | 636 | ||
| 637 | 637 | ||
| 638 | static Lisp_Object read_internal_start P_ ((Lisp_Object, Lisp_Object, | 638 | static Lisp_Object read_internal_start (Lisp_Object, Lisp_Object, |
| 639 | Lisp_Object)); | 639 | Lisp_Object); |
| 640 | static Lisp_Object read0 P_ ((Lisp_Object)); | 640 | static Lisp_Object read0 (Lisp_Object); |
| 641 | static Lisp_Object read1 P_ ((Lisp_Object, int *, int)); | 641 | static Lisp_Object read1 (Lisp_Object, int *, int); |
| 642 | 642 | ||
| 643 | static Lisp_Object read_list P_ ((int, Lisp_Object)); | 643 | static Lisp_Object read_list (int, Lisp_Object); |
| 644 | static Lisp_Object read_vector P_ ((Lisp_Object, int)); | 644 | static Lisp_Object read_vector (Lisp_Object, int); |
| 645 | 645 | ||
| 646 | static Lisp_Object substitute_object_recurse P_ ((Lisp_Object, Lisp_Object, | 646 | static Lisp_Object substitute_object_recurse (Lisp_Object, Lisp_Object, |
| 647 | Lisp_Object)); | 647 | Lisp_Object); |
| 648 | static void substitute_object_in_subtree P_ ((Lisp_Object, | 648 | static void substitute_object_in_subtree (Lisp_Object, |
| 649 | Lisp_Object)); | 649 | Lisp_Object); |
| 650 | static void substitute_in_interval P_ ((INTERVAL, Lisp_Object)); | 650 | static void substitute_in_interval (INTERVAL, Lisp_Object); |
| 651 | 651 | ||
| 652 | 652 | ||
| 653 | /* Get a character from the tty. */ | 653 | /* Get a character from the tty. */ |
| @@ -3873,7 +3873,7 @@ hash_string (ptr, len) | |||
| 3873 | void | 3873 | void |
| 3874 | map_obarray (obarray, fn, arg) | 3874 | map_obarray (obarray, fn, arg) |
| 3875 | Lisp_Object obarray; | 3875 | Lisp_Object obarray; |
| 3876 | void (*fn) P_ ((Lisp_Object, Lisp_Object)); | 3876 | void (*fn) (Lisp_Object, Lisp_Object); |
| 3877 | Lisp_Object arg; | 3877 | Lisp_Object arg; |
| 3878 | { | 3878 | { |
| 3879 | register int i; | 3879 | register int i; |