[svn:parrot] r34782 - branches/assert_args/src

Author: jkeenan
Date: Thu Jan  1 19:41:11 2009
New Revision: 34782

Modified:
   branches/assert_args/src/charset.c

Log:
Adding ASSERT_ARGS() to all functions in src/charset.c; storing tested results.

Modified: branches/assert_args/src/charset.c
==============================================================================
--- branches/assert_args/src/charset.c	(original)
+++ branches/assert_args/src/charset.c	Thu Jan  1 19:41:11 2009
@@ -96,6 +96,7 @@
 CHARSET *
 Parrot_new_charset(SHIM_INTERP)
 {
+    ASSERT_ARGS(Parrot_new_charset);
     return mem_allocate_typed(CHARSET);
 }
 
@@ -114,8 +115,9 @@
 void
 Parrot_charsets_encodings_deinit(SHIM_INTERP)
 {
-    const int n = all_charsets->n_charsets;
     int i;
+    ASSERT_ARGS(Parrot_charsets_encodings_deinit);
+    const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
         if (all_charsets->set[i].n_converters)
@@ -146,6 +148,7 @@
 Parrot_find_charset(SHIM_INTERP, ARGIN(const char *charsetname))
 {
     int i;
+    ASSERT_ARGS(Parrot_find_charset);
     const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
@@ -172,6 +175,7 @@
 CHARSET *
 Parrot_load_charset(PARROT_INTERP, ARGIN(const char *charsetname))
 {
+    ASSERT_ARGS(Parrot_load_charset);
     UNUSED(charsetname);
 
     Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_UNIMPLEMENTED,
@@ -193,8 +197,9 @@
 INTVAL
 Parrot_charset_number(PARROT_INTERP, ARGIN(const STRING *charsetname))
 {
-    const int n = all_charsets->n_charsets;
     int i;
+    ASSERT_ARGS(Parrot_charset_number);
+    const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
         if (!string_equal(interp, all_charsets->set[i].name, charsetname))
@@ -219,6 +224,7 @@
 Parrot_charset_number_of_str(SHIM_INTERP, ARGIN(const STRING *src))
 {
     int i;
+    ASSERT_ARGS(Parrot_charset_number_of_str);
     const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
@@ -245,6 +251,7 @@
 STRING*
 Parrot_charset_name(SHIM_INTERP, INTVAL number_of_charset)
 {
+    ASSERT_ARGS(Parrot_charset_name);
     if (number_of_charset < 0 || number_of_charset >= all_charsets->n_charsets)
         return NULL;
     return all_charsets->set[number_of_charset].name;
@@ -266,6 +273,7 @@
 const CHARSET *
 Parrot_get_charset(SHIM_INTERP, INTVAL number_of_charset)
 {
+    ASSERT_ARGS(Parrot_get_charset);
     if (number_of_charset < 0 || number_of_charset >= all_charsets->n_charsets)
         return NULL;
     return all_charsets->set[number_of_charset].charset;
@@ -288,6 +296,7 @@
 const char *
 Parrot_charset_c_name(SHIM_INTERP, INTVAL number_of_charset)
 {
+    ASSERT_ARGS(Parrot_charset_c_name);
     if (number_of_charset < 0 || number_of_charset >= all_charsets->n_charsets)
         return NULL;
     return all_charsets->set[number_of_charset].charset->name;
@@ -309,8 +318,9 @@
 register_charset(PARROT_INTERP, ARGIN(const char *charsetname),
         ARGIN(CHARSET *charset))
 {
-    const int n = all_charsets->n_charsets;
     int i;
+    ASSERT_ARGS(register_charset);
+    const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
         if (STREQ(all_charsets->set[i].charset->name, charsetname))
@@ -352,6 +362,7 @@
 static void
 register_static_converters(PARROT_INTERP)
 {
+    ASSERT_ARGS(register_static_converters);
     Parrot_register_charset_converter(interp,
             Parrot_iso_8859_1_charset_ptr, Parrot_ascii_charset_ptr,
             charset_cvt_iso_8859_1_to_ascii);
@@ -391,6 +402,7 @@
 Parrot_register_charset(PARROT_INTERP, ARGIN(const char *charsetname),
         ARGIN(CHARSET *charset))
 {
+    ASSERT_ARGS(Parrot_register_charset);
     if (!all_charsets) {
         all_charsets = mem_allocate_typed(All_charsets);
         all_charsets->n_charsets = 0;
@@ -433,6 +445,7 @@
 void
 Parrot_charsets_encodings_init(PARROT_INTERP)
 {
+    ASSERT_ARGS(Parrot_charsets_encodings_init);
     /* the order is crucial here:
      * 1) encodings, default = fixed_8
      * 2) charsets   default = ascii
@@ -472,6 +485,7 @@
 Parrot_make_default_charset(SHIM_INTERP, SHIM(const char *charsetname),
         ARGIN(CHARSET *charset))
 {
+    ASSERT_ARGS(Parrot_make_default_charset);
     Parrot_default_charset_ptr = charset;
     return 1;
 }
@@ -492,6 +506,7 @@
 const CHARSET *
 Parrot_default_charset(SHIM_INTERP)
 {
+    ASSERT_ARGS(Parrot_default_charset);
     return Parrot_default_charset_ptr;
 }
 
@@ -513,6 +528,7 @@
         ARGIN(const CHARSET *lhs), ARGIN(const CHARSET *rhs))
 {
     int i;
+    ASSERT_ARGS(Parrot_find_charset_converter);
     const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
@@ -546,8 +562,9 @@
         ARGIN(const CHARSET *lhs), ARGIN(CHARSET *rhs),
         ARGIN(charset_converter_t func))
 {
-    const int n = all_charsets->n_charsets;
     int i;
+    ASSERT_ARGS(Parrot_register_charset_converter);
+    const int n = all_charsets->n_charsets;
 
     for (i = 0; i < n; ++i) {
         if (lhs == all_charsets->set[i].charset) {

• [svn:parrot] r34782 - branches/assert_args/src by jkeenan