[svn:parrot] r20241 - in trunk/src: . pmc

Author: petdance
Date: Thu Jul 26 19:03:48 2007
New Revision: 20241

Modified:
   trunk/src/pmc/addrregistry.pmc
   trunk/src/pmc/array.pmc
   trunk/src/pmc/continuation.pmc
   trunk/src/pmc/coroutine.pmc
   trunk/src/pmc/deleg_pmc.pmc
   trunk/src/pmc/delegate.pmc
   trunk/src/pmc/exception_handler.pmc
   trunk/src/pmc/hash.pmc
   trunk/src/pmc/integer.pmc
   trunk/src/pmc/lexinfo.pmc
   trunk/src/pmc/version.pmc
   trunk/src/string_primitives.c
   trunk/src/warnings.c

Log:
working through source files to get rid of assert.h

Modified: trunk/src/pmc/addrregistry.pmc
==============================================================================
--- trunk/src/pmc/addrregistry.pmc      (original)
+++ trunk/src/pmc/addrregistry.pmc      Thu Jul 26 19:03:48 2007
@@ -26,7 +26,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
 #include "pmc_hash.h"
 
 static size_t

Modified: trunk/src/pmc/array.pmc
==============================================================================
--- trunk/src/pmc/array.pmc     (original)
+++ trunk/src/pmc/array.pmc     Thu Jul 26 19:03:48 2007
@@ -19,7 +19,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
 
 /*
 

Modified: trunk/src/pmc/continuation.pmc
==============================================================================
--- trunk/src/pmc/continuation.pmc      (original)
+++ trunk/src/pmc/continuation.pmc      Thu Jul 26 19:03:48 2007
@@ -23,8 +23,6 @@
 
 #include "parrot/parrot.h"
 #include "parrot/oplib/ops.h"
-#include <assert.h>
-
 
 /*
 

Modified: trunk/src/pmc/coroutine.pmc
==============================================================================
--- trunk/src/pmc/coroutine.pmc (original)
+++ trunk/src/pmc/coroutine.pmc Thu Jul 26 19:03:48 2007
@@ -32,7 +32,6 @@
 
 #include "parrot/parrot.h"
 #include "parrot/oplib/ops.h"
-#include <assert.h>
 
 /*
  * XXX put these into exceptions.h

Modified: trunk/src/pmc/deleg_pmc.pmc
==============================================================================
--- trunk/src/pmc/deleg_pmc.pmc (original)
+++ trunk/src/pmc/deleg_pmc.pmc Thu Jul 26 19:03:48 2007
@@ -22,7 +22,6 @@
 
 
 #include "parrot/parrot.h"
-#include <assert.h>
 
 pmclass deleg_pmc no_ro {
 

Modified: trunk/src/pmc/delegate.pmc
==============================================================================
--- trunk/src/pmc/delegate.pmc  (original)
+++ trunk/src/pmc/delegate.pmc  Thu Jul 26 19:03:48 2007
@@ -22,7 +22,6 @@
 
 #include "parrot/parrot.h"
 #include "delegate.str"
-#include <assert.h>
 
 /*
 

Modified: trunk/src/pmc/exception_handler.pmc
==============================================================================
--- trunk/src/pmc/exception_handler.pmc (original)
+++ trunk/src/pmc/exception_handler.pmc Thu Jul 26 19:03:48 2007
@@ -92,7 +92,7 @@
 
         /* COMPAT:  PMC *p5 = REG_PMC(interp, 5);*/
 
-        assert(cc->to_ctx == cc->from_ctx);
+        PARROT_ASSERT(cc->to_ctx == cc->from_ctx);
         results = cc->current_results;
 
         /* clear all results, so that continuation.invoke
@@ -105,7 +105,7 @@
         if (results) {
             STRING *message = VTABLE_get_string_keyed_int(INTERP,
                     exception, 0);
-            assert(next == results);
+            PARROT_ASSERT(next == results);
             next            = pass_exception_args(interp, "PS", next,
                                                   ex_ctx, exception, message);
         }

Modified: trunk/src/pmc/hash.pmc
==============================================================================
--- trunk/src/pmc/hash.pmc      (original)
+++ trunk/src/pmc/hash.pmc      Thu Jul 26 19:03:48 2007
@@ -19,8 +19,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
-
 
 /*
 
@@ -1077,8 +1075,8 @@
 
             hash            = (Hash *)PMC_struct_val(SELF);
 
-            assert((INTVAL)hash->key_type == k_type);
-            assert(hash->entry_type       == v_type);
+            PARROT_ASSERT((INTVAL)hash->key_type == k_type);
+            PARROT_ASSERT(hash->entry_type       == v_type);
 
             hash->container = SELF;
             hash->entries   = elems;

Modified: trunk/src/pmc/integer.pmc
==============================================================================
--- trunk/src/pmc/integer.pmc   (original)
+++ trunk/src/pmc/integer.pmc   Thu Jul 26 19:03:48 2007
@@ -21,7 +21,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
 
 /* XXX create MMD headers to in Pmc2c.pm */
 extern INTVAL Parrot_BigInt_is_equal_BigInt(PARROT_INTERP, PMC*, PMC*);

Modified: trunk/src/pmc/lexinfo.pmc
==============================================================================
--- trunk/src/pmc/lexinfo.pmc   (original)
+++ trunk/src/pmc/lexinfo.pmc   Thu Jul 26 19:03:48 2007
@@ -19,7 +19,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
 #include "pmc_hash.h"
 
 static size_t
@@ -71,7 +70,7 @@
     }
 
     void init_pmc(PMC* sub) {
-        assert(PObj_constant_TEST(SELF));
+        PARROT_ASSERT(PObj_constant_TEST(SELF));
         PMC_pmc_val(SELF) = sub;
         parrot_new_pmc_hash_x(INTERP, SELF,
             (PARROT_DATA_TYPE)enum_hash_int,
@@ -138,7 +137,7 @@
             UNUSED(k_type);
             UNUSED(v_type);
 
-            assert(v_type == enum_hash_int);
+            PARROT_ASSERT(v_type == enum_hash_int);
             /* TODO make a better interface for hash creation
              * TODO create hash with needed types in the first place
              */

Modified: trunk/src/pmc/version.pmc
==============================================================================
--- trunk/src/pmc/version.pmc   (original)
+++ trunk/src/pmc/version.pmc   Thu Jul 26 19:03:48 2007
@@ -19,7 +19,6 @@
 */
 
 #include "parrot/parrot.h"
-#include <assert.h>
 
 pmclass Version need_ext {
 

Modified: trunk/src/string_primitives.c
==============================================================================
--- trunk/src/string_primitives.c       (original)
+++ trunk/src/string_primitives.c       Thu Jul 26 19:03:48 2007
@@ -26,7 +26,6 @@
 #else
 #  include <ctype.h>
 #endif
-#include <assert.h>
 
 /*
 

Modified: trunk/src/warnings.c
==============================================================================
--- trunk/src/warnings.c        (original)
+++ trunk/src/warnings.c        Thu Jul 26 19:03:48 2007
@@ -16,7 +16,6 @@
 #include "parrot/parrot.h"
 
 #include <stdarg.h>
-#include <assert.h>
 
 /* HEADERIZER HFILE: include/parrot/warnings.h */
 
@@ -91,7 +90,7 @@
 
     va_list args;
 
-    assert(interp);
+    PARROT_ASSERT(interp);
     if (!PARROT_WARNINGS_test(interp, warnclass))
         return 2;