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

[petdance at svn.parrot.org]

Author: petdance
Date: Fri May 21 06:12:16 2010
New Revision: 46840
URL: https://trac.parrot.org/parrot/changeset/46840

Log:
Flagging functions as pure.  Thanks, GCC 4.6!

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

Modified: trunk/include/parrot/embed.h
==============================================================================
--- trunk/include/parrot/embed.h	Fri May 21 06:01:25 2010	(r46839)
+++ trunk/include/parrot/embed.h	Fri May 21 06:12:16 2010	(r46840)
@@ -141,14 +141,17 @@
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_UInt Parrot_test_debug(PARROT_INTERP, Parrot_UInt flag)
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_Int Parrot_test_flag(PARROT_INTERP, Parrot_Int flag)
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_UInt Parrot_test_trace(PARROT_INTERP, Parrot_UInt flag)
         __attribute__nonnull__(1);
 

Modified: trunk/src/embed.c
==============================================================================
--- trunk/src/embed.c	Fri May 21 06:01:25 2010	(r46839)
+++ trunk/src/embed.c	Fri May 21 06:12:16 2010	(r46840)
@@ -281,6 +281,7 @@
 */
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_Int
 Parrot_test_flag(PARROT_INTERP, Parrot_Int flag)
 {
@@ -300,6 +301,7 @@
 */
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_UInt
 Parrot_test_debug(PARROT_INTERP, Parrot_UInt flag)
 {
@@ -319,6 +321,7 @@
 */
 
 PARROT_EXPORT
+PARROT_PURE_FUNCTION
 Parrot_UInt
 Parrot_test_trace(PARROT_INTERP, Parrot_UInt flag)
 {