diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/alloc.c b/src/alloc.c index 7baaa512c20..3654d301828 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -2642,8 +2642,6 @@ make_float (double float_value) | |||
| 2642 | 2642 | ||
| 2643 | if (float_free_list) | 2643 | if (float_free_list) |
| 2644 | { | 2644 | { |
| 2645 | /* We use the data field for chaining the free list | ||
| 2646 | so that we won't use the same field that has the mark bit. */ | ||
| 2647 | XSETFLOAT (val, float_free_list); | 2645 | XSETFLOAT (val, float_free_list); |
| 2648 | float_free_list = float_free_list->u.chain; | 2646 | float_free_list = float_free_list->u.chain; |
| 2649 | } | 2647 | } |
| @@ -2747,8 +2745,6 @@ DEFUN ("cons", Fcons, Scons, 2, 2, 0, | |||
| 2747 | 2745 | ||
| 2748 | if (cons_free_list) | 2746 | if (cons_free_list) |
| 2749 | { | 2747 | { |
| 2750 | /* We use the cdr for chaining the free list | ||
| 2751 | so that we won't use the same field that has the mark bit. */ | ||
| 2752 | XSETCONS (val, cons_free_list); | 2748 | XSETCONS (val, cons_free_list); |
| 2753 | cons_free_list = cons_free_list->u.s.u.chain; | 2749 | cons_free_list = cons_free_list->u.s.u.chain; |
| 2754 | } | 2750 | } |