\f
int stdout_needs_newline;
+void debug_backtrace(void);
+
static void
std_handle_out_external(FILE * stream, Lisp_Object lstream,
const Extbyte * extptr, Extcount extlen,
}
}
+
if (stream) {
std_handle_out_external(stream, Qnil, extptr, extlen,
stream == stdout
|| stream == stderr, must_flush);
- } else {
+ } else if(con != NULL) {
assert(CONSOLE_TTY_P(con));
std_handle_out_external(0, CONSOLE_TTY_DATA(con)->outstream,
extptr, extlen,
CONSOLE_TTY_DATA(con)->is_stdio,
must_flush);
+ } else {
+ error("Error attempting to write write '%s' with no stream nor console", str);
+ debug_backtrace();
+ abort();
}
}
*/
(char_or_string, stdout_p, device))
{
- FILE *file = 0;
- struct console *con = 0;
+ FILE *file = NULL;
+ struct console *con = NULL;
if (NILP(device)) {
if (!NILP(stdout_p))
/* Debugging kludge -- unbuffered */
/* This function provided for the benefit of the debugger. */
-void debug_backtrace(void);
void debug_backtrace(void)
{
/* This function can GC */