warnings FATAL => 'all';
package MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::JSON;
use parent qw/MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::Base/;
use MarpaX::
erClasses;
our $grammar_content = do {local $/; <DATA>};
# ABSTRACT: ECMAScript-262, Edition 5, JSON grammar
our $VERSION = '0.020'; # VERSION
sub make_grammar_content {
my ($class) = @_;
F-8
=head1 NAME
MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::JSON - ECMAScript-262, Edition 5, JSON grammar
=head1 VERSION
version 0.020
=head1 SYNOPSIS
use strict;
use
ar::ECMAScript_262_5::Pattern;
use MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::JSON;
use MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::URI;
use MarpaX::Languages::E
my $JSON = MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::JSON->new();
$self->{_JSON} = {
grammar => $JSON,
impl => MarpaX::Languages::ECMAScript::AST::Impl->new($JSON->gramm
ar_option(), $JSON->recce_option())
};
my $URI = MarpaX::Languages::ECMAScript::AST::Grammar::ECMAScript_262_5::URI->new();
$self->{_URI} = {
grammar => $URI,
impl => MarpaX::Languages:
my ($self) = @_;
return $self->{_grammar}->pattern;
}
sub JSON {
my ($self) = @_;
return $self->{_grammar}->JSON;
}
sub URI {
my ($self) = @_;
return $self->{_grammar}->UR
gNumericLiteral grammar.
=head2 pattern($self)
Returns the pattern grammar.
=head2 JSON($self)
Returns the JSON grammar.
=head2 URI($self)
Returns the URI grammar.
=head2 spacesAny($self)
Retu
----------------------------------------------------------------
sub JSON {
my ($self) = @_;
return $self->{_grammar}->JSON;
}
# ---------------------------------------------------------------
mar.
=head2 pattern($self)
Return the generic Pattern for this grammar.
=head2 JSON($self)
Return the generic JSON for this grammar.
=head2 URI($self)
Return the generic URI for this grammar.
=