* src/alloc.c: Remove obsolete comments.
This commit is contained in:
@@ -2642,8 +2642,6 @@ make_float (double float_value)
|
||||
|
||||
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);
|
||||
float_free_list = float_free_list->u.chain;
|
||||
}
|
||||
@@ -2747,8 +2745,6 @@ DEFUN ("cons", Fcons, Scons, 2, 2, 0,
|
||||
|
||||
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);
|
||||
cons_free_list = cons_free_list->u.s.u.chain;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user