Mercurial > hg > xemacs-beta

comparison src/gui.c @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents 190b164ddcac
children fdefd0186b75
comparison
equal deleted inserted replaced
646:00c54252fe4f 647:b39c14581166
499 * BUF_LEN + 1 bytes. If buffer is not big enough, then error is 499 * BUF_LEN + 1 bytes. If buffer is not big enough, then error is
500 * signaled. 500 * signaled.
501 * Return value is the offset to the terminating null character into the 501 * Return value is the offset to the terminating null character into the
502 * buffer. 502 * buffer.
503 */ 503 */
504 unsigned int 504 Bytecount
505 gui_item_display_flush_left (Lisp_Object gui_item, 505 gui_item_display_flush_left (Lisp_Object gui_item,
506 char *buf, Bytecount buf_len) 506 char *buf, Bytecount buf_len)
507 { 507 {
508 /* This function can call lisp */ 508 /* This function can call lisp */
509 char *p = buf; 509 char *p = buf;
548 * BUF_LEN + 1 bytes. If buffer is not big enough, then error is 548 * BUF_LEN + 1 bytes. If buffer is not big enough, then error is
549 * signaled. 549 * signaled.
550 * Return value is the offset to the terminating null character into the 550 * Return value is the offset to the terminating null character into the
551 * buffer. 551 * buffer.
552 */ 552 */
553 unsigned int 553 Bytecount
554 gui_item_display_flush_right (Lisp_Object gui_item, 554 gui_item_display_flush_right (Lisp_Object gui_item,
555 char *buf, Bytecount buf_len) 555 char *buf, Bytecount buf_len)
556 { 556 {
557 Lisp_Gui_Item *pgui_item = XGUI_ITEM (gui_item); 557 Lisp_Gui_Item *pgui_item = XGUI_ITEM (gui_item);
558 *buf = 0; 558 *buf = 0;
614 mark_object (p->value); 614 mark_object (p->value);
615 615
616 return Qnil; 616 return Qnil;
617 } 617 }
618 618
619 static unsigned long 619 static Hash_Code
620 gui_item_hash (Lisp_Object obj, int depth) 620 gui_item_hash (Lisp_Object obj, int depth)
621 { 621 {
622 Lisp_Gui_Item *p = XGUI_ITEM (obj); 622 Lisp_Gui_Item *p = XGUI_ITEM (obj);
623 623
624 return HASH2 (HASH6 (internal_hash (p->name, depth + 1), 624 return HASH2 (HASH6 (internal_hash (p->name, depth + 1),