feature/native-comp dd939d7 2/2: * Remove unused 'helper_save_window_excursion'

[Andrea Corallo]

branch: feature/native-comp
commit dd939d7484adad7735e66b1759283d00df708e70
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <andrea.corallo@arm.com>

    * Remove unused 'helper_save_window_excursion'
    
        * src/comp.c (helper_unwind_protect): Remove definition and
        declaration.
---
 src/comp.c | 13 +------------
 1 file changed, 1 insertion(+), 12 deletions(-)

diff --git a/src/comp.c b/src/comp.c
index 521cadc..af61d76 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -591,7 +591,7 @@ typedef struct {
 /*
    Helper functions called by the run-time.
 */
-Lisp_Object helper_save_window_excursion (Lisp_Object v1);
+
 void helper_unwind_protect (Lisp_Object handler);
 Lisp_Object helper_temp_output_buffer_setup (Lisp_Object x);
 Lisp_Object helper_unbind_n (Lisp_Object n);
@@ -4014,17 +4014,6 @@ DEFUN ("comp-libgccjit-version", Fcomp_libgccjit_version,
 /* for laziness. Change this if a performance impact is measured.             
*/
 
/******************************************************************************/
 
-Lisp_Object
-helper_save_window_excursion (Lisp_Object v1)
-{
-  ptrdiff_t count1 = SPECPDL_INDEX ();
-  record_unwind_protect (restore_window_configuration,
-                        Fcurrent_window_configuration (Qnil));
-  v1 = Fprogn (v1);
-  unbind_to (count1, v1);
-  return v1;
-}
-
 void
 helper_unwind_protect (Lisp_Object handler)
 {