develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r35043 - in branches/bcanno: include/parrot src

From:
jonathan
Date:
January 6, 2009 07:31
Subject:
[svn:parrot] r35043 - in branches/bcanno: include/parrot src
Message ID:
20090106153126.38760CB9F9@x12.develooper.com
Author: jonathan
Date: Tue Jan  6 07:31:25 2009
New Revision: 35043

Modified:
   branches/bcanno/include/parrot/packfile.h
   branches/bcanno/src/packfile.c

Log:
[core] Clean up one more warning introduced by annotations.

Modified: branches/bcanno/include/parrot/packfile.h
==============================================================================
--- branches/bcanno/include/parrot/packfile.h	(original)
+++ branches/bcanno/include/parrot/packfile.h	Tue Jan  6 07:31:25 2009
@@ -744,7 +744,7 @@
         __attribute__nonnull__(2);
 
 PARROT_CANNOT_RETURN_NULL
-opcode_t * PackFile_Annotations_unpack(PARROT_INTERP,
+const opcode_t * PackFile_Annotations_unpack(PARROT_INTERP,
     ARGMOD(PackFile_Segment *seg),
     ARGIN(const opcode_t *cursor))
         __attribute__nonnull__(1)

Modified: branches/bcanno/src/packfile.c
==============================================================================
--- branches/bcanno/src/packfile.c	(original)
+++ branches/bcanno/src/packfile.c	Tue Jan  6 07:31:25 2009
@@ -3970,7 +3970,7 @@
 
 /*
 
-=item C<opcode_t * PackFile_Annotations_unpack>
+=item C<const opcode_t * PackFile_Annotations_unpack>
 
 Unpacks this segment from the bytecode.
 
@@ -3979,7 +3979,7 @@
 */
 
 PARROT_CANNOT_RETURN_NULL
-opcode_t *
+const opcode_t *
 PackFile_Annotations_unpack(PARROT_INTERP, ARGMOD(PackFile_Segment *seg),
         ARGIN(const opcode_t *cursor))
 {



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About