texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: * tp/Texinfo/XS/xspara.c (xspara_get_state): Remo


From: Gavin D. Smith
Subject: branch master updated: * tp/Texinfo/XS/xspara.c (xspara_get_state): Remove unused function (which currently does nothing).
Date: Sat, 12 Aug 2023 13:08:18 -0400

This is an automated email from the git hooks/post-receive script.

gavin pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new 0ac2ad9121 * tp/Texinfo/XS/xspara.c (xspara_get_state): Remove unused 
function (which currently does nothing).
0ac2ad9121 is described below

commit 0ac2ad912108d1279cf12502ee272f733b62cd67
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Sat Aug 12 18:08:10 2023 +0100

    * tp/Texinfo/XS/xspara.c (xspara_get_state): Remove
    unused function (which currently does nothing).
---
 ChangeLog              |  5 +++++
 tp/Texinfo/XS/xspara.c | 33 ---------------------------------
 tp/Texinfo/XS/xspara.h |  1 -
 3 files changed, 5 insertions(+), 34 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e45fe33ce5..04ebe4f04d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2023-08-12  Gavin Smith <gavinsmith0123@gmail.com>
+
+       * tp/Texinfo/XS/xspara.c (xspara_get_state): Remove
+       unused function (which currently does nothing).
+
 2023-08-12  Gavin Smith <gavinsmith0123@gmail.com>
 
        * doc/texinfo.texi (Command List): List new commands
diff --git a/tp/Texinfo/XS/xspara.c b/tp/Texinfo/XS/xspara.c
index 7b733aab6d..5705d00a68 100644
--- a/tp/Texinfo/XS/xspara.c
+++ b/tp/Texinfo/XS/xspara.c
@@ -491,39 +491,6 @@ xspara_init_state (HV *hash)
 #undef FETCH_INT
 }
 
-/* Move the state back into the Perl hash. */
-void
-xspara_get_state (HV *hash)
-{
-  /* TODO: The last argument of hv_store would be a precomputed hash, which
-     would save the time of calculating it. */
-#define STORE(key) hv_store (hash, key, strlen (key), val, 0)
-
-  SV *val;
-
-  dTHX; /* Perl boilerplate. */
-
-  /* Don't do anything. */
-  return;
-
-  val = newSViv (state.end_sentence);
-  STORE("end_sentence");
-
-  val = newSViv (state.counter);
-  STORE("counter");
-
-  val = newSViv (state.word_counter);
-  STORE("word_counter");
-
-  val = newSViv (state.lines_counter);
-  STORE("lines_counter");
-
-  return;
-
-
-#undef STORE
-}
-
 
 /************************************************************************/
 
diff --git a/tp/Texinfo/XS/xspara.h b/tp/Texinfo/XS/xspara.h
index cc5d08ae5e..259507911c 100644
--- a/tp/Texinfo/XS/xspara.h
+++ b/tp/Texinfo/XS/xspara.h
@@ -4,7 +4,6 @@ int xspara_new (HV *conf);
 void xspara_init_state (HV *hash);
 void xspara_set_state (SV *state);
 int xspara_init (int, char *);
-void xspara_get_state (HV *state);
 TEXT xspara_add_next (char *, int, int transparent);
 TEXT xspara_add_text (char *, int);
 void xspara_set_space_protection (int space_protection, int ignore_columns,



reply via email to

[Prev in Thread] Current Thread [Next in Thread]