+ grammar version for september drafts

;

Annotation returns tdl::Annotation:

    key=[tdl::AnnotationType|Identifier]

    '@' key=[tdl::AnnotationType|Identifier]

    (':' value=EString)?

;

TestObjective returns tdl::TestObjective:

    AnnotationCommentFragment

    'TestObjective' name=Identifier

    (

        BEGIN

    (BEGIN

        ('Description:' description=EString)?

        ('References:' objectiveURI+=EString (',' objectiveURI+=EString)*)?

        END

    )?

    END)?

;

Extension returns tdl::Extension:

    ('to' elementURI=EString)?

    'in' dataResourceMapping=[tdl::DataResourceMapping|Identifier]

    'as' name=Identifier

    ( 

        BEGIN 

    (BEGIN

        //TODO: separator 

        (parameterMapping+=ParameterMapping)*

        END

    )?

    END)?

;

ParameterMapping returns tdl::ParameterMapping:

    ConstraintFragment?

    'Type' name=Identifier

    extension=Extension?

    '('

        (member+=Member (',' member+=Member)*)?

    ')'

    '(' (member+=Member (',' member+=Member)*)? ')'

;

Member returns tdl::Member:

    name=Identifier

    //TODO: use keywords for unassigned member treatment?

    (unassignedMember=UnassignedMemberTreatment)?

    '('

        (memberAssignment+=MemberAssignment (',' memberAssignment+=MemberAssignment)*)?

    ')'

    '(' (memberAssignment+=MemberAssignment (',' memberAssignment+=MemberAssignment)*)? ')'

;

MemberAssignment returns tdl::MemberAssignment:

    '=' memberSpec=StaticDataUse

;

//TODO: stick with existing syntax and address urgent issues or

//      invent new parts? -> stick with existing and refine!!!! 

//      currently: a bit of reinvention

CollectionDataType returns tdl::CollectionDataType:

    AnnotationCommentFragment

    ConstraintFragment?

    AnnotationCommentFragment

    dataType=[tdl::DataType|Identifier] 

    name=Identifier

    //TODO: separators?

    '[' item+=StaticDataUse* ']'

;

    AnnotationCommentFragment

    'Enumerated' name=Identifier

    BEGIN

        //TODO: without type specification?

        //TODO: without type specification? separator?

        (value+=SimpleDataInstance)+

    END

;

    ('a' dataType=[tdl::StructuredDataType|Identifier]))

    UnassignedFragment?

    ParameterBindingFragment?

    //TODO: what if PrefixFragment?

    ReductionFragment

;

    ('of' 'type' dataType=[tdl::DataType|Identifier])?

;

AnyValueOrOmit returns tdl::OmitValue:

AnyValueOrOmit returns tdl::AnyValueOrOmit:

    name='*'

;

;

LiteralValueUse returns tdl::LiteralValueUse:

    //NOTE: Reduction and argument are excluded

    (value=STRING | intValue=BIGINTEGER | boolValue=BOOLEAN)

    //TODO: add option to have the type after wards without any keyword e.g. 100 s?

    ('of' 'type' dataType=[tdl::DataType|Identifier])?

Message returns tdl::Message:

    AtomicPrefixFragment

    sourceGate=[tdl::GateReference|IdentifierDot]

//    | sourceGate=[tdl::GateReference|Identifier]

    ('sends' | (isTrigger?='triggers')) 

    argument=DataUse

    'to' target+=TargetMessage ( "," target+=TargetMessage)* 

TargetMessage returns tdl::Target:

    //NOTE: No name, annotations or comments

    targetGate=[tdl::GateReference|IdentifierDot]

    //TODO: check what the correct syntax shall be

    (valueAssignment+=ValueAssignmentMessage)?

;

InlineAction returns tdl::InlineAction:

    AtomicPrefixFragment

    //TODO: simplify syntax further

    'perform' 'action' ':' body=EString

    ('on' componentInstance=[tdl::ComponentInstance|Identifier])?

;

//Element : Abstract

fragment AnnotationFragment returns tdl::Element:

    ('@' annotation+=Annotation)*

    (annotation+=Annotation)*

;

fragment AnnotationCommentFragment returns tdl::Element:

    (comment+=Comment)*

    ('@' annotation+=Annotation)*

    (annotation+=Annotation)*

;

fragment NameFragment returns tdl::Element:

//DataType: Abstract

fragment ConstraintFragment returns tdl::DataType:

    //TODO: put braces into constraint?

    LBrace (constraint+=Constraint)+ RBrace

;

//Member

fragment MemberConstraintFragment returns tdl::Member:

    //TODO: put braces into constraint?

    LBrace (constraint+=Constraint)+ RBrace

;

//DataUse: Abstract

fragment ReductionFragment returns tdl::DataUse:

    =>(argument+=ParameterBinding ( "," argument+=ParameterBinding)*)

;

//DataInstanceUse: Abstract

fragment UnassignedFragment returns tdl::DataInstanceUse:

    //TODO: added angle brackets for disambiguation

//Member

fragment MemberConstraintFragment returns tdl::Member:

    LBrace (constraint+=Constraint)+ RBrace

;

//Behaviour : Abstract

fragment WithBehaviourFragment returns tdl::Behaviour:

    'with'

    BEGIN

        //At least one element shall be provided? Ambiguity?

        NameFragment?

        ObjectiveFragment?

        (comment+=Comment)*

fragment TDPrefixFragment returns tdl::TestDescription:

    (comment+=Comment)*

    TDObjectiveFragment?

    ('@' annotation+=Annotation)*

    (annotation+=Annotation)*

;

fragment TDObjectiveFragment returns tdl::TestDescription:

fragment AtomicPrefixFragment returns tdl::AtomicBehaviour:

    ObjectiveFragment?

    (comment+=Comment)*

    ('@' annotation+=Annotation)*

    (annotation+=Annotation)*

;

fragment WithAtomicFragment returns tdl::AtomicBehaviour: