[svn:parrot] r42852 - branches/cs_csr_merge/src/call

[bacek at svn.parrot.org]

Author: bacek
Date: Wed Dec  2 09:41:42 2009
New Revision: 42852
URL: https://trac.parrot.org/parrot/changeset/42852

Log:
csr_set_string_keyed_int can accept NULLs.

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	Wed Dec  2 09:41:23 2009	(r42851)
+++ branches/cs_csr_merge/src/call/args.c	Wed Dec  2 09:41:42 2009	(r42852)
@@ -158,10 +158,9 @@
 static void csr_set_string_keyed_int(PARROT_INTERP,
     ARGIN(PMC *self),
     INTVAL key,
-    ARGIN(STRING *value))
+    ARGIN_NULLOK(STRING *value))
         __attribute__nonnull__(1)
-        __attribute__nonnull__(2)
-        __attribute__nonnull__(4);
+        __attribute__nonnull__(2);
 
 PARROT_CANNOT_RETURN_NULL
 static void dissect_aggregate_arg(PARROT_INTERP,
@@ -3100,7 +3099,7 @@
 }
 
 static void
-csr_set_string_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, ARGIN(STRING *value))
+csr_set_string_keyed_int(PARROT_INTERP, ARGIN(PMC *self), INTVAL key, ARGIN_NULLOK(STRING *value))
 {
     void *cell = csr_get_pointer_keyed_int(interp, self, key);
     void *ptr  = UNTAG_CELL(cell);