[svn:parrot] r38528 - branches/tt631_part2/lib/Parrot/Pmc2c
bacek at svn.parrot.org
bacek at svn.parrot.org
Thu May 7 10:59:35 UTC 2009
Author: bacek
Date: Thu May 7 10:59:34 2009
New Revision: 38528
URL: https://trac.parrot.org/parrot/changeset/38528
Log:
Stop emitting VTABLE functions into header files and declare them static. (Build is broken, because of TT#640
Modified:
branches/tt631_part2/lib/Parrot/Pmc2c/MethodEmitter.pm
branches/tt631_part2/lib/Parrot/Pmc2c/PMCEmitter.pm
Modified: branches/tt631_part2/lib/Parrot/Pmc2c/MethodEmitter.pm
==============================================================================
--- branches/tt631_part2/lib/Parrot/Pmc2c/MethodEmitter.pm Thu May 7 10:37:58 2009 (r38527)
+++ branches/tt631_part2/lib/Parrot/Pmc2c/MethodEmitter.pm Thu May 7 10:59:34 2009 (r38528)
@@ -111,7 +111,7 @@
$pmcarg = "SHIM($pmcarg)" if $self->pmc_unused;
return <<"EOC";
-$decs $ret${newl}Parrot_${pmcname}_$meth(PARROT_INTERP, $pmcarg$args)$semi
+static $decs $ret${newl}Parrot_${pmcname}_$meth(PARROT_INTERP, $pmcarg$args)$semi
EOC
}
Modified: branches/tt631_part2/lib/Parrot/Pmc2c/PMCEmitter.pm
==============================================================================
--- branches/tt631_part2/lib/Parrot/Pmc2c/PMCEmitter.pm Thu May 7 10:37:58 2009 (r38527)
+++ branches/tt631_part2/lib/Parrot/Pmc2c/PMCEmitter.pm Thu May 7 10:59:34 2009 (r38528)
@@ -80,6 +80,8 @@
$c->emit( $self->preamble );
+ $c->emit( $self->hdecls );
+ $c->emit( $self->{ro}->hdecls ) if ( $self->{ro} );
$self->gen_methods;
my $ro = $self->ro;
@@ -118,8 +120,6 @@
EOH
$h->emit("#define PARROT_IN_EXTENSION\n") if ( $self->is_dynamic );
- $h->emit( $self->hdecls );
- $h->emit( $self->{ro}->hdecls ) if ( $self->{ro} );
$self->gen_attributes;
$h->emit(<<"EOH");
More information about the parrot-commits
mailing list