Mercurial > pub > Impl

view Lib/IMPL/Text/Schema.pm @ 171:59e5fcb59d86

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Исправления, изменена концепция веб-форм
author sourcer
date Mon, 06 Jun 2011 03:30:36 +0400
parents 4267a2ac3d46
children d1676be8afcc
line wrap: on
line source

package IMPL::Text::Schema;
use strict;
use warnings;

use parent qw(IMPL::DOM::Schema);

__PACKAGE__->PassThroughArgs;

1;

__END__

=pod

=head1 SINOPSYS

<schema>
    <ComplexNode name="syntax">
        <Node name="Define" type="Statement" minOccur="1" maxOccur="unbounded">
            <Property name="name" type="Word"/>
        </Node>
    </ComplexNode>
    <ComplexType type="Statement" nativeType="IMPL::Text::Schema::Statement">
        <NodeList>
            <SwitchNode minOccur="1" maxOccur="unbounded">
                <Node name="Word" type="Word"/>
                <Node name="Statement" type="Word"/>
                <Node name="Regexp" type="Regexp"/>
                <Node name="Switch" type="Switch"/>
                <Node name="Repeat" type="List"/>
            </SwitchNode>
        </NodeList>
    </ComplexType>
    <SimpleType type="Word" nativeType="IMPL::Text::Schema::Word"/>
    <SimpleType type="Regexp" nativeType="IMPL::Text::Schema::Regexp"/>
    <ComplexType type="Switch" nativeType="IMPL::Text::Schema::Switch">
        <NodeList>
            <SwitchNode minOccur="1" maxOccur="unbounded">
                <Node name="Word" type="Word"/>
                <Node name="Statement" type="Word"/>
                <Node name="Regexp" type="Regexp"/>
                <Node name="Switch" type="Switch"/>
                <Node name="Repeat" type="List"/>
            </SwitchNode>
        </NodeList>
    </ComplexType>
    <ComplexType type="Repeat" nativeType="IMPL::Text::Schema::Repeat">
        <NodeList>
            <SwitchNode minOccur="1" maxOccur="unbounded">
                <Node name="Word" type="Word"/>
                <Node name="Statement" type="Word"/>
                <Node name="Regexp" type="Regexp"/>
                <Node name="Switch" type="Switch"/>
                <Node name="Repeat" type="List"/>
            </SwitchNode>
        </NodeList>
    </CoomplexType>
</schema>

=head1 DESCRIPTION

  ,      
 .

     .
1.    
2.    .
3.      .

  
1. 
2. 

=head1 METHODS

=over

=item C<<$schema->compile()>>

    .

=back

=head1 INTERNALS


=cut