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

Diff of /emacs/src/callproc.c

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

revision 1.201 by kfstorm, Wed Jun 16 15:00:48 2004 UTC revision 1.202 by kfstorm, Thu Jun 17 08:33:27 2004 UTC
# Line 130  int synch_process_termsig; Line 130  int synch_process_termsig;
130     this is exit code of synchronous subprocess.  */     this is exit code of synchronous subprocess.  */
131  int synch_process_retcode;  int synch_process_retcode;
132    
 extern Lisp_Object Qredisplay_dont_pause;  
   
133  extern Lisp_Object Vdoc_file_name;  extern Lisp_Object Vdoc_file_name;
134    
135  extern Lisp_Object Vfile_name_coding_system, Vdefault_file_name_coding_system;  extern Lisp_Object Vfile_name_coding_system, Vdefault_file_name_coding_system;
# Line 222  usage: (call-process PROGRAM &optional I Line 220  usage: (call-process PROGRAM &optional I
220    int fd[2];    int fd[2];
221    int filefd;    int filefd;
222    register int pid;    register int pid;
223    char buf[16384*4];    char buf[16384];
224    char *bufptr = buf;    char *bufptr = buf;
225    int bufsize = sizeof buf;    int bufsize = sizeof buf;
226    int count = SPECPDL_INDEX ();    int count = SPECPDL_INDEX ();
# Line 773  usage: (call-process PROGRAM &optional I Line 771  usage: (call-process PROGRAM &optional I
771    
772              if (this_read == 0)              if (this_read == 0)
773                {                {
 //              fprintf(stderr, "read 0, total=%d\n", total_read);  
774                  process_coding.mode |= CODING_MODE_LAST_BLOCK;                  process_coding.mode |= CODING_MODE_LAST_BLOCK;
775                  break;                  break;
776                }                }
# Line 781  usage: (call-process PROGRAM &optional I Line 778  usage: (call-process PROGRAM &optional I
778              nread += this_read;              nread += this_read;
779              total_read += this_read;              total_read += this_read;
780    
 //          fprintf(stderr, "read %d+%d of %d, total=%d\n", nread, this_read, bufsize, total_read);  
   
781              if (display_on_the_fly)              if (display_on_the_fly)
782                break;                break;
783            }            }
# Line 835  usage: (call-process PROGRAM &optional I Line 830  usage: (call-process PROGRAM &optional I
830                      continue;                      continue;
831                    }                    }
832    
 //              fprintf(stderr, "produced %d\n", process_coding.produced);  
   
833                  if (process_coding.produced > 0)                  if (process_coding.produced > 0)
834                    insert_1_both (decoding_buf, process_coding.produced_char,                    insert_1_both (decoding_buf, process_coding.produced_char,
835                                   process_coding.produced, 0, 1, 0);                                   process_coding.produced, 0, 1, 0);
# Line 936  usage: (call-process PROGRAM &optional I Line 929  usage: (call-process PROGRAM &optional I
929    
930          if (!NILP (display) && INTERACTIVE)          if (!NILP (display) && INTERACTIVE)
931            {            {
             extern int windows_or_buffers_changed;  
             int count = SPECPDL_INDEX ();  
   
932              if (first)              if (first)
933                prepare_menu_bars ();                prepare_menu_bars ();
934              first = 0;              first = 0;
             specbind (Qredisplay_dont_pause, Qt);  
935              redisplay_preserve_echo_area (1);              redisplay_preserve_echo_area (1);
             unbind_to (count, Qnil);  
936            }            }
937          immediate_quit = 1;          immediate_quit = 1;
938          QUIT;          QUIT;

Legend:
Removed from v.1.201  
changed lines
  Added in v.1.202

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