From 468afbaceaeb045f69b1a47aa1550a2556cd7dfd Mon Sep 17 00:00:00 2001 From: Dmitry Antipov Date: Thu, 17 Jan 2013 10:29:40 +0400 Subject: * lisp.h (toplevel): Add comment about using Lisp_Save_Value objects, related functions and macros. (make_save_value): Adjust prototype. (make_save_pointer): New prototype. (SAFE_NALLOCA): Fix indentation. Use make_save_pointer. (SAFE_ALLOCA_LISP): Adjust make_save_value usage. * alloc.c (format_save_value): Rename to make_save_value. (make_save_pointer): New function. (record_xmalloc): Use make_save_pointer. * dired.c, editfns.c, fileio.c, font.c, gtkutil.c, lread.c: * nsmenu.m, nsterm.m, xfns.c, xmenu.c, xselect.c, keymap.c: Change users of make_save_value to make_save_pointer. Likewise for format_save_value and make_save_value. --- src/dired.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/dired.c') diff --git a/src/dired.c b/src/dired.c index 3dca9d24f67..a4c8621e9c0 100644 --- a/src/dired.c +++ b/src/dired.c @@ -152,7 +152,7 @@ directory_files_internal (Lisp_Object directory, Lisp_Object full, file-attributes on filenames, both of which can throw, so we must do a proper unwind-protect. */ record_unwind_protect (directory_files_internal_unwind, - make_save_value (d, 0)); + make_save_pointer (d)); #ifdef WINDOWSNT if (attrs) @@ -465,7 +465,7 @@ file_name_completion (Lisp_Object file, Lisp_Object dirname, bool all_flag, report_file_error ("Opening directory", Fcons (dirname, Qnil)); record_unwind_protect (directory_files_internal_unwind, - make_save_value (d, 0)); + make_save_pointer (d)); /* Loop reading blocks */ /* (att3b compiler bug requires do a null comparison this way) */ -- cgit v1.2.1