From 93afdba8daabe41a13358b35221a1276ca70f50b Mon Sep 17 00:00:00 2001 From: Giuseppe Scrivano Date: Thu, 14 Jan 2010 17:13:01 +0100 Subject: [PATCH] Remove blocal_getrealvalue --- src/data.c | 6 ------ src/lisp.h | 3 +-- 2 files changed, 1 insertion(+), 8 deletions(-) diff --git a/src/data.c b/src/data.c index f2cc3fffd82..1263902d16f 100644 --- a/src/data.c +++ b/src/data.c @@ -808,12 +808,6 @@ Value, if non-nil, is a list \(interactive SPEC). */) Getting and Setting Values of Symbols ***********************************************************************/ -Lisp_Object * -blocal_getrealvalue (struct Lisp_Buffer_Local_Value *blv) -{ - return &XCDR_AS_LVALUE (ensure_thread_local (&(blv->realvalue))); -} - /* Retrieve the buffer local data for the caller thread. SYMBOL is used only when the specified buffer local value does not have a binding for the thread and a new one must be created. */ diff --git a/src/lisp.h b/src/lisp.h index e459160c52a..1670c859b0e 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -1369,7 +1369,6 @@ void blocal_unbind_thread (Lisp_Object thread); Lisp_Object *blocal_get_thread_data (struct Lisp_Buffer_Local_Value *l, Lisp_Object sym); void blocal_set_thread_data (struct Lisp_Buffer_Local_Value *l, Lisp_Object o); -Lisp_Object *blocal_getrealvalue (struct Lisp_Buffer_Local_Value *l); #define BLOCAL_CLEAR_FLAGS_VEC(VEC) XSETFASTINT (AREF ((VEC), 0), 0) #define BLOCAL_FOUND_FOR_BUFFER_VEC(VEC) ((XFASTINT (AREF ((VEC), 0))) == 1) @@ -1389,7 +1388,7 @@ Lisp_Object *blocal_getrealvalue (struct Lisp_Buffer_Local_Value *l); #define BLOCAL_BUFFER(A) (BLOCAL_BUFFER_VEC (BLOCAL_THREAD_DATA (A))) #define BLOCAL_FRAME(A) (BLOCAL_FRAME_VEC (BLOCAL_THREAD_DATA (A))) #define BLOCAL_CDR(A) (BLOCAL_CDR_VEC (BLOCAL_THREAD_DATA (A))) -#define BLOCAL_REALVALUE(A) (*blocal_getrealvalue (A)) +#define BLOCAL_REALVALUE(A) (XCDR_AS_LVALUE (ensure_thread_local (&((A)->realvalue)))) /* START and END are markers in the overlay's buffer, and PLIST is the overlay's property list. */ -- 2.39.5