RubyGems - javonet-ruby-sdk - Versions diffs - 2.4.10 → 2.4.11 - Mend

javonet-ruby-sdk 2.4.10 → 2.4.11

Files changed (1456) hide show

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/Compound.pm DELETED Viewed

@@ -1,201 +0,0 @@
-package PPI::Statement::Compound;
-=pod
-=head1 NAME
-PPI::Statement::Compound - Describes all compound statements
-=head1 SYNOPSIS
-  # A compound if statement
-  if ( foo ) {
-      bar();
-  } else {
-      baz();
-  }
-  # A compound loop statement
-  foreach ( @list ) {
-      bar($_);
-  }
-=head1 INHERITANCE
-  PPI::Statement::Compound
-  isa PPI::Statement
-      isa PPI::Node
-          isa PPI::Element
-=head1 DESCRIPTION
-C<PPI::Statement::Compound> objects are used to describe all current forms
-of compound statements, as described in L<perlsyn>.
-This covers blocks using C<if>, C<unless>, C<for>, C<foreach>, C<while>,
-and C<continue>. Please note this does B<not> cover "simple" statements
-with trailing conditions. Please note also that "do" is also not part of
-a compound statement.
-  # This is NOT a compound statement
-  my $foo = 1 if $condition;
-  # This is also not a compound statement
-  do { ... } until $condition;
-=head1 METHODS
-C<PPI::Statement::Compound> has a number of methods in addition to the
-standard L<PPI::Statement>, L<PPI::Node> and L<PPI::Element> methods.
-=cut
-use strict;
-use PPI::Statement ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement";
-# Keyword type map
-my %TYPES = (
-	'if'      => 'if',
-	'unless'  => 'if',
-	'while'   => 'while',
-	'until'   => 'while',
-	'for'     => 'for',
-	'foreach' => 'foreach',
-);
-# Lexer clues
-sub __LEXER__normal() { '' }
-#####################################################################
-# PPI::Statement::Compound analysis methods
-=pod
-=head2 type
-The C<type> method returns the syntactic type of the compound statement.
-There are four basic compound statement types.
-The C<'if'> type includes all variations of the if and unless statements,
-including any C<'elsif'> or C<'else'> parts of the compound statement.
-The C<'while'> type describes the standard while and until statements, but
-again does B<not> describes simple statements with a trailing while.
-The C<'for'> type covers the C-style for loops, regardless of whether they
-were declared using C<'for'> or C<'foreach'>.
-The C<'foreach'> type covers loops that iterate over collections,
-regardless of whether they were declared using C<'for'> or C<'foreach'>.
-All of the compounds are a variation on one of these four.
-Returns the simple string C<'if'>, C<'for'>, C<'foreach'> or C<'while'>,
-or C<undef> if the type cannot be determined.
-=cut
-sub type {
-	my $self    = shift;
-	my $p       = 0; # Child position
-	my $Element = $self->schild($p) or return undef;
-	# A labelled statement
-	if ( $Element->isa('PPI::Token::Label') ) {
-		$Element = $self->schild(++$p) or return 'label';
-	}
-	# Most simple cases
-	my $content = $Element->content;
-	if ( $content =~ /^for(?:each)?\z/ ) {
-		$Element = $self->schild(++$p) or return $content;
-		if ( $Element->isa('PPI::Token') ) {
-			return 'foreach' if $Element->content =~ /^my|our|state\z/;
-			return 'foreach' if $Element->isa('PPI::Token::Symbol');
-			return 'foreach' if $Element->isa('PPI::Token::QuoteLike::Words');
-		}
-		if ( $Element->isa('PPI::Structure::List') ) {
-			return 'foreach';
-		}
-		return 'for';
-	}
-	return $TYPES{$content} if $Element->isa('PPI::Token::Word');
-	return 'continue'       if $Element->isa('PPI::Structure::Block');
-	# Unknown (shouldn't exist?)
-	undef;
-}
-#####################################################################
-# PPI::Node Methods
-sub scope() { 1 }
-#####################################################################
-# PPI::Element Methods
-sub _complete {
-	my $self = shift;
-	my $type = $self->type or die "Illegal compound statement type";
-	# Check the different types of compound statements
-	if ( $type eq 'if' ) {
-		# Unless the last significant child is a complete
-		# block, it must be incomplete.
-		my $child = $self->schild(-1) or return '';
-		$child->isa('PPI::Structure') or return '';
-		$child->braces eq '{}'        or return '';
-		$child->_complete             or return '';
-		# It can STILL be
-	} elsif ( $type eq 'while' ) {
-		die "CODE INCOMPLETE";
-	} else {
-		die "CODE INCOMPLETE";
-	}
-}
-1;
-=pod
-=head1 TO DO
-- Write unit tests for this package
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/Data.pm DELETED Viewed

@@ -1,81 +0,0 @@
-package PPI::Statement::Data;
-=pod
-=head1 NAME
-PPI::Statement::Data - The __DATA__ section of a file
-=head1 SYNOPSIS
-  # Normal content
-  __DATA__
-  This: data
-  is: part
-  of: the
-  PPI::Statement::Data: object
-=head1 INHERITANCE
-  PPI::Statement::Compound
-  isa PPI::Statement
-      isa PPI::Node
-          isa PPI::Element
-=head1 DESCRIPTION
-C<PPI::Statement::Data> is a utility class designed to hold content in
-the __DATA__ section of a file. It provides a single statement to hold
-B<all> of the data.
-=head1 METHODS
-C<PPI::Statement::Data> has no additional methods beyond the default ones
-provided by L<PPI::Statement>, L<PPI::Node> and L<PPI::Element>.
-However, it is expected to gain methods for accessing the data directly,
-(as a filehandle for example) just as you would access the data in the
-Perl code itself.
-=cut
-use strict;
-use PPI::Statement ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement";
-# Data is never complete
-sub _complete () { '' }
-1;
-=pod
-=head1 TO DO
-- Add the methods to read in the data
-- Add some proper unit testing
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/End.pm DELETED Viewed

@@ -1,79 +0,0 @@
-package PPI::Statement::End;
-=pod
-=head1 NAME
-PPI::Statement::End - Content after the __END__ of a module
-=head1 SYNOPSIS
-  # This is normal content
-  __END__
-  This is part of a PPI::Statement::End statement
-  =pod
-  This is not part of the ::End statement, it's POD
-  =cut
-  This is another PPI::Statement::End statement
-=head1 INHERITANCE
-  PPI::Statement::End
-  isa PPI::Statement
-      isa PPI::Node
-          isa PPI::Element
-=head1 DESCRIPTION
-C<PPI::Statement::End> is a utility class designed to serve as a contained
-for all of the content after the __END__ tag in a file.
-It doesn't cover the ENTIRE of the __END__ section, and can be interspersed
-with L<PPI::Token::Pod> tokens.
-=head1 METHODS
-C<PPI::Statement::End> has no additional methods beyond the default ones
-provided by L<PPI::Statement>, L<PPI::Node> and L<PPI::Element>.
-=cut
-use strict;
-use PPI::Statement ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement";
-# Once we have an __END__ we're done
-sub _complete () { 1 }
-1;
-=pod
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/Expression.pm DELETED Viewed

@@ -1,67 +0,0 @@
-package PPI::Statement::Expression;
-=pod
-=head1 NAME
-PPI::Statement::Expression - A generic and non-specialised statement
-=head1 SYNOPSIS
-  $foo = bar;
-  ("Hello World!");
-  do_this();
-=head1 INHERITANCE
-  PPI::Statement::Expression
-  isa PPI::Statement
-      isa PPI::Node
-          isa PPI::Element
-=head1 DESCRIPTION
-A C<PPI::Statement::Expression> is a normal statement that is evaluated,
-may or may not assign, may or may not have side effects, and has no special
-or redeeming features whatsoever.
-It provides a default for all statements that don't fit into any other
-classes.
-=head1 METHODS
-C<PPI::Statement::Expression> has no additional methods beyond the default ones
-provided by L<PPI::Statement>, L<PPI::Node> and L<PPI::Element>.
-=cut
-use strict;
-use PPI::Statement ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement";
-1;
-=pod
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/Given.pm DELETED Viewed

@@ -1,90 +0,0 @@
-package PPI::Statement::Given;
-=pod
-=head1 NAME
-PPI::Statement::Given - A given-when statement
-=head1 SYNOPSIS
-  given ( foo ) {
-      say $_;
-  }
-=head1 INHERITANCE
-  PPI::Statement::Given
-  isa PPI::Statement
-      isa PPI::Node
-          isa PPI::Element
-=head1 DESCRIPTION
-C<PPI::Statement::Given> objects are used to describe switch statements, as
-described in L<perlsyn>.
-=head1 METHODS
-C<PPI::Statement::Given> has no methods beyond those provided by the
-standard L<PPI::Structure>, L<PPI::Node> and L<PPI::Element> methods.
-=cut
-use strict;
-use PPI::Statement ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement";
-# Lexer clues
-sub __LEXER__normal() { '' }
-sub _complete {
-	my $child = $_[0]->schild(-1);
-	return !! (
-		defined $child
-		and
-		$child->isa('PPI::Structure::Block')
-		and
-		$child->complete
-	);
-}
-#####################################################################
-# PPI::Node Methods
-sub scope() { 1 }
-1;
-=pod
-=head1 TO DO
-- Write unit tests for this package
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Statement/Include/Perl6.pm DELETED Viewed

@@ -1,87 +0,0 @@
-package PPI::Statement::Include::Perl6;
-=pod
-=head1 NAME
-PPI::Statement::Include::Perl6 - Inline Perl 6 file section
-=head1 SYNOPSIS
-  use v6-alpha;
-  grammar My::Grammar {
-      ...
-  }
-=head1 INHERITANCE
-  PPI::Statement::Include::Perl6
-  isa PPI::Statement::Include
-      isa PPI::Statement
-          isa PPI::Node
-              isa PPI::Element
-=head1 DESCRIPTION
-A C<PPI::Statement::Include::Perl6> is a special include statement that
-indicates the start of a section of Perl 6 code inlined into a regular
-Perl 5 code file.
-The primary purpose of the class is to allow L<PPI> to provide at least
-basic support for "6 in 5" modules like v6.pm;
-Currently, PPI only supports starting a Perl 6 block. It does not
-currently support changing back to Perl 5 again. Additionally all POD
-and __DATA__ blocks and __END__ blocks will be included in the Perl 6
-string and will not be parsed by PPI.
-=cut
-use strict;
-use PPI::Statement::Include ();
-our $VERSION = '1.279';
-our @ISA = "PPI::Statement::Include";
-=pod
-=head2 perl6
-The C<perl6> method returns the block of Perl 6 code that is attached to
-the "use v6...;" command.
-=cut
-sub perl6 {
-	$_[0]->{perl6};
-}
-1;
-=pod
-=head1 TO DO
-- Write specific unit tests for this package
-=head1 SUPPORT
-See the L<support section|PPI/SUPPORT> in the main module.
-=head1 AUTHOR
-Adam Kennedy E<lt>adamk@cpan.orgE<gt>
-=head1 COPYRIGHT
-Copyright 2001 - 2011 Adam Kennedy.
-This program is free software; you can redistribute
-it and/or modify it under the same terms as Perl itself.
-The full text of the license can be found in the
-LICENSE file included with this module.
-=cut