Renaming Parrot_register_HLL() to Parrot_hll_register_HLL()

parrot · Nov 29, 2010 · 82337d1 · 82337d1
1 parent 5e02476
commit 82337d1
Show file tree

Hide file tree

Showing 6 changed files with 12 additions and 12 deletions.
diff --git a/compilers/imcc/imcc.y b/compilers/imcc/imcc.y
@@ -1152,7 +1152,7 @@ hll_def:
          {
             STRING * const hll_name = Parrot_str_unescape(interp, $2 + 1, '"', NULL);
             Parrot_pcc_set_HLL(interp, CURRENT_CONTEXT(interp),
-                Parrot_register_HLL(interp, hll_name));
+                Parrot_hll_register_HLL(interp, hll_name));
 
             IMCC_INFO(interp)->cur_namespace = NULL;
             mem_sys_free($2);

diff --git a/compilers/imcc/imcparser.c b/compilers/imcc/imcparser.c
@@ -3277,7 +3277,7 @@ YYSTYPE yylval;
     {
             STRING * const hll_name = Parrot_str_unescape(interp, (yyvsp[(2) - (2)].s) + 1, '"', NULL);
             Parrot_pcc_set_HLL(interp, CURRENT_CONTEXT(interp),
-                Parrot_register_HLL(interp, hll_name));
+                Parrot_hll_register_HLL(interp, hll_name));
 
             IMCC_INFO(interp)->cur_namespace = NULL;
             mem_sys_free((yyvsp[(2) - (2)].s));

diff --git a/docs/embed.pod b/docs/embed.pod
@@ -1360,7 +1360,7 @@ The list may also be augmented if additional functionality is required.
 
 =item C<Parrot_register_encoding>
 
-=item C<Parrot_register_HLL>
+=item C<Parrot_hll_register_HLL>
 
 =item C<Parrot_register_HLL_type>
 

diff --git a/include/parrot/hll.h b/include/parrot/hll.h
@@ -56,7 +56,7 @@ void Parrot_regenerate_HLL_namespaces(PARROT_INTERP)
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
-INTVAL Parrot_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
+INTVAL Parrot_hll_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
         __attribute__nonnull__(1)
         __attribute__nonnull__(2);
 
@@ -85,7 +85,7 @@ void Parrot_hll_init_HLL(PARROT_INTERP)
 #define ASSERT_ARGS_Parrot_regenerate_HLL_namespaces \
      __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
-#define ASSERT_ARGS_Parrot_register_HLL __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
+#define ASSERT_ARGS_Parrot_hll_register_HLL __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(hll_name))
 #define ASSERT_ARGS_Parrot_register_HLL_type __attribute__unused__ int _ASSERT_ARGS_CHECK = (\

diff --git a/src/hll.c b/src/hll.c
@@ -60,7 +60,7 @@ static PMC* new_hll_entry(PARROT_INTERP, ARGIN_NULLOK(STRING *entry_name))
 Create a new HLL information table entry.
 Takes an interpreter name and (optional) entry name.
 Returns a pointer to the new entry.
-Used by Parrot_register_HLL.
+Used by Parrot_hll_register_HLL.
 
 =cut
 
@@ -113,12 +113,12 @@ Parrot_hll_init_HLL(PARROT_INTERP)
     interp->HLL_namespace =
         Parrot_pmc_new_constant(interp, enum_class_ResizablePMCArray);
 
-    Parrot_register_HLL(interp, CONST_STRING(interp, "parrot"));
+    Parrot_hll_register_HLL(interp, CONST_STRING(interp, "parrot"));
 }
 
 /*
 
-=item C<INTVAL Parrot_register_HLL(PARROT_INTERP, STRING *hll_name)>
+=item C<INTVAL Parrot_hll_register_HLL(PARROT_INTERP, STRING *hll_name)>
 
 Register the HLL with the given STRING name C<hll_name> in the interpreter.
 
@@ -134,9 +134,9 @@ If there is an error, C<-1> is returned.
 
 PARROT_EXPORT
 INTVAL
-Parrot_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
+Parrot_hll_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
 {
-    ASSERT_ARGS(Parrot_register_HLL)
+    ASSERT_ARGS(Parrot_hll_register_HLL)
     PMC   *entry, *name, *type_hash, *ns_hash, *hll_info;
     INTVAL idx;
 
@@ -451,7 +451,7 @@ Parrot_regenerate_HLL_namespaces(PARROT_INTERP)
 
             hll_name = Parrot_str_downcase(interp, hll_name);
 
-            /* XXX as in Parrot_register_HLL() this needs to be fixed to use
+            /* XXX as in Parrot_hll_register_HLL() this needs to be fixed to use
              * the correct type of namespace. It's relatively easy to do that
              * here because the typemap already exists, but it is not currently
              * done for consistency.

diff --git a/src/pmc/sub.pmc b/src/pmc/sub.pmc
@@ -757,7 +757,7 @@ Unarchives the subroutine.
         sub->method_name    = VTABLE_shift_string(INTERP, info);
         sub->ns_entry_name  = VTABLE_shift_string(INTERP, info);
         /* lookup or create HLL */
-        sub->HLL_id         = Parrot_register_HLL(INTERP,
+        sub->HLL_id         = Parrot_hll_register_HLL(INTERP,
             VTABLE_shift_string(INTERP, info));
         sub->comp_flags     = VTABLE_shift_integer(INTERP, info);
         sub->vtable_index   = VTABLE_shift_integer(INTERP, info);