develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r36133 - in branches/pdd28str_part2: include/parrot src src/string

From:
allison
Date:
January 28, 2009 21:08
Subject:
[svn:parrot] r36133 - in branches/pdd28str_part2: include/parrot src src/string
Message ID:
20090129050748.3FDC6CB9AE@x12.develooper.com
Author: allison
Date: Wed Jan 28 21:07:47 2009
New Revision: 36133

Modified:
   branches/pdd28str_part2/include/parrot/string_funcs.h
   branches/pdd28str_part2/src/inter_create.c
   branches/pdd28str_part2/src/string/api.c

Log:
[pdd28str] Renaming 'Parrot_str_finish'.


Modified: branches/pdd28str_part2/include/parrot/string_funcs.h
==============================================================================
--- branches/pdd28str_part2/include/parrot/string_funcs.h	(original)
+++ branches/pdd28str_part2/include/parrot/string_funcs.h	Wed Jan 28 21:07:47 2009
@@ -241,7 +241,7 @@
 void string_cstring_free(ARGIN_NULLOK(char *p));
 
 PARROT_EXPORT
-void string_deinit(PARROT_INTERP)
+void Parrot_str_finish(PARROT_INTERP)
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
@@ -622,7 +622,7 @@
        PARROT_ASSERT_ARG(interp) \
     || PARROT_ASSERT_ARG(s)
 #define ASSERT_ARGS_string_cstring_free __attribute__unused__ int _ASSERT_ARGS_CHECK = 0
-#define ASSERT_ARGS_string_deinit __attribute__unused__ int _ASSERT_ARGS_CHECK = \
+#define ASSERT_ARGS_Parrot_str_finish __attribute__unused__ int _ASSERT_ARGS_CHECK = \
        PARROT_ASSERT_ARG(interp)
 #define ASSERT_ARGS_string_downcase __attribute__unused__ int _ASSERT_ARGS_CHECK = \
        PARROT_ASSERT_ARG(interp) \

Modified: branches/pdd28str_part2/src/inter_create.c
==============================================================================
--- branches/pdd28str_part2/src/inter_create.c	(original)
+++ branches/pdd28str_part2/src/inter_create.c	Wed Jan 28 21:07:47 2009
@@ -435,7 +435,7 @@
     }
 
     /* strings, charsets, encodings - only once */
-    string_deinit(interp);
+    Parrot_str_finish(interp);
 
     if (!interp->parent_interpreter) {
         if (interp->thread_data)

Modified: branches/pdd28str_part2/src/string/api.c
==============================================================================
--- branches/pdd28str_part2/src/string/api.c	(original)
+++ branches/pdd28str_part2/src/string/api.c	Wed Jan 28 21:07:47 2009
@@ -331,7 +331,7 @@
 
 /*
 
-=item C<void string_deinit>
+=item C<void Parrot_str_finish>
 
 De-Initializes the Parrot string subsystem.
 
@@ -341,9 +341,9 @@
 
 PARROT_EXPORT
 void
-string_deinit(PARROT_INTERP)
+Parrot_str_finish(PARROT_INTERP)
 {
-    ASSERT_ARGS(string_deinit)
+    ASSERT_ARGS(Parrot_str_finish)
     /* all are shared between interpreters */
     if (!interp->parent_interpreter) {
         mem_sys_free(interp->const_cstring_table);



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About