* src/alloc.c: Remove obsolete comments.
This commit is contained in:
parent
ec6f588940
commit
ec0995c409
1 changed files with 0 additions and 4 deletions
|
@ -2642,8 +2642,6 @@ make_float (double float_value)
|
||||||
|
|
||||||
if (float_free_list)
|
if (float_free_list)
|
||||||
{
|
{
|
||||||
/* We use the data field for chaining the free list
|
|
||||||
so that we won't use the same field that has the mark bit. */
|
|
||||||
XSETFLOAT (val, float_free_list);
|
XSETFLOAT (val, float_free_list);
|
||||||
float_free_list = float_free_list->u.chain;
|
float_free_list = float_free_list->u.chain;
|
||||||
}
|
}
|
||||||
|
@ -2747,8 +2745,6 @@ DEFUN ("cons", Fcons, Scons, 2, 2, 0,
|
||||||
|
|
||||||
if (cons_free_list)
|
if (cons_free_list)
|
||||||
{
|
{
|
||||||
/* We use the cdr for chaining the free list
|
|
||||||
so that we won't use the same field that has the mark bit. */
|
|
||||||
XSETCONS (val, cons_free_list);
|
XSETCONS (val, cons_free_list);
|
||||||
cons_free_list = cons_free_list->u.s.u.chain;
|
cons_free_list = cons_free_list->u.s.u.chain;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue