[Guile-commits] 289/437: Remove the global but not advertised jit_progname variable

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit a8c180a926638ba6a4967b2a60dbea994c1f15cc
Author: pcpa <paulo.cesar.pereira.de.andr...@gmail.com>
Date:   Sun Jul 27 16:48:52 2014 -0300

    Remove the global but not advertised jit_progname variable
    
        * include/lightning/jit_private.h, lib/jit_disasm.c,
        lib/lightning.c: Remove the global jit_progname variable.
        It was being only used in jit_init_debug, that is called
        from init_jit, so, just pass an argument.
---
 ChangeLog                       | 7 +++++++
 include/lightning/jit_private.h | 3 +--
 lib/jit_disasm.c                | 4 ++--
 lib/lightning.c                 | 4 +---
 4 files changed, 11 insertions(+), 7 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index af99cd7..ea59d29 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
 2014-07-27 Paulo Andrade <p...@gnu.org>
 
+       * include/lightning/jit_private.h, lib/jit_disasm.c,
+       lib/lightning.c: Remove the global jit_progname variable.
+       It was being only used in jit_init_debug, that is called
+       from init_jit, so, just pass an argument.
+
+2014-07-27 Paulo Andrade <p...@gnu.org>
+
        * doc/body.texi: Add note that jit_set_memory_functions
        should be called before init_jit, because init_jit
        itself may call the memory wrappers.
diff --git a/include/lightning/jit_private.h b/include/lightning/jit_private.h
index c208456..8de2c8b 100644
--- a/include/lightning/jit_private.h
+++ b/include/lightning/jit_private.h
@@ -582,7 +582,7 @@ _emit_ldxi_d(jit_state_t*, jit_int32_t, jit_int32_t, 
jit_word_t);
 extern void
 _emit_stxi_d(jit_state_t*, jit_word_t, jit_int32_t, jit_int32_t);
 
-extern void jit_init_debug(void);
+extern void jit_init_debug(char*);
 extern void jit_finish_debug(void);
 
 extern void jit_init_note(void);
@@ -620,6 +620,5 @@ jit_get_max_instr(void);
  * Externs
  */
 extern jit_register_t   _rvs[];
-extern const char      *jit_progname;
 
 #endif /* _jit_private_h */
diff --git a/lib/jit_disasm.c b/lib/jit_disasm.c
index a54bc25..a56e8b6 100644
--- a/lib/jit_disasm.c
+++ b/lib/jit_disasm.c
@@ -57,12 +57,12 @@ static jit_state_t           *disasm_jit;
  * Implementation
  */
 void
-jit_init_debug(void)
+jit_init_debug(char *progname)
 {
 #if DISASSEMBLER
     bfd_init();
 
-    disasm_bfd = bfd_openr(jit_progname, NULL);
+    disasm_bfd = bfd_openr(progname, NULL);
     assert(disasm_bfd);
     bfd_check_format(disasm_bfd, bfd_object);
     bfd_check_format(disasm_bfd, bfd_archive);
diff --git a/lib/lightning.c b/lib/lightning.c
index fa77430..9a6d16f 100644
--- a/lib/lightning.c
+++ b/lib/lightning.c
@@ -170,7 +170,6 @@ _patch_register(jit_state_t *jit, jit_node_t *node, 
jit_node_t *link,
 /*
  * Initialization
  */
-const char     *jit_progname;
 #if !defined(__sgi)
 #define  mmap_fd                       -1
 #endif
@@ -181,9 +180,8 @@ const char  *jit_progname;
 void
 init_jit(char *progname)
 {
-    jit_progname = progname;
     jit_get_cpu();
-    jit_init_debug();
+    jit_init_debug(progname);
     jit_init_size();
 }