comparison src/dired.c @ 46293:1fb8f75062c6

Use macro SPECPDL_INDEX.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 11 Jul 2002 14:18:02 +0000
parents 37cdbf5d5a09
children 40db0673e6f0
comparison
equal deleted inserted replaced
46292:712d0161e499 46293:1fb8f75062c6
142 DIR *d; 142 DIR *d;
143 int directory_nbytes; 143 int directory_nbytes;
144 Lisp_Object list, dirfilename, encoded_directory; 144 Lisp_Object list, dirfilename, encoded_directory;
145 struct re_pattern_buffer *bufp = NULL; 145 struct re_pattern_buffer *bufp = NULL;
146 int needsep = 0; 146 int needsep = 0;
147 int count = specpdl_ptr - specpdl; 147 int count = SPECPDL_INDEX ();
148 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5; 148 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5;
149 DIRENTRY *dp; 149 DIRENTRY *dp;
150 int retry_p; 150 int retry_p;
151 151
152 /* Because of file name handlers, these functions might call 152 /* Because of file name handlers, these functions might call
471 Lisp_Object encoded_file; 471 Lisp_Object encoded_file;
472 Lisp_Object encoded_dir; 472 Lisp_Object encoded_dir;
473 struct stat st; 473 struct stat st;
474 int directoryp; 474 int directoryp;
475 int passcount; 475 int passcount;
476 int count = specpdl_ptr - specpdl; 476 int count = SPECPDL_INDEX ();
477 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5; 477 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5;
478 478
479 elt = Qnil; 479 elt = Qnil;
480 480
481 #ifdef VMS 481 #ifdef VMS