diff options
author | Stefan Monnier <[email protected]> | 2007-10-02 21:24:47 +0000 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2007-10-02 21:24:47 +0000 |
commit | 878f97ffedc5b4fc785beac809c3d4392f531eca (patch) | |
tree | 862d3533e412791972f9fd44fa4072d8173ff357 /src/print.c | |
parent | 5b2f56dfa64ff88188ece5093589a52542163e46 (diff) |
* lisp.h (struct Lisp_Hash_Table): Move non-traced elements at the end.
Turn `count' into an integer.
* fns.c (make_hash_table, hash_put, hash_remove, hash_clear)
(sweep_weak_table, sweep_weak_hash_tables, Fhash_table_count):
* print.c (print_object) <HASH_TABLE_P>: `count' is an int.
* alloc.c (allocate_hash_table): Use ALLOCATE_PSEUDOVECTOR.
(mark_object) <HASH_TABLE_P>: Use mark_vectorlike.
Diffstat (limited to 'src/print.c')
-rw-r--r-- | src/print.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/print.c b/src/print.c index 911422ac25..ccb2d6e8c4 100644 --- a/src/print.c +++ b/src/print.c @@ -1987,7 +1987,7 @@ print_object (obj, printcharfun, escapeflag) PRINTCHAR (' '); strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun, 0); PRINTCHAR (' '); - sprintf (buf, "%ld/%ld", (long) XFASTINT (h->count), + sprintf (buf, "%ld/%ld", (long) h->count, (long) XVECTOR (h->next)->size); strout (buf, -1, -1, printcharfun, 0); } |