Mercurial > hg > xemacs-beta

comparison src/print.c @ 579:0e1f61d4b978

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-05-26 06:11:03 by martinb] Cleaning up after error-handling patch: fix compile error
author martinb
date Sat, 26 May 2001 06:11:08 +0000
parents 910449c92002
children 1c880911c386
comparison
equal deleted inserted replaced
578:190b164ddcac 579:0e1f61d4b978
1415 #else /* not ERROR_CHECK_TYPECHECK */ 1415 #else /* not ERROR_CHECK_TYPECHECK */
1416 char buf[128]; 1416 char buf[128];
1417 /* We're in trouble if this happens! */ 1417 /* We're in trouble if this happens! */
1418 if (print_readably) 1418 if (print_readably)
1419 signal_error (Qinternal_error, "printing illegal data type #o%03o", 1419 signal_error (Qinternal_error, "printing illegal data type #o%03o",
1420 (int) XTYPE (obj)); 1420 make_int (XTYPE (obj)));
1421 write_c_string ("#<EMACS BUG: ILLEGAL DATATYPE ", 1421 write_c_string ("#<EMACS BUG: ILLEGAL DATATYPE ",
1422 printcharfun); 1422 printcharfun);
1423 sprintf (buf, "(#o%3o)", (int) XTYPE (obj)); 1423 sprintf (buf, "(#o%3o)", (int) XTYPE (obj));
1424 write_c_string (buf, printcharfun); 1424 write_c_string (buf, printcharfun);
1425 write_c_string 1425 write_c_string