diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/src/editfns.c b/src/editfns.c index ab29a07b693..3c6c51c6263 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -1314,7 +1314,10 @@ DEFUN ("user-uid", Fuser_uid, Suser_uid, 0, 0, 0, | |||
| 1314 | Value is an integer or float, depending on the value. */) | 1314 | Value is an integer or float, depending on the value. */) |
| 1315 | () | 1315 | () |
| 1316 | { | 1316 | { |
| 1317 | return make_fixnum_or_float (geteuid ()); | 1317 | /* Assignment to EMACS_INT stops GCC whining about limited range of |
| 1318 | data type. */ | ||
| 1319 | EMACS_INT euid = geteuid (); | ||
| 1320 | return make_fixnum_or_float (euid); | ||
| 1318 | } | 1321 | } |
| 1319 | 1322 | ||
| 1320 | DEFUN ("user-real-uid", Fuser_real_uid, Suser_real_uid, 0, 0, 0, | 1323 | DEFUN ("user-real-uid", Fuser_real_uid, Suser_real_uid, 0, 0, 0, |
| @@ -1322,7 +1325,10 @@ DEFUN ("user-real-uid", Fuser_real_uid, Suser_real_uid, 0, 0, 0, | |||
| 1322 | Value is an integer or float, depending on the value. */) | 1325 | Value is an integer or float, depending on the value. */) |
| 1323 | () | 1326 | () |
| 1324 | { | 1327 | { |
| 1325 | return make_fixnum_or_float (getuid ()); | 1328 | /* Assignment to EMACS_INT stops GCC whining about limited range of |
| 1329 | data type. */ | ||
| 1330 | EMACS_INT uid = getuid (); | ||
| 1331 | return make_fixnum_or_float (uid); | ||
| 1326 | } | 1332 | } |
| 1327 | 1333 | ||
| 1328 | DEFUN ("user-full-name", Fuser_full_name, Suser_full_name, 0, 1, 0, | 1334 | DEFUN ("user-full-name", Fuser_full_name, Suser_full_name, 0, 1, 0, |