Mercurial > hg > xemacs-beta

comparison src/print.c @ 4973:3bf1b0f0c391

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix compile errors -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-02-04 Ben Wing <ben@xemacs.org> * emacs.c (SHEBANG_EXE_PROGNAME_LENGTH): * emacs.c (main_1): Restore old definition of SHEBANG_EXE_PROGNAME_LENGTH; not possible to ANSI-concatenate wide and narrow strings. * print.c (write_msg_istring): * print.c (write_msg_cistring): * print.c (write_msg_ascstring): Can't return a value in a void-declared function.
author Ben Wing <ben@xemacs.org>
date Thu, 04 Feb 2010 18:27:39 -0600
parents 304aebb79cd3
children ae48681c47fa
comparison
equal deleted inserted replaced
4972:c448f4c38d65 4973:3bf1b0f0c391
678 678
679 void 679 void
680 write_msg_istring (Lisp_Object stream, const Ibyte *str) 680 write_msg_istring (Lisp_Object stream, const Ibyte *str)
681 { 681 {
682 /* This function can GC */ 682 /* This function can GC */
683 return write_istring (stream, IGETTEXT (str)); 683 write_istring (stream, IGETTEXT (str));
684 } 684 }
685 685
686 void 686 void
687 write_msg_cistring (Lisp_Object stream, const CIbyte *str) 687 write_msg_cistring (Lisp_Object stream, const CIbyte *str)
688 { 688 {
689 /* This function can GC */ 689 /* This function can GC */
690 return write_msg_istring (stream, (const Ibyte *) str); 690 write_msg_istring (stream, (const Ibyte *) str);
691 } 691 }
692 692
693 void 693 void
694 write_msg_ascstring (Lisp_Object stream, const Ascbyte *str) 694 write_msg_ascstring (Lisp_Object stream, const Ascbyte *str)
695 { 695 {
696 /* This function can GC */ 696 /* This function can GC */
697 ASSERT_ASCTEXT_ASCII (str); 697 ASSERT_ASCTEXT_ASCII (str);
698 return write_msg_istring (stream, (const Ibyte *) str); 698 write_msg_istring (stream, (const Ibyte *) str);
699 } 699 }
700 700
701 void 701 void
702 write_eistring (Lisp_Object stream, const Eistring *ei) 702 write_eistring (Lisp_Object stream, const Eistring *ei)
703 { 703 {