On 7/5/06, Marvin Humphrey <[EMAIL PROTECTED]> wrote:
+sub run {
+    my $self           = shift;
+    my $charmonizer_fh = $self->{charmonizer_fh};
+
+    # write _charmonize.c
+    $_->run for @{ $self->{modules} };
+    close $charmonizer_fh or confess("Can't close '_charmonize.c':
$!");
+
+    # compile _charmonize.c and capture its output
+    system( $Config{cc}, '-o', '_charmonize', '_charmonize.c' )

Should this be;

   system( $self->{compiler}, '-o', '_charmonize', '_charmonize.c' )

Just guessing since you do that in the initializer method.

Reply via email to