/[emacs]/emacs/src/print.c
ViewVC logotype

Diff of /emacs/src/print.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.169 by rms, Mon Nov 26 00:08:20 2001 UTC revision 1.170 by rms, Sun Dec 30 03:22:55 2001 UTC
# Line 226  void print_interval (); Line 226  void print_interval ();
226         if (NILP (current_buffer->enable_multibyte_characters)           \         if (NILP (current_buffer->enable_multibyte_characters)           \
227             && ! print_escape_multibyte)                                 \             && ! print_escape_multibyte)                                 \
228           specbind (Qprint_escape_multibyte, Qt);                        \           specbind (Qprint_escape_multibyte, Qt);                        \
        if (! NILP (current_buffer->enable_multibyte_characters)         \  
            && ! print_escape_nonascii)                                  \  
          specbind (Qprint_escape_nonascii, Qt);                         \  
229         if (print_buffer != 0)                                           \         if (print_buffer != 0)                                           \
230           {                                                              \           {                                                              \
231             string = make_string_from_bytes (print_buffer,               \             string = make_string_from_bytes (print_buffer,               \
# Line 1384  print_object (obj, printcharfun, escapef Line 1381  print_object (obj, printcharfun, escapef
1381            /* 1 means we must ensure that the next character we output            /* 1 means we must ensure that the next character we output
1382               cannot be taken as part of a hex character escape.  */               cannot be taken as part of a hex character escape.  */
1383            int need_nonhex = 0;            int need_nonhex = 0;
1384              int multibyte = STRING_MULTIBYTE (obj);
1385    
1386            GCPRO1 (obj);            GCPRO1 (obj);
1387    
# Line 1404  print_object (obj, printcharfun, escapef Line 1402  print_object (obj, printcharfun, escapef
1402                int len;                int len;
1403                int c;                int c;
1404    
1405                if (STRING_MULTIBYTE (obj))                if (multibyte)
1406                  {                  {
1407                    c = STRING_CHAR_AND_LENGTH (str + i_byte,                    c = STRING_CHAR_AND_LENGTH (str + i_byte,
1408                                                size_byte - i_byte, len);                                                size_byte - i_byte, len);
# Line 1428  print_object (obj, printcharfun, escapef Line 1426  print_object (obj, printcharfun, escapef
1426                    PRINTCHAR ('\\');                    PRINTCHAR ('\\');
1427                    PRINTCHAR ('f');                    PRINTCHAR ('f');
1428                  }                  }
1429                else if (! SINGLE_BYTE_CHAR_P (c) && print_escape_multibyte)                else if (multibyte && ! ASCII_BYTE_P (c)
1430                           && (print_escape_multibyte || print_escape_nonascii))
1431                  {                  {
1432                    /* When multibyte is disabled,                    /* When multibyte is disabled,
1433                       print multibyte string chars using hex escapes.  */                       print multibyte string chars using hex escapes.  */
# Line 1437  print_object (obj, printcharfun, escapef Line 1436  print_object (obj, printcharfun, escapef
1436                    strout (outbuf, -1, -1, printcharfun, 0);                    strout (outbuf, -1, -1, printcharfun, 0);
1437                    need_nonhex = 1;                    need_nonhex = 1;
1438                  }                  }
1439                else if (SINGLE_BYTE_CHAR_P (c) && ! ASCII_BYTE_P (c)                else if (! multibyte
1440                           && SINGLE_BYTE_CHAR_P (c) && ! ASCII_BYTE_P (c)
1441                         && print_escape_nonascii)                         && print_escape_nonascii)
1442                  {                  {
1443                    /* When printing in a multibyte buffer                    /* When printing in a multibyte buffer

Legend:
Removed from v.1.169  
changed lines
  Added in v.1.170

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26