Mercurial > emacs
comparison src/lread.c @ 31307:dd074ffca70f
(openp): GCPRO local variable `filename'.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Thu, 31 Aug 2000 08:50:35 +0000 |
| parents | 8929101e0c90 |
| children | 08bb5394dee1 |
comparison
equal
deleted
inserted
replaced
| 31306:15e7eab87754 | 31307:dd074ffca70f |
|---|---|
| 898 register char *fn = buf; | 898 register char *fn = buf; |
| 899 int absolute = 0; | 899 int absolute = 0; |
| 900 int want_size; | 900 int want_size; |
| 901 Lisp_Object filename; | 901 Lisp_Object filename; |
| 902 struct stat st; | 902 struct stat st; |
| 903 struct gcpro gcpro1, gcpro2; | 903 struct gcpro gcpro1, gcpro2, gcpro3; |
| 904 Lisp_Object string; | 904 Lisp_Object string; |
| 905 | 905 |
| 906 string = Qnil; | 906 string = filename = Qnil; |
| 907 GCPRO2 (str, string); | 907 GCPRO3 (str, string, filename); |
| 908 | 908 |
| 909 if (storeptr) | 909 if (storeptr) |
| 910 *storeptr = Qnil; | 910 *storeptr = Qnil; |
| 911 | 911 |
| 912 if (complete_filename_p (str)) | 912 if (complete_filename_p (str)) |