Mercurial > emacs
comparison src/lisp.h @ 14473:7c93a4ce40b0
(VECSIZE): Round up when dividing.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 03 Feb 1996 02:33:12 +0000 |
parents | b30429f0b599 |
children | 7a50843d260f |
comparison
equal
deleted
inserted
replaced
14472:8979515dac09 | 14473:7c93a4ce40b0 |
---|---|
548 DECLARE_INTERVALS /* `data' field must be last. */ | 548 DECLARE_INTERVALS /* `data' field must be last. */ |
549 unsigned char data[1]; | 549 unsigned char data[1]; |
550 }; | 550 }; |
551 | 551 |
552 /* If a struct is made to look like a vector, this macro returns the length | 552 /* If a struct is made to look like a vector, this macro returns the length |
553 of that vector. */ | 553 of the shortest vector that would hold that struct. */ |
554 #define VECSIZE(type) ((sizeof (type) - (sizeof (struct Lisp_Vector) \ | 554 #define VECSIZE(type) ((sizeof (type) - (sizeof (struct Lisp_Vector) \ |
555 - sizeof (Lisp_Object))) \ | 555 - sizeof (Lisp_Object)) \ |
556 + sizeof(Lisp_Object) - 1) /* round up */ \ | |
556 / sizeof (Lisp_Object)) | 557 / sizeof (Lisp_Object)) |
557 | 558 |
558 struct Lisp_Vector | 559 struct Lisp_Vector |
559 { | 560 { |
560 EMACS_INT size; | 561 EMACS_INT size; |