comparison src/ChangeLog @ 51726:74b77c4fc17e

*** empty log message ***
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 04 Jul 2003 20:36:50 +0000
parents d7b452526190
children e4e794926085
comparison
equal deleted inserted replaced
51725:686c9c759936 51726:74b77c4fc17e
1 2003-07-04 Stefan Monnier <monnier@cs.yale.edu>
2
3 * alloc.c (ALIGN): Add casts to simplify usage.
4 (BLOCK_ALIGN, BLOCK_BYTES, ABLOCKS_PADDING, ABLOCKS_SIZE)
5 (ABLOCKS_BYTES, ABLOCK_ABASE, ABLOCKS_BUSY, ABLOCKS_BASE): New macros.
6 (struct ablock, struct ablocks): New types.
7 (free_ablock): New global var.
8 (lisp_align_malloc, lisp_align_free): New functions.
9 (FLOAT_BLOCK_SIZE): Redefine in terms of BLOCK_BYTES.
10 (struct float_block): Reorder and add gcmarkbits.
11 (GETMARKBIT, SETMARKBIT, UNSETMARKBIT, FLOAT_BLOCK, FLOAT_INDEX)
12 (FLOAT_MARKED_P, FLOAT_MARK, FLOAT_UNMARK): New macros.
13 (init_float, make_float): Use lisp_align_malloc.
14 (free_float, live_float_p): Don't use `type' any more.
15 (make_float): Use FLOAT_UNMARK to access to mark bit.
16 (mark_maybe_object, mark_maybe_pointer, survives_gc_p):
17 Use FLOAT_MARKED_P to access the mark bit.
18 (pure_alloc): Simplify use of ALIGN.
19 (mark_object): Use FLOAT_MARK to access the mark bit.
20 (gc_sweep): Use new macros to access the float's mark bit.
21 (init_alloc_once): Init free_ablock.
22
23 * lisp.h (struct Lisp_Float): Remove unused field `type'.
24
1 2003-06-27 Stefan Monnier <monnier@cs.yale.edu> 25 2003-06-27 Stefan Monnier <monnier@cs.yale.edu>
2 26
3 * alloc.c (VECTOR_MARK, VECTOR_UNMARK, VECTOR_MARKED_P): New macros. 27 * alloc.c (VECTOR_MARK, VECTOR_UNMARK, VECTOR_MARKED_P): New macros.
4 (GC_STRING_BYTES): Don't mask markbit (it's only used on `size'). 28 (GC_STRING_BYTES): Don't mask markbit (it's only used on `size').
5 (allocate_buffer): Move. 29 (allocate_buffer): Move.