Mercurial > emacs
comparison src/editfns.c @ 31225:7930c46bb365
(toplevel) [HAVE_STRING_H]: Include string.h.
(toplevel) [HAVE_STRINGS_H]: Include strings.h.
(index): Remove prototypes which might conflict with non-standard
definitions of index/strchr.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 28 Aug 2000 15:03:29 +0000 |
parents | e19d38e14720 |
children | 3ecef4a7b3cd |
comparison
equal
deleted
inserted
replaced
31224:fa7a79afcbf7 | 31225:7930c46bb365 |
---|---|
39 #include "charset.h" | 39 #include "charset.h" |
40 #include "coding.h" | 40 #include "coding.h" |
41 #include "window.h" | 41 #include "window.h" |
42 | 42 |
43 #include "systime.h" | 43 #include "systime.h" |
44 | |
45 #ifdef HAVE_STRING_H | |
46 #include <string.h> | |
47 #endif | |
48 | |
49 #ifdef HAVE_STRINGS_H | |
50 #include <strings.h> | |
51 #endif | |
44 | 52 |
45 #define min(a, b) ((a) < (b) ? (a) : (b)) | 53 #define min(a, b) ((a) < (b) ? (a) : (b)) |
46 #define max(a, b) ((a) > (b) ? (a) : (b)) | 54 #define max(a, b) ((a) > (b) ? (a) : (b)) |
47 | 55 |
48 #ifndef NULL | 56 #ifndef NULL |
1136 (uid) | 1144 (uid) |
1137 Lisp_Object uid; | 1145 Lisp_Object uid; |
1138 { | 1146 { |
1139 struct passwd *pw; | 1147 struct passwd *pw; |
1140 register unsigned char *p, *q; | 1148 register unsigned char *p, *q; |
1141 extern char *index (); | |
1142 Lisp_Object full; | 1149 Lisp_Object full; |
1143 | 1150 |
1144 if (NILP (uid)) | 1151 if (NILP (uid)) |
1145 return Vuser_full_name; | 1152 return Vuser_full_name; |
1146 else if (NUMBERP (uid)) | 1153 else if (NUMBERP (uid)) |
3015 Lisp_Object val; | 3022 Lisp_Object val; |
3016 struct info | 3023 struct info |
3017 { | 3024 { |
3018 int start, end; | 3025 int start, end; |
3019 } *info = 0; | 3026 } *info = 0; |
3020 | |
3021 extern char *index (); | |
3022 | 3027 |
3023 /* It should not be necessary to GCPRO ARGS, because | 3028 /* It should not be necessary to GCPRO ARGS, because |
3024 the caller in the interpreter should take care of that. */ | 3029 the caller in the interpreter should take care of that. */ |
3025 | 3030 |
3026 /* Try to determine whether the result should be multibyte. | 3031 /* Try to determine whether the result should be multibyte. |