[svn:parrot] r42876 - branches/cs_csr_merge/src/call
bacek at svn.parrot.org
bacek at svn.parrot.org
Thu Dec 3 12:14:03 UTC 2009
Author: bacek
Date: Thu Dec 3 12:13:31 2009
New Revision: 42876
URL: https://trac.parrot.org/parrot/changeset/42876
Log:
Use ASSERT_ARGS in new functions.
Modified:
branches/cs_csr_merge/src/call/args.c
Modified: branches/cs_csr_merge/src/call/args.c
==============================================================================
--- branches/cs_csr_merge/src/call/args.c Thu Dec 3 12:11:02 2009 (r42875)
+++ branches/cs_csr_merge/src/call/args.c Thu Dec 3 12:13:31 2009 (r42876)
@@ -2877,6 +2877,7 @@
static void **
csr_allocate_initial_values(PARROT_INTERP, ARGIN(PMC *self))
{
+ ASSERT_ARGS(csr_allocate_initial_values)
void **values = (void **)Parrot_gc_allocate_fixed_size_storage(interp,
8 * sizeof (void *));
@@ -2898,6 +2899,7 @@
static void
csr_set_integer_native(PARROT_INTERP, ARGIN(PMC *self), INTVAL size)
{
+ ASSERT_ARGS(csr_set_integer_native)
void **values = NULL;
INTVAL resize_threshold;
@@ -2956,6 +2958,7 @@
static INTVAL
csr_elements(PARROT_INTERP, ARGIN(PMC *self))
{
+ ASSERT_ARGS(csr_elements)
INTVAL size;
GETATTR_CallSignature_returns_size(interp, self, size);
return size;
@@ -2977,6 +2980,7 @@
static void
csr_set_pointer_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, ARGIN(void *value))
{
+ ASSERT_ARGS(csr_set_pointer_keyed_int)
void **values;
INTVAL size;
@@ -3013,6 +3017,7 @@
static void
csr_push_integer(PARROT_INTERP, ARGIN(PMC *self), INTVAL type)
{
+ ASSERT_ARGS(csr_push_integer)
void **values;
INTVAL idx;
@@ -3054,6 +3059,7 @@
static void
csr_set_integer_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, INTVAL value)
{
+ ASSERT_ARGS(csr_set_integer_keyed_int)
void *cell = csr_get_pointer_keyed_int(interp, self, key);
void *ptr = UNTAG_CELL(cell);
@@ -3078,6 +3084,7 @@
static void
csr_set_number_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, FLOATVAL value)
{
+ ASSERT_ARGS(csr_set_number_keyed_int)
void *cell = csr_get_pointer_keyed_int(interp, self, key);
void *ptr = UNTAG_CELL(cell);
@@ -3102,6 +3109,7 @@
static void
csr_set_string_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, ARGIN_NULLOK(STRING *value))
{
+ ASSERT_ARGS(csr_set_string_keyed_int)
void *cell = csr_get_pointer_keyed_int(interp, self, key);
void *ptr = UNTAG_CELL(cell);
@@ -3128,6 +3136,7 @@
static void
csr_set_pmc_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, ARGIN(PMC *value))
{
+ ASSERT_ARGS(csr_set_pmc_keyed_int)
void *cell = csr_get_pointer_keyed_int(interp, self, key);
void *ptr = UNTAG_CELL(cell);
@@ -3164,6 +3173,7 @@
static STRING*
csr_get_string_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key)
{
+ ASSERT_ARGS(csr_get_string_keyed_int)
void *cell = csr_get_pointer_keyed_int(interp, self, key);
void *ptr = UNTAG_CELL(cell);
return (STRING *)ptr;
@@ -3185,6 +3195,7 @@
static void*
csr_get_pointer_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key)
{
+ ASSERT_ARGS(csr_get_pointer_keyed_int)
void **values;
INTVAL size;
More information about the parrot-commits
mailing list