Mercurial > emacs

comparison src/editfns.c @ 71975:6d29dff081c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(region_limit, Fget_internal_run_time): Use xsignal0.
author Kim F. Storm <storm@cua.dk>
date Tue, 18 Jul 2006 13:26:30 +0000
parents 47930f9fbcdf
children 06ca00cbd2ca 8a8e69664178
comparison
equal deleted inserted replaced
71974:9208340e9cad 71975:6d29dff081c5
314 Lisp_Object m; 314 Lisp_Object m;
315 315
316 if (!NILP (Vtransient_mark_mode) 316 if (!NILP (Vtransient_mark_mode)
317 && NILP (Vmark_even_if_inactive) 317 && NILP (Vmark_even_if_inactive)
318 && NILP (current_buffer->mark_active)) 318 && NILP (current_buffer->mark_active))
319 Fsignal (Qmark_inactive, Qnil); 319 xsignal0 (Qmark_inactive);
320 320
321 m = Fmarker_position (current_buffer->mark); 321 m = Fmarker_position (current_buffer->mark);
322 if (NILP (m)) 322 if (NILP (m))
323 error ("The mark is not set now, so there is no region"); 323 error ("The mark is not set now, so there is no region");
324 324
1478 Lisp_Object result[3]; 1478 Lisp_Object result[3];
1479 int secs, usecs; 1479 int secs, usecs;
1480 1480
1481 if (getrusage (RUSAGE_SELF, &usage) < 0) 1481 if (getrusage (RUSAGE_SELF, &usage) < 0)
1482 /* This shouldn't happen. What action is appropriate? */ 1482 /* This shouldn't happen. What action is appropriate? */
1483 Fsignal (Qerror, Qnil); 1483 xsignal0 (Qerror);
1484 1484
1485 /* Sum up user time and system time. */ 1485 /* Sum up user time and system time. */
1486 secs = usage.ru_utime.tv_sec + usage.ru_stime.tv_sec; 1486 secs = usage.ru_utime.tv_sec + usage.ru_stime.tv_sec;
1487 usecs = usage.ru_utime.tv_usec + usage.ru_stime.tv_usec; 1487 usecs = usage.ru_utime.tv_usec + usage.ru_stime.tv_usec;
1488 if (usecs >= 1000000) 1488 if (usecs >= 1000000)