view src/s/ptx4-2.h @ 30487:6165da9c89c6

(Qsafe_charsets): This variable deleted. (Qsafe_chars, Vchar_coding_system_table, Qchar_coding_system): New variables. (coding_safe_chars): New function. (CODING_SAFE_CHAR_P): New macro. (CHARSET_OK): New arg C. Call CODING_SAFE_CHAR_P instead of checking safe_charsets member of the coding system. Caller changed. (detect_coding_iso2022): New local variable safe_chars. (DECODE_DESIGNATION): Call CODING_SAFE_CHAR_P instead of checking safe_charsets member of the coding system. (decode_coding_iso2022): New local variable safe_chars. (ENCODE_ISO_CHARACTER_DIMENSION1): Don't check unsafe chars here. (ENCODE_ISO_CHARACTER_DIMENSION2): Likewise. (ENCODE_ISO_CHARACTER): Arguments changed. Caller changed. (ENCODE_UNSAFE_CHARACTER): New macro. (encode_coding_iso2022): New local variable safe_chars. Check unsafe chars. (setup_coding_system): Delete the code to initialize coding->safe_charses (intersection, find_safe_codings): New functions. (Ffind_coding_systems_region_internal): New function. (syms_of_coding): Defsubr it. Initialize Qsafe_chars, Qsafe_cding_system. Make Vchar_coding_system_table a Lisp variable and initialize it.

#include "ptx4.h"

/* Gelling Kevan ([e-mail])
   says that PTX 4.2.3 needs this version.  */
#undef SETUP_SLAVE_PTY
#define SETUP_SLAVE_PTY \
    if (ioctl (xforkin, I_PUSH, "ptem") == -1)    \
      fatal ("ioctl I_PUSH ptem", errno);        \
    if (ioctl (xforkin, I_PUSH, "ldterm") == -1)  \
      fatal ("ioctl I_PUSH ldterm", errno);

/* Gelling Kevan ([e-mail])
   says that gmalloc.c needs _POSIX_SOURCE.
   This defines _POSIX_SOURCE only for gmalloc.c.  */
#ifdef _MALLOC_INTERNAL
#define _POSIX_SOURCE
#endif