[svn:parrot] r38758 - trunk/src

[petdance at svn.parrot.org]

Author: petdance
Date: Wed May 13 22:07:12 2009
New Revision: 38758
URL: https://trac.parrot.org/parrot/changeset/38758

Log:
add a PARROT_WARN_UNUSED_RESULT

Modified:
   trunk/src/packfile.c

Modified: trunk/src/packfile.c
==============================================================================
--- trunk/src/packfile.c	Wed May 13 22:06:37 2009	(r38757)
+++ trunk/src/packfile.c	Wed May 13 22:07:12 2009	(r38758)
@@ -144,6 +144,7 @@
         __attribute__nonnull__(3)
         FUNC_MODIFIES(*cursor);
 
+PARROT_WARN_UNUSED_RESULT
 static size_t directory_packed_size(PARROT_INTERP,
     ARGMOD(PackFile_Segment *self))
         __attribute__nonnull__(1)
@@ -617,7 +618,7 @@
     DECL_CONST_CAST;
     Parrot_sub *sub;
     int         todo    = 0;
-    int         pragmas = PObj_get_FLAGS(sub_pmc) &  SUB_FLAG_PF_MASK
+    const int   pragmas = PObj_get_FLAGS(sub_pmc) &  SUB_FLAG_PF_MASK
                                                   & ~SUB_FLAG_IS_OUTER;
     PMC_get_sub(interp, PARROT_const_cast(PMC *, sub_pmc), sub);
     if (!pragmas && !Sub_comp_INIT_TEST(sub))
@@ -2243,6 +2244,7 @@
 
 */
 
+PARROT_WARN_UNUSED_RESULT
 static size_t
 directory_packed_size(PARROT_INTERP, ARGMOD(PackFile_Segment *self))
 {