[PATCH 5/8] muscles: make private functions static

[Akim Demaille]

* src/muscle-tab.h, src/muscle-tab.c (muscle_boundary_grow)
(muscle_location_grow): Now static.
---
 src/muscle-tab.c | 12 ++++++++++--
 src/muscle-tab.h |  8 --------
 2 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/src/muscle-tab.c b/src/muscle-tab.c
index c6f4866..b2dca77 100644
--- a/src/muscle-tab.c
+++ b/src/muscle-tab.c
@@ -259,7 +259,10 @@ muscle_find (char const *key)
 }
 
 
-void
+/* In the format `file_name:line.column', append BOUND to MUSCLE.  Use
+   digraphs for special characters in the file name.  */
+
+static void
 muscle_boundary_grow (char const *key, boundary bound)
 {
   char *extension;
@@ -274,7 +277,12 @@ muscle_boundary_grow (char const *key, boundary bound)
   obstack_free (&muscle_obstack, extension);
 }
 
-void
+
+/* In the format `[[file_name:line.column]], [[file_name:line.column]]',
+   append LOC to MUSCLE.  Use digraphs for special characters in each
+   file name.  */
+
+static void
 muscle_location_grow (char const *key, location loc)
 {
   muscle_grow (key, "[[", "");
diff --git a/src/muscle-tab.h b/src/muscle-tab.h
index b843821..ddbad40 100644
--- a/src/muscle-tab.h
+++ b/src/muscle-tab.h
@@ -97,14 +97,6 @@ void muscle_code_grow (const char *key, const char *value, 
location loc);
 void muscle_pair_list_grow (const char *muscle,
                             const char *a1, const char *a2);
 
-/* In the format `[[file_name:line.column]], [[file_name:line.column]]', append
-   LOC to MUSCLE.  Use digraphs for special characters in each file name.  */
-void muscle_location_grow (char const *key, location loc);
-
-/* In the format `file_name:line.column', append BOUND to MUSCLE.  Use digraphs
-   for special characters in the file name.  */
-void muscle_boundary_grow (char const *key, boundary bound);
-
 /* Grow KEY for the occurrence of the name USER_NAME at LOC appropriately for
    use with b4_check_user_names in ../data/bison.m4.  USER_NAME is not escaped
    with digraphs, so it must not contain `[' or `]'.  */
-- 
1.7.11.3