Hi,

This patch fixes the C-code coda in more autogenerated code.  I
*believe* this should fix this issue completely.

Regards,

Paul

files affected:

lib/Parrot/Pmc2c.pm
Index: lib/Parrot/Pmc2c.pm
===================================================================
--- lib/Parrot/Pmc2c.pm	(revision 14904)
+++ lib/Parrot/Pmc2c.pm	(working copy)
@@ -1308,9 +1308,30 @@
 #endif
 
 EOH
+    $hout .= $self->c_code_coda();
     $hout;
 }
 
+=item C<c_code_coda()>
+
+Returns the Parrot C code coda
+
+=cut
+
+sub c_code_coda() {
+    my $self = shift;
+    my $cout = "";
+    $cout .= <<"EOC";
+/*
+ * Local variables:
+ *   c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
+EOC
+    "$cout\n";
+}
+
 =item C<implements($method)>
 
 True if this class generates code for the method C<$method>.

Reply via email to