Mercurial > emacs
comparison src/alloc.c @ 49911:d9ade23e09df
(Fgarbage_collect): Don't use XSETFLOAT.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sat, 22 Feb 2003 22:15:31 +0000 |
| parents | 23a1cea22d13 |
| children | fdeb795fc0ec |
comparison
equal
deleted
inserted
replaced
| 49910:060a5c979c8e | 49911:d9ade23e09df |
|---|---|
| 4379 | 4379 |
| 4380 /* Accumulate statistics. */ | 4380 /* Accumulate statistics. */ |
| 4381 EMACS_GET_TIME (t2); | 4381 EMACS_GET_TIME (t2); |
| 4382 EMACS_SUB_TIME (t3, t2, t1); | 4382 EMACS_SUB_TIME (t3, t2, t1); |
| 4383 if (FLOATP (Vgc_elapsed)) | 4383 if (FLOATP (Vgc_elapsed)) |
| 4384 XSETFLOAT (Vgc_elapsed, make_float (XFLOAT_DATA (Vgc_elapsed) + | 4384 Vgc_elapsed = make_float (XFLOAT_DATA (Vgc_elapsed) + |
| 4385 EMACS_SECS (t3) + | 4385 EMACS_SECS (t3) + |
| 4386 EMACS_USECS (t3) * 1.0e-6)); | 4386 EMACS_USECS (t3) * 1.0e-6); |
| 4387 gcs_done++; | 4387 gcs_done++; |
| 4388 | 4388 |
| 4389 return Flist (sizeof total / sizeof *total, total); | 4389 return Flist (sizeof total / sizeof *total, total); |
| 4390 } | 4390 } |
| 4391 | 4391 |