[svn:parrot] r44139 - in trunk/src: gc interp

[plobsing at svn.parrot.org]

Author: plobsing
Date: Thu Feb 18 17:44:07 2010
New Revision: 44139
URL: https://trac.parrot.org/parrot/changeset/44139

Log:
headerier + ASSERT_ARGS() to satisfy codetest

Modified:
   trunk/src/gc/alloc_resources.c
   trunk/src/interp/inter_create.c

Modified: trunk/src/gc/alloc_resources.c
==============================================================================
--- trunk/src/gc/alloc_resources.c	Thu Feb 18 17:21:43 2010	(r44138)
+++ trunk/src/gc/alloc_resources.c	Thu Feb 18 17:44:07 2010	(r44139)
@@ -80,6 +80,7 @@
         __attribute__nonnull__(2)
         FUNC_MODIFIES(*dest_interp);
 
+static void free_memory_pool(Variable_Size_Pool *pool);
 static void free_pool(ARGMOD(Fixed_Size_Pool *pool))
         __attribute__nonnull__(1)
         FUNC_MODIFIES(*pool);
@@ -143,6 +144,7 @@
 #define ASSERT_ARGS_fix_pmc_syncs __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(dest_interp) \
     , PARROT_ASSERT_ARG(pool))
+#define ASSERT_ARGS_free_memory_pool __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_free_pool __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(pool))
 #define ASSERT_ARGS_new_memory_pool __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
@@ -1151,6 +1153,8 @@
 static void
 free_memory_pool(Variable_Size_Pool *pool)
 {
+    ASSERT_ARGS(free_memory_pool)
+
     Memory_Block *cur_block = pool->top_block;
 
     while (cur_block) {

Modified: trunk/src/interp/inter_create.c
==============================================================================
--- trunk/src/interp/inter_create.c	Thu Feb 18 17:21:43 2010	(r44138)
+++ trunk/src/interp/inter_create.c	Thu Feb 18 17:44:07 2010	(r44139)
@@ -40,8 +40,6 @@
 #define ASSERT_ARGS_is_env_var_set __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(var))
-#define ASSERT_ARGS_setup_default_compreg __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp))
 /* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 /* HEADERIZER END: static */