Front page | perl.cvs.parrot |
Postings from January 2009
[svn:parrot] r35342 - in trunk: include/parrot src
From:
kjs
Date:
January 10, 2009 08:40
Subject:
[svn:parrot] r35342 - in trunk: include/parrot src
Message ID:
20090110163951.9DDF0CB9F9@x12.develooper.com
Author: kjs
Date: Sat Jan 10 08:39:50 2009
New Revision: 35342
Modified:
trunk/include/parrot/packfile.h
trunk/src/packfile.c
Log:
[core] add PARROT_EXPORT to some of the new PackFile_Annotations functions. PIRC needs them, and being an external component (not in libparrot), they need to be exported.
I edited the header file manually, instead of regenerating using the headerizer. Not sure how to do this, and nmake headerizer failed for some weird reason.
Modified: trunk/include/parrot/packfile.h
==============================================================================
--- trunk/include/parrot/packfile.h (original)
+++ trunk/include/parrot/packfile.h Sat Jan 10 08:39:50 2009
@@ -686,6 +686,7 @@
void mark_const_subs(PARROT_INTERP)
__attribute__nonnull__(1);
+PARROT_EXPORT
void PackFile_Annotations_add_entry(PARROT_INTERP,
ARGMOD(struct PackFile_Annotations *self),
opcode_t offset,
@@ -696,6 +697,7 @@
__attribute__nonnull__(2)
FUNC_MODIFIES(*self);
+PARROT_EXPORT
void PackFile_Annotations_add_group(PARROT_INTERP,
ARGMOD(struct PackFile_Annotations *self),
opcode_t offset)
@@ -721,6 +723,7 @@
__attribute__nonnull__(1)
__attribute__nonnull__(2);
+PARROT_EXPORT
PARROT_CANNOT_RETURN_NULL
PackFile_Segment * PackFile_Annotations_new(PARROT_INTERP,
ARGIN(struct PackFile *pf),
Modified: trunk/src/packfile.c
==============================================================================
--- trunk/src/packfile.c (original)
+++ trunk/src/packfile.c Sat Jan 10 08:39:50 2009
@@ -3845,7 +3845,7 @@
=cut
*/
-
+PARROT_EXPORT
PARROT_CANNOT_RETURN_NULL
PackFile_Segment *
PackFile_Annotations_new(PARROT_INTERP, ARGIN(struct PackFile *pf),
@@ -4112,7 +4112,7 @@
=cut
*/
-
+PARROT_EXPORT
void
PackFile_Annotations_add_group(PARROT_INTERP, ARGMOD(struct PackFile_Annotations *self),
opcode_t offset)
@@ -4153,7 +4153,7 @@
=cut
*/
-
+PARROT_EXPORT
void
PackFile_Annotations_add_entry(PARROT_INTERP, ARGMOD(struct PackFile_Annotations *self),
opcode_t offset, opcode_t key, opcode_t type, opcode_t value)
-
[svn:parrot] r35342 - in trunk: include/parrot src
by kjs