diff options
| author | Stefan Monnier | 2003-02-22 22:15:31 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2003-02-22 22:15:31 +0000 |
| commit | 69ab9f854e5ad9a9606bab3f45eabe001ef841cb (patch) | |
| tree | 2647ecf24d3ae73f0935471b70aa40e994ebb0b1 /src/alloc.c | |
| parent | 5baabf7b787b65e673ee640e98904fc6572fd6c7 (diff) | |
| download | emacs-69ab9f854e5ad9a9606bab3f45eabe001ef841cb.tar.gz emacs-69ab9f854e5ad9a9606bab3f45eabe001ef841cb.zip | |
(Fgarbage_collect): Don't use XSETFLOAT.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/alloc.c b/src/alloc.c index 20240136526..d703d3d99b2 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -4381,9 +4381,9 @@ Garbage collection happens automatically if you cons more than | |||
| 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); |