mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-04 08:47:11 +00:00
7ccfb720b4
* admin/merge-gnulib (GNULIB_MODULES): Add close-stream. * lib/close-stream.c, lib/close-stream.h, lib/fpending.c * lib/fpending.h, m4/close-stream.m4, m4/fpending.m4: New files, from gnulib. * lib/gnulib.mk, m4/gnulib-comp.m4: Regenerate. * src/emacs.c: Include <close-stream.h>. (close_output_streams): New function. (main): Pass it to atexit, so that Emacs closes stdout and stderr and handles errors appropriately. (Fkill_emacs): Don't worry about flushing, as close_output_stream does that now. Fixes: debbugs:9574
91 lines
4.2 KiB
Plaintext
91 lines
4.2 KiB
Plaintext
# serial 19
|
|
|
|
# Copyright (C) 2000-2001, 2004-2012 Free Software Foundation, Inc.
|
|
# This file is free software; the Free Software Foundation
|
|
# gives unlimited permission to copy and/or distribute it,
|
|
# with or without modifications, as long as this notice is preserved.
|
|
|
|
dnl From Jim Meyering
|
|
dnl Using code from emacs, based on suggestions from Paul Eggert
|
|
dnl and Ulrich Drepper.
|
|
|
|
dnl Find out how to determine the number of pending output bytes on a stream.
|
|
dnl glibc (2.1.93 and newer) and Solaris provide __fpending. On other systems,
|
|
dnl we have to grub around in the FILE struct.
|
|
|
|
AC_DEFUN([gl_FUNC_FPENDING],
|
|
[
|
|
AC_CHECK_HEADERS_ONCE([stdio_ext.h])
|
|
AC_CHECK_FUNCS_ONCE([__fpending])
|
|
fp_headers='
|
|
# include <stdio.h>
|
|
# if HAVE_STDIO_EXT_H
|
|
# include <stdio_ext.h>
|
|
# endif
|
|
'
|
|
AC_CHECK_DECLS([__fpending], , , $fp_headers)
|
|
])
|
|
|
|
AC_DEFUN([gl_PREREQ_FPENDING],
|
|
[
|
|
AC_CACHE_CHECK(
|
|
[how to determine the number of pending output bytes on a stream],
|
|
ac_cv_sys_pending_output_n_bytes,
|
|
[
|
|
for ac_expr in \
|
|
\
|
|
'# glibc2' \
|
|
'fp->_IO_write_ptr - fp->_IO_write_base' \
|
|
\
|
|
'# traditional Unix' \
|
|
'fp->_ptr - fp->_base' \
|
|
\
|
|
'# BSD' \
|
|
'fp->_p - fp->_bf._base' \
|
|
\
|
|
'# SCO, Unixware' \
|
|
'(fp->__ptr ? fp->__ptr - fp->__base : 0)' \
|
|
\
|
|
'# QNX' \
|
|
'(fp->_Mode & 0x2000 /*_MWRITE*/ ? fp->_Next - fp->_Buf : 0)' \
|
|
\
|
|
'# old glibc?' \
|
|
'fp->__bufp - fp->__buffer' \
|
|
\
|
|
'# old glibc iostream?' \
|
|
'fp->_pptr - fp->_pbase' \
|
|
\
|
|
'# emx+gcc' \
|
|
'fp->_ptr - fp->_buffer' \
|
|
\
|
|
'# Minix' \
|
|
'fp->_ptr - fp->_buf' \
|
|
\
|
|
'# Plan9' \
|
|
'fp->wp - fp->buf' \
|
|
\
|
|
'# VMS' \
|
|
'(*fp)->_ptr - (*fp)->_base' \
|
|
\
|
|
'# e.g., DGUX R4.11; the info is not available' \
|
|
1 \
|
|
; do
|
|
|
|
# Skip each embedded comment.
|
|
case "$ac_expr" in '#'*) continue;; esac
|
|
|
|
AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#include <stdio.h>]],
|
|
[[FILE *fp = stdin; (void) ($ac_expr);]])],
|
|
[fp_done=yes]
|
|
)
|
|
test "$fp_done" = yes && break
|
|
done
|
|
|
|
ac_cv_sys_pending_output_n_bytes=$ac_expr
|
|
]
|
|
)
|
|
AC_DEFINE_UNQUOTED([PENDING_OUTPUT_N_BYTES],
|
|
$ac_cv_sys_pending_output_n_bytes,
|
|
[the number of pending output bytes on stream 'fp'])
|
|
])
|