comparison src/lread.c @ 306:9ea74add5d37 r21-0b51

Import from CVS: tag r21-0b51
author cvs
date Mon, 13 Aug 2007 10:41:58 +0200
parents e11d67e05968
children d1b52dcaa789
comparison
equal deleted inserted replaced
305:18920a7e9a86 306:9ea74add5d37
794 794
795 /*#ifdef DEBUG_XEMACS*/ 795 /*#ifdef DEBUG_XEMACS*/
796 if (purify_flag && noninteractive) 796 if (purify_flag && noninteractive)
797 { 797 {
798 if (EQ (last_file_loaded, file)) 798 if (EQ (last_file_loaded, file))
799 message_append (" (%d)", purespace_usage() - pure_usage); 799 message_append (" (%ld)",
800 (unsigned long) (purespace_usage() - pure_usage));
800 else 801 else
801 message ("Loading %s ...done (%d)", XSTRING_DATA (file), 802 message ("Loading %s ...done (%ld)", XSTRING_DATA (file),
802 purespace_usage() - pure_usage); 803 (unsigned long) (purespace_usage() - pure_usage));
803 } 804 }
804 /*#endif / * DEBUG_XEMACS */ 805 /*#endif / * DEBUG_XEMACS */
805 806
806 if (!noninteractive) 807 if (!noninteractive)
807 PRINT_LOADING_MESSAGE ("done"); 808 PRINT_LOADING_MESSAGE ("done");