[svn:parrot] r39173 - in trunk: include/parrot src

petdance at svn.parrot.org petdance at svn.parrot.org
Tue May 26 05:52:21 UTC 2009


Author: petdance
Date: Tue May 26 05:52:21 2009
New Revision: 39173
URL: https://trac.parrot.org/parrot/changeset/39173

Log:
shimmed an interp and reran the headerizer

Modified:
   trunk/include/parrot/datatypes.h
   trunk/src/datatypes.c

Modified: trunk/include/parrot/datatypes.h
==============================================================================
--- trunk/include/parrot/datatypes.h	Tue May 26 05:48:55 2009	(r39172)
+++ trunk/include/parrot/datatypes.h	Tue May 26 05:52:21 2009	(r39173)
@@ -143,8 +143,7 @@
 /* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 
 PARROT_EXPORT
-FLOATVAL floatval_divide_by_zero(PARROT_INTERP, FLOATVAL num)
-        __attribute__nonnull__(1);
+FLOATVAL floatval_divide_by_zero(SHIM_INTERP, FLOATVAL num);
 
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
@@ -159,8 +158,7 @@
 STRING * Parrot_get_datatype_name(PARROT_INTERP, INTVAL type)
         __attribute__nonnull__(1);
 
-#define ASSERT_ARGS_floatval_divide_by_zero __attribute__unused__ int _ASSERT_ARGS_CHECK = \
-       PARROT_ASSERT_ARG(interp)
+#define ASSERT_ARGS_floatval_divide_by_zero __attribute__unused__ int _ASSERT_ARGS_CHECK = 0
 #define ASSERT_ARGS_Parrot_get_datatype_enum __attribute__unused__ int _ASSERT_ARGS_CHECK = \
        PARROT_ASSERT_ARG(interp) \
     || PARROT_ASSERT_ARG(type_name)

Modified: trunk/src/datatypes.c
==============================================================================
--- trunk/src/datatypes.c	Tue May 26 05:48:55 2009	(r39172)
+++ trunk/src/datatypes.c	Tue May 26 05:52:21 2009	(r39173)
@@ -94,10 +94,10 @@
 
 PARROT_EXPORT
 FLOATVAL
-floatval_divide_by_zero(PARROT_INTERP, FLOATVAL num)
+floatval_divide_by_zero(SHIM_INTERP, FLOATVAL num)
 {
     ASSERT_ARGS(floatval_divide_by_zero)
-    FLOATVAL zero = 0.0;
+    const FLOATVAL zero = 0.0;
     return num / zero;
 }
 


More information about the parrot-commits mailing list