Renaming Parrot_get_HLL_id() to Parrot_hll_get_HLL_id()

parrot · Nov 29, 2010 · 99bcc83 · 99bcc83
1 parent f89a69a
commit 99bcc83
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 9 deletions.
diff --git a/docs/embed.pod b/docs/embed.pod
@@ -680,7 +680,7 @@ The list may also be augmented if additional functionality is required.
 
 =item C<Parrot_ns_get_global>
 
-=item C<Parrot_get_HLL_id>
+=item C<Parrot_hll_get_HLL_id>
 
 =item C<Parrot_hll_get_HLL_name>
 

diff --git a/include/parrot/hll.h b/include/parrot/hll.h
@@ -32,7 +32,7 @@ INTVAL Parrot_hll_get_ctx_HLL_type(PARROT_INTERP, INTVAL core_type)
 
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
-INTVAL Parrot_get_HLL_id(PARROT_INTERP, ARGIN_NULLOK(STRING *hll_name))
+INTVAL Parrot_hll_get_HLL_id(PARROT_INTERP, ARGIN_NULLOK(STRING *hll_name))
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
@@ -74,7 +74,7 @@ void Parrot_hll_init_HLL(PARROT_INTERP)
        PARROT_ASSERT_ARG(interp))
 #define ASSERT_ARGS_Parrot_hll_get_ctx_HLL_type __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
-#define ASSERT_ARGS_Parrot_get_HLL_id __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
+#define ASSERT_ARGS_Parrot_hll_get_HLL_id __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
 #define ASSERT_ARGS_Parrot_hll_get_HLL_name __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))

diff --git a/lib/Parrot/Pmc2c/PMCEmitter.pm b/lib/Parrot/Pmc2c/PMCEmitter.pm
@@ -622,7 +622,7 @@ EOC
 
         {
             /* Register this PMC as a HLL mapping */
-            const INTVAL hll_id = Parrot_get_HLL_id( interp, CONST_STRING_GEN(interp, "$hll"));
+            const INTVAL hll_id = Parrot_hll_get_HLL_id( interp, CONST_STRING_GEN(interp, "$hll"));
             if (hll_id > 0) {
 EOC
         foreach my $maps ( sort keys %{ $self->{flags}{maps} } ) {

diff --git a/src/hll.c b/src/hll.c
@@ -142,7 +142,7 @@ Parrot_hll_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
 
     /* TODO LOCK or disallow in threads */
 
-    idx = Parrot_get_HLL_id(interp, hll_name);
+    idx = Parrot_hll_get_HLL_id(interp, hll_name);
 
     if (idx >= 0)
         return idx;
@@ -183,7 +183,7 @@ Parrot_hll_register_HLL(PARROT_INTERP, ARGIN(STRING *hll_name))
 
 /*
 
-=item C<INTVAL Parrot_get_HLL_id(PARROT_INTERP, STRING *hll_name)>
+=item C<INTVAL Parrot_hll_get_HLL_id(PARROT_INTERP, STRING *hll_name)>
 
 Returns the ID number of the HLL with the given name. The default HLL namespace
 C<parrot> has an ID number of 0. On error, or if an HLL with the given name
@@ -196,9 +196,9 @@ does not exist, returns -1.
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
 INTVAL
-Parrot_get_HLL_id(PARROT_INTERP, ARGIN_NULLOK(STRING *hll_name))
+Parrot_hll_get_HLL_id(PARROT_INTERP, ARGIN_NULLOK(STRING *hll_name))
 {
-    ASSERT_ARGS(Parrot_get_HLL_id)
+    ASSERT_ARGS(Parrot_hll_get_HLL_id)
     PMC *       entry;
     PMC * const hll_info = interp->HLL_info;
     INTVAL      i        = -1;
@@ -279,7 +279,7 @@ Parrot_hll_register_HLL_type(PARROT_INTERP, INTVAL hll_id,
 {
     ASSERT_ARGS(Parrot_hll_register_HLL_type)
 
-    if (hll_id == Parrot_get_HLL_id(interp, CONST_STRING(interp, "parrot")))
+    if (hll_id == Parrot_hll_get_HLL_id(interp, CONST_STRING(interp, "parrot")))
         Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION,
             "Cannot map without an HLL");
     else {