ExtUtils::XSpp::Node::Comment - Node representing a comment in the source file

ExtUtils-XSpp documentation Contained in the ExtUtils-XSpp distribution.

Index

Code Index:

NAME

Top

ExtUtils::XSpp::Node::Comment - Node representing a comment in the source file

DESCRIPTION

Top

An ExtUtils::XSpp::Node::Raw subclass representing a piece of raw data that should be included in the output verbatim, but with comment markers prefixed.

  // This is a comment!

would become something like

  ## This is a comment!

METHODS

Top

new

Creates a new ExtUtils::XSpp::Node::Comment.

Named parameters: rows should be a reference to an array of source code comment lines.

ExtUtils-XSpp documentation Contained in the ExtUtils-XSpp distribution. 
package ExtUtils::XSpp::Node::Comment;
use strict;
use warnings;
use base 'ExtUtils::XSpp::Node::Raw';


sub init {
  my $this = shift;
  my %args = @_;

  $this->{ROWS} = $args{rows};
}

sub print {
  my $this = shift;
  my $state = shift;

  return "\n";
}

1;