Mercurial > emacs
comparison src/fns.c @ 109100:2bc9a0c04c87
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.
author | Jan D <jan.h.d@swipnet.se> |
---|---|
date | Fri, 02 Jul 2010 14:19:53 +0200 |
parents | d418516def73 |
children | aec1143e8d85 |
comparison
equal
deleted
inserted
replaced
109099:e16f43875a48 | 109100:2bc9a0c04c87 |
---|---|
72 Lisp_Object Qwidget_type; | 72 Lisp_Object Qwidget_type; |
73 Lisp_Object Qcodeset, Qdays, Qmonths, Qpaper; | 73 Lisp_Object Qcodeset, Qdays, Qmonths, Qpaper; |
74 | 74 |
75 extern Lisp_Object Qinput_method_function; | 75 extern Lisp_Object Qinput_method_function; |
76 | 76 |
77 static int internal_equal P_ ((Lisp_Object , Lisp_Object, int, int)); | 77 static int internal_equal (Lisp_Object , Lisp_Object, int, int); |
78 | 78 |
79 extern long get_random (); | 79 extern long get_random (); |
80 extern void seed_random P_ ((long)); | 80 extern void seed_random (long); |
81 | 81 |
82 #ifndef HAVE_UNISTD_H | 82 #ifndef HAVE_UNISTD_H |
83 extern long time (); | 83 extern long time (); |
84 #endif | 84 #endif |
85 | 85 |
381 | 381 |
382 #if __GNUC__ | 382 #if __GNUC__ |
383 /* "gcc -O3" enables automatic function inlining, which optimizes out | 383 /* "gcc -O3" enables automatic function inlining, which optimizes out |
384 the arguments for the invocations of this function, whereas it | 384 the arguments for the invocations of this function, whereas it |
385 expects these values on the stack. */ | 385 expects these values on the stack. */ |
386 static Lisp_Object concat P_ ((int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special)) __attribute__((noinline)); | 386 static Lisp_Object concat (int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special) __attribute__((noinline)); |
387 #else /* !__GNUC__ */ | 387 #else /* !__GNUC__ */ |
388 static Lisp_Object concat P_ ((int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special)); | 388 static Lisp_Object concat (int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special); |
389 #endif | 389 #endif |
390 | 390 |
391 /* ARGSUSED */ | 391 /* ARGSUSED */ |
392 Lisp_Object | 392 Lisp_Object |
393 concat2 (s1, s2) | 393 concat2 (s1, s2) |
3222 | 3222 |
3223 The octets are divided into 6 bit chunks, which are then encoded into | 3223 The octets are divided into 6 bit chunks, which are then encoded into |
3224 base64 characters. */ | 3224 base64 characters. */ |
3225 | 3225 |
3226 | 3226 |
3227 static int base64_encode_1 P_ ((const char *, char *, int, int, int)); | 3227 static int base64_encode_1 (const char *, char *, int, int, int); |
3228 static int base64_decode_1 P_ ((const char *, char *, int, int, int *)); | 3228 static int base64_decode_1 (const char *, char *, int, int, int *); |
3229 | 3229 |
3230 DEFUN ("base64-encode-region", Fbase64_encode_region, Sbase64_encode_region, | 3230 DEFUN ("base64-encode-region", Fbase64_encode_region, Sbase64_encode_region, |
3231 2, 3, "r", | 3231 2, 3, "r", |
3232 doc: /* Base64-encode the region between BEG and END. | 3232 doc: /* Base64-encode the region between BEG and END. |
3233 Return the length of the encoded text. | 3233 Return the length of the encoded text. |
3650 Lisp_Object QCtest, QCsize, QCrehash_size, QCrehash_threshold, QCweakness; | 3650 Lisp_Object QCtest, QCsize, QCrehash_size, QCrehash_threshold, QCweakness; |
3651 Lisp_Object Qhash_table_test, Qkey_or_value, Qkey_and_value; | 3651 Lisp_Object Qhash_table_test, Qkey_or_value, Qkey_and_value; |
3652 | 3652 |
3653 /* Function prototypes. */ | 3653 /* Function prototypes. */ |
3654 | 3654 |
3655 static struct Lisp_Hash_Table *check_hash_table P_ ((Lisp_Object)); | 3655 static struct Lisp_Hash_Table *check_hash_table (Lisp_Object); |
3656 static int get_key_arg P_ ((Lisp_Object, int, Lisp_Object *, char *)); | 3656 static int get_key_arg (Lisp_Object, int, Lisp_Object *, char *); |
3657 static void maybe_resize_hash_table P_ ((struct Lisp_Hash_Table *)); | 3657 static void maybe_resize_hash_table (struct Lisp_Hash_Table *); |
3658 static int cmpfn_eql P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned, | 3658 static int cmpfn_eql (struct Lisp_Hash_Table *, Lisp_Object, unsigned, |
3659 Lisp_Object, unsigned)); | 3659 Lisp_Object, unsigned); |
3660 static int cmpfn_equal P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned, | 3660 static int cmpfn_equal (struct Lisp_Hash_Table *, Lisp_Object, unsigned, |
3661 Lisp_Object, unsigned)); | 3661 Lisp_Object, unsigned); |
3662 static int cmpfn_user_defined P_ ((struct Lisp_Hash_Table *, Lisp_Object, | 3662 static int cmpfn_user_defined (struct Lisp_Hash_Table *, Lisp_Object, |
3663 unsigned, Lisp_Object, unsigned)); | 3663 unsigned, Lisp_Object, unsigned); |
3664 static unsigned hashfn_eq P_ ((struct Lisp_Hash_Table *, Lisp_Object)); | 3664 static unsigned hashfn_eq (struct Lisp_Hash_Table *, Lisp_Object); |
3665 static unsigned hashfn_eql P_ ((struct Lisp_Hash_Table *, Lisp_Object)); | 3665 static unsigned hashfn_eql (struct Lisp_Hash_Table *, Lisp_Object); |
3666 static unsigned hashfn_equal P_ ((struct Lisp_Hash_Table *, Lisp_Object)); | 3666 static unsigned hashfn_equal (struct Lisp_Hash_Table *, Lisp_Object); |
3667 static unsigned hashfn_user_defined P_ ((struct Lisp_Hash_Table *, | 3667 static unsigned hashfn_user_defined (struct Lisp_Hash_Table *, |
3668 Lisp_Object)); | 3668 Lisp_Object); |
3669 static unsigned sxhash_string P_ ((unsigned char *, int)); | 3669 static unsigned sxhash_string (unsigned char *, int); |
3670 static unsigned sxhash_list P_ ((Lisp_Object, int)); | 3670 static unsigned sxhash_list (Lisp_Object, int); |
3671 static unsigned sxhash_vector P_ ((Lisp_Object, int)); | 3671 static unsigned sxhash_vector (Lisp_Object, int); |
3672 static unsigned sxhash_bool_vector P_ ((Lisp_Object)); | 3672 static unsigned sxhash_bool_vector (Lisp_Object); |
3673 static int sweep_weak_table P_ ((struct Lisp_Hash_Table *, int)); | 3673 static int sweep_weak_table (struct Lisp_Hash_Table *, int); |
3674 | 3674 |
3675 | 3675 |
3676 | 3676 |
3677 /*********************************************************************** | 3677 /*********************************************************************** |
3678 Utilities | 3678 Utilities |