--- a/xquery/branches/datatypes/XQuery__XQueryParser.st Mon Apr 13 10:01:16 2009 +0000
+++ b/xquery/branches/datatypes/XQuery__XQueryParser.st Mon Apr 13 10:10:16 2009 +0000
@@ -53,8 +53,6 @@
scannerClass
^XQuery::XQueryScanner
-
- "Modified: / 08-03-2009 / 22:33:48 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryParser class methodsFor:'generated-comments'!
@@ -516,7 +514,7 @@
SequenceType :
""empty-sequence"" ""("" "")"" {
self informAboutRuleReduction:'SequenceType1'.
- #empty-sequence.
+ #emptyseq.
} |
ItemType {
self informAboutRuleReduction:'SequenceType2'.
@@ -778,7 +776,7 @@
{
self informAboutRuleReduction:'AbbrevForwardStep2'.
XMLv2::XPathLocationStep new
- axis: XMLv2::XPathAxisChild new;
+ setDefaultAxisFor: '1';
nodeTest: '1';
yourself
}
@@ -1424,8 +1422,6 @@
"
-
- "Modified: / 08-03-2009 / 22:33:48 / Jan Kurs <kursj1@fel.cvut.cz>"
!
symbolComment
@@ -1688,9 +1684,7 @@
!XQueryParser class methodsFor:'generated-starting states'!
startingStateForMainModule
- ^2
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
+ ^1
!
startingStateForQueryBody
@@ -1707,18 +1701,14 @@
axis:XMLv2::XPathAxisAttribute new;
nodeTest:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAbbrevForwardStep2:nodes
self informAboutRuleReduction:'AbbrevForwardStep2'.
^ (XMLv2::XPathLocationStep new)
- axis:XMLv2::XPathAxisChild new;
+ setDefaultAxisFor:(nodes at:1);
nodeTest:(nodes at:1);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAbbrevReverseStep1:nodes
@@ -1726,15 +1716,11 @@
axis:XMLv2::XPathAxisParent new;
nodeTest:XMLv2::XPathAnyKindTest new;
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAdditiveExpr1:nodes
self informAboutRuleReduction:'AdditiveExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAdditiveExpr2:nodes
@@ -1743,8 +1729,6 @@
multiplicativeExpr:(nodes at:1);
operand:#plus;
additiveExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAdditiveExpr3:nodes
@@ -1753,15 +1737,11 @@
multiplicativeExpr:(nodes at:1);
operand:#minus;
additiveExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAndExpr1:nodes
self informAboutRuleReduction:'AndExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAndExpr2:nodes
@@ -1769,57 +1749,41 @@
^ (AstAndExpr new)
comparisonExpr:(nodes at:1);
andExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAnyKindTest1:nodes
self informAboutRuleReduction:'AnyKindTest1'.
^ XMLv2::XPathAnyKindTest new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAtomicType1:nodes
self informAboutRuleReduction:'AtomicType1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAttribNameOrWildcard1:nodes
self informAboutRuleReduction:'AttributeNameOrWildcard1'.
^ AstAttribNameOrWildcard new attributeName:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAttribNameOrWildcard2:nodes
self informAboutRuleReduction:'AttributeNameOrWildcard2'.
^ AstAttribNameOrWildcard new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAttributeName1:nodes
self informAboutRuleReduction:'AttributeName1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAttributeTest1:nodes
self informAboutRuleReduction:'AttributeTest1'.
^ XMLv2::XPathAttributeTest new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAttributeTest2:nodes
self informAboutRuleReduction:'AttributeTest2'.
^ XMLv2::XPathAttributeTest halt:'Not yet implemented. See grammar'
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAxisStep1:nodes
@@ -1827,8 +1791,6 @@
^ (nodes at:1)
predicates:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAxisStep2:nodes
@@ -1836,8 +1798,6 @@
^ (nodes at:1)
predicates:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForAxisStep3:nodes
@@ -1859,36 +1819,26 @@
reduceActionForCommonContent1:nodes
self informAboutRuleReduction:'CommonContent1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCommonContent2:nodes
self informAboutRuleReduction:'CommonContent2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCommonContent3:nodes
self informAboutRuleReduction:'CommonContent3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCommonContent4:nodes
self informAboutRuleReduction:'CommonContent7'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCommonContent5:nodes
self informAboutRuleReduction:'CommonContent8'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCommonContent6:nodes
@@ -1915,8 +1865,6 @@
reduceActionForCompAttrConstructor1:nodes
self informAboutRuleReduction:'CompAttrConstructor1'.
^ AstCompAttrConstructor new qname:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompAttrConstructor2:nodes
@@ -1924,15 +1872,11 @@
^ (AstCompAttrConstructor new)
qname:(nodes at:2);
contentExpr:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompAttrConstructor3:nodes
self informAboutRuleReduction:'CompAttrConstructor3'.
^ AstCompAttrConstructor new expr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompAttrConstructor4:nodes
@@ -1940,22 +1884,16 @@
^ (AstCompAttrConstructor new)
expr:(nodes at:3);
contentExpr:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompDocConstructor1:nodes
self informAboutRuleReduction:'CompDocConstructor1'.
^ AstCompDocConstructor new expr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompElemConstructor1:nodes
self informAboutRuleReduction:'CompElemConstructor1'.
^ AstCompElemConstructor new qname:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompElemConstructor2:nodes
@@ -1963,15 +1901,11 @@
^ (AstCompElemConstructor new)
qname:(nodes at:2);
contentExpr:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompElemConstructor3:nodes
self informAboutRuleReduction:'CompElemConstructor3'.
^ AstCompElemConstructor new expr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompElemConstructor4:nodes
@@ -1979,22 +1913,16 @@
^ (AstCompElemConstructor new)
expr:(nodes at:3);
contentExpr:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForCompTextConstructor1:nodes
self informAboutRuleReduction:'CompTextConstructor1'.
^ AstCompTextConstructor new expr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComparisonExpr1:nodes
self informAboutRuleReduction:'ComparisonExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComparisonExpr2:nodes
@@ -2003,8 +1931,6 @@
rangeExprLeft:(nodes at:1);
valueComp:(nodes at:2);
rangeExprRight:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComparisonExpr3:nodes
@@ -2013,8 +1939,6 @@
rangeExprLeft:(nodes at:1);
generalComp:(nodes at:2);
rangeExprRight:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComparisonExpr4:nodes
@@ -2023,95 +1947,69 @@
rangeExprLeft:(nodes at:1);
nodeComp:(nodes at:2);
rangeExprRight:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComputedConstructor1:nodes
self informAboutRuleReduction:'ComputedConstructor1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComputedConstructor2:nodes
self informAboutRuleReduction:'ComputedConstructor2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComputedConstructor3:nodes
self informAboutRuleReduction:'ComputedConstructor3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForComputedConstructor4:nodes
self informAboutRuleReduction:'ComputedConstructor4'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForConstructor1:nodes
self informAboutRuleReduction:'Constructor1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForConstructor2:nodes
self informAboutRuleReduction:'Constructor2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForContentExpr1:nodes
self informAboutRuleReduction:'ContentExpr'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForContextItemExpr1:nodes
self informAboutRuleReduction:'ContextItemExpr1'.
^ AstContextItemExpr new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDecimalLiteral1:nodes
self
informAboutRuleReduction:'DecimalLiteral1 -' , ((nodes at:1) asString).
^ AstDecimalLiteral new content:((nodes at:1) value asFloat).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDefaultNamespaceDecl1:nodes
^ (AstDefaultNamespaceDecl new)
uri:(nodes at:5);
type:#element
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDefaultNamespaceDecl2:nodes
^ (AstDefaultNamespaceDecl new)
uri:(nodes at:5);
type:#function
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDeleteExpr1:nodes
self informAboutRuleReduction:'DeleteExpr'.
^ (AstDeleteExpr new) targetExpr:(nodes at:3)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirAttributeList1:nodes
@@ -2119,8 +2017,6 @@
^ (AstDirAttributeList new)
qname:(nodes at:1);
dirAttributeValue:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirAttributeList2:nodes
@@ -2129,29 +2025,21 @@
qname:(nodes at:1);
dirAttributeValue:(nodes at:3);
dirAttributeList:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirAttributeValue1:nodes
self informAboutRuleReduction:'DirAttributeValue1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirAttributeValue2:nodes
self informAboutRuleReduction:'DirAttributeValue2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemConstructor1:nodes
self informAboutRuleReduction:'DirElemConstructor1'.
^ AstDirElemConstructor new qname:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemConstructor2:nodes
@@ -2159,8 +2047,6 @@
^ (AstDirElemConstructor new)
qname:(nodes at:2);
dirAttributeList:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemConstructor3:nodes
@@ -2168,8 +2054,6 @@
^ (AstDirElemConstructor new)
qname:(nodes at:2);
dirElemContent:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemConstructor4:nodes
@@ -2178,15 +2062,11 @@
qname:(nodes at:2);
dirAttributeList:(nodes at:3);
dirElemContent:(nodes at:5).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemContent1:nodes
self informAboutRuleReduction:'DirElemContent1'.
^ AstDirElemContent new content:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemContent2:nodes
@@ -2194,15 +2074,11 @@
^ (AstDirElemContent new)
content:(nodes at:1);
dirElemContent:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemContent3:nodes
self informAboutRuleReduction:'DirElemContent3'.
^ AstDirElemContent new content:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirElemContent4:nodes
@@ -2210,92 +2086,66 @@
^ (AstDirElemContent new)
content:(nodes at:1);
dirElemContent:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDirectConstructor1:nodes
self informAboutRuleReduction:'DirectConstructor1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDocumentTest1:nodes
self informAboutRuleReduction:'DocumentTest1'.
^ XMLv2::XPathDocumentTest new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDocumentTest2:nodes
self informAboutRuleReduction:'DocumentTest2'.
^ XMLv2::XPathDocumentTest new elementTest:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForDoubleLiteral1:nodes
self
informAboutRuleReduction:'DoubleLiteral1 -' , ((nodes at:1) asString).
^ AstDoubleLiteral new content:((nodes at:1) value asDouble).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForElementName1:nodes
self informAboutRuleReduction:'ElementName1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForElementNameOrWildcard1:nodes
self informAboutRuleReduction:'ElementNameOrWildcard1'.
^ AstElementNameOrWildcard new elementName:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForElementNameOrWildcard2:nodes
self informAboutRuleReduction:'ElementNameOrWildcard2'.
^ AstElementNameOrWildcard new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForElementTest1:nodes
self informAboutRuleReduction:'ElementTest1'.
^ XMLv2::XPathElementTest new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForElementTest2:nodes
self informAboutRuleReduction:'ElementTest2'.
^ XMLv2::XPathElementTest new elementName:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForEmptyParamList1:nodes
^ #()
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForEnclosedExpr1:nodes
self informAboutRuleReduction:'EnclosedExpr1'.
^ AstEnclosedExpr new expr:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExpr1:nodes
self informAboutRuleReduction:'Expr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExpr2:nodes
@@ -2303,71 +2153,51 @@
^ (AstExpr new)
exprSingle:(nodes at:1);
expr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle1:nodes
self informAboutRuleReduction:'ExprSingle1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle2:nodes
self informAboutRuleReduction:'ExprSingle2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle3:nodes
self informAboutRuleReduction:'ExprSingle3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle4:nodes
self informAboutRuleReduction:'ExprSingle4'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle5:nodes
self informAboutRuleReduction:'ExprSingle5'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle6:nodes
self informAboutRuleReduction:'ExprSingle6'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle7:nodes
self informAboutRuleReduction:'ExprSingle7'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle8:nodes
self informAboutRuleReduction:'ExprSingle8'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForExprSingle9:nodes
self informAboutRuleReduction:'ExprSingle9'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr1:nodes
@@ -2375,8 +2205,6 @@
^ (AstFLWORExpr new)
flworExpr_ForLet:(nodes at:1);
exprSingle:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr2:nodes
@@ -2385,8 +2213,6 @@
flworExpr_ForLet:(nodes at:1);
whereClause:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr3:nodes
@@ -2395,8 +2221,6 @@
flworExpr_ForLet:(nodes at:1);
orderByClause:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr4:nodes
@@ -2406,22 +2230,16 @@
whereClause:(nodes at:2);
orderByClause:(nodes at:3);
exprSingle:(nodes at:5).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr_ForLet1:nodes
self informAboutRuleReduction:'FLWORExpr_ForLet1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr_ForLet2:nodes
self informAboutRuleReduction:'FLWORExpr_ForLet2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr_ForLet3:nodes
@@ -2429,8 +2247,6 @@
^ (AstFLWORExpr_ForLet new)
forClause:(nodes at:1);
flworExpr_ForLet:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFLWORExpr_ForLet4:nodes
@@ -2438,8 +2254,6 @@
^ (AstFLWORExpr_ForLet new)
letClause:(nodes at:1);
flworExpr_ForLet:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFilterExpr1:nodes
@@ -2447,8 +2261,6 @@
^ (AstFilterExpr new)
primaryExpr:(nodes at:1);
predicateList:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFilterExpr2:nodes
@@ -2463,8 +2275,6 @@
reduceActionForForClause1:nodes
self informAboutRuleReduction:'ForClause1'.
^ nodes at:2.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForClause_Impl1:nodes
@@ -2472,8 +2282,6 @@
^ (AstForClause new)
varName:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForClause_Impl2:nodes
@@ -2482,8 +2290,6 @@
varName:(nodes at:2);
exprSingle:(nodes at:4);
forClause:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForClause_Impl3:nodes
@@ -2492,8 +2298,6 @@
varName:(nodes at:2);
positionalVar:(nodes at:3);
exprSingle:(nodes at:5).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForClause_Impl4:nodes
@@ -2503,57 +2307,41 @@
positionalVar:(nodes at:3);
exprSingle:(nodes at:5);
forClause:(nodes at:7).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis1:nodes
self informAboutRuleReduction:'ForwardAxis1'.
^ XMLv2::XPathAxisChild new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis2:nodes
self informAboutRuleReduction:'ForwardAxis2'.
^ XMLv2::XPathAxisDescendant new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis3:nodes
self informAboutRuleReduction:'ForwardAxis3'.
^ XMLv2::XPathAxisAttribute new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis4:nodes
self informAboutRuleReduction:'ForwardAxis4'.
^ XMLv2::XPathAxisSelf new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis5:nodes
self informAboutRuleReduction:'ForwardAxis5'.
^ XMLv2::XPathAxisSedcendantOrSelf new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis6:nodes
self informAboutRuleReduction:'ForwardAxis6'.
^ XMLv2::XPathAxisFollowingSibling new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardAxis7:nodes
self informAboutRuleReduction:'ForwardAxis7'.
^ XMLv2::XPathAxisFollowing new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardStep1:nodes
@@ -2562,22 +2350,16 @@
axis:(nodes at:1);
nodeTest:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForForwardStep2:nodes
self informAboutRuleReduction:'ForwardStep2'.
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFunctionCall1:nodes
self informAboutRuleReduction:'FunctionCall1'.
^ AstFunctionCall new qname:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFunctionCall2:nodes
@@ -2585,8 +2367,6 @@
^ (AstFunctionCall new)
qname:(nodes at:1);
functionParametersList:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFunctionDecl1:nodes
@@ -2594,15 +2374,11 @@
name:(nodes at:4);
paramList:(nodes at:6);
body:(nodes at:8)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFunctionParametersList1:nodes
self informAboutRuleReduction:'FunctionParametersList1'.
^ AstFunctionParametersList new exprSingle:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForFunctionParametersList2:nodes
@@ -2610,50 +2386,36 @@
^ (AstFunctionParametersList new)
exprSingle:(nodes at:1);
functionParametersList:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp1:nodes
self informAboutRuleReduction:'GeneralComp1'.
^ #eqGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp2:nodes
self informAboutRuleReduction:'GeneralComp2'.
^ #neGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp3:nodes
self informAboutRuleReduction:'GeneralComp3'.
^ #ltGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp4:nodes
self informAboutRuleReduction:'GeneralComp4'.
^ #leGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp5:nodes
self informAboutRuleReduction:'GeneralComp5'.
^ #gtGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGeneralComp6:nodes
self informAboutRuleReduction:'GeneralComp6'.
^ #geGeneral.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForGroup______updating_1:nodes
@@ -2666,8 +2428,6 @@
expr:(nodes at:3);
trueExprSingle:(nodes at:6);
falseExprSingle:(nodes at:8).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertClause1:nodes
@@ -2675,8 +2435,6 @@
^ (AstInsertIntoExpr new)
targetExpr:(nodes at:3);
sourceExpr:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertClause2:nodes
@@ -2684,8 +2442,6 @@
^ (AstInsertAsFirstIntoExpr new)
targetExpr:(nodes at:5);
sourceExpr:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertClause3:nodes
@@ -2693,8 +2449,6 @@
^ (AstInsertAsLastIntoExpr new)
targetExpr:(nodes at:5);
sourceExpr:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertClause4:nodes
@@ -2702,8 +2456,6 @@
^ (AstInsertAfterExpr new)
targetExpr:(nodes at:3);
sourceExpr:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertClause5:nodes
@@ -2711,22 +2463,16 @@
^ (AstInsertBeforeExpr new)
targetExpr:(nodes at:3);
sourceExpr:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInsertExpr1:nodes
self informAboutRuleReduction:'InsertExpr'.
^ nodes at:3.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInstanceOfExpr1:nodes
self informAboutRuleReduction:'InstanceOfExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForInstanceOfExpr2:nodes
@@ -2734,23 +2480,17 @@
^ (AstInstanceOfExpr new)
unaryExpr:(nodes at:1);
sequenceType:(nodes at:4)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForIntegerLiteral1:nodes
self
informAboutRuleReduction:'IntegerLiteral1 -' , ((nodes at:1) asString).
^ AstIntegerLiteral new content:((nodes at:1) value asInteger).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForIntersectExceptExpr1:nodes
self informAboutRuleReduction:'IntersectExceptExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForIntersectExceptExpr2:nodes
@@ -2759,8 +2499,6 @@
unaryExpr:(nodes at:1);
operand:#intersect;
intersectExceptExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForIntersectExceptExpr3:nodes
@@ -2769,83 +2507,59 @@
unaryExpr:(nodes at:1);
operand:#except;
intersectExceptExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForItemType1:nodes
self informAboutRuleReduction:'ItemType1'.
^ #item.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForItemType2:nodes
self informAboutRuleReduction:'ItemType2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForItemType3:nodes
self informAboutRuleReduction:'ItemType3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest1:nodes
self informAboutRuleReduction:'KindTest1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest2:nodes
self informAboutRuleReduction:'KindTest2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest3:nodes
self informAboutRuleReduction:'KindTest3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest4:nodes
self informAboutRuleReduction:'KindTest4'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest5:nodes
self informAboutRuleReduction:'KindTest5'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest6:nodes
^ XMLv2::XPathCommentTest new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForKindTest7:nodes
^ XMLv2::XPathProcessingInstructionTest new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForLetClause1:nodes
self informAboutRuleReduction:'LetClause1'.
^ nodes at:2.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForLetClause_Impl1:nodes
@@ -2853,8 +2567,6 @@
^ (AstLetClause new)
varName:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForLetClause_Impl2:nodes
@@ -2863,37 +2575,27 @@
varName:(nodes at:2);
exprSingle:(nodes at:4);
letClause:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForLiteral1:nodes
self informAboutRuleReduction:'Literal1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForLiteral2:nodes
self informAboutRuleReduction:'Literal2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMainModule1:nodes
^ (AstMainModule new)
prolog:(nodes at:1);
queryBody:(nodes at:2)
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMultiplicativeExpr1:nodes
self informAboutRuleReduction:'MultiplicativeExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMultiplicativeExpr2:nodes
@@ -2902,8 +2604,6 @@
unionExpr:(nodes at:1);
operand:#krat;
multiplicativeExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMultiplicativeExpr3:nodes
@@ -2912,8 +2612,6 @@
unionExpr:(nodes at:1);
operand:#div;
multiplicativeExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMultiplicativeExpr4:nodes
@@ -2922,8 +2620,6 @@
unionExpr:(nodes at:1);
operand:#idiv;
multiplicativeExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForMultiplicativeExpr5:nodes
@@ -2932,22 +2628,16 @@
unionExpr:(nodes at:1);
operand:#mod;
multiplicativeExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNCName1:nodes
self informAboutRuleReduction:'NCName1 - ' , ((nodes at:1) asString).
^ AstNCName new content:((nodes at:1) value).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNameTest1:nodes
self informAboutRuleReduction:'NameTest1'.
^ XMLv2::XPathNameTest new qName:(nodes at:1) content
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNameTest2:nodes
@@ -2955,8 +2645,6 @@
^ (XMLv2::XPathNameTest new)
prefix:'*';
localName:'*'
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNameTest3:nodes
@@ -2964,111 +2652,79 @@
^ (XMLv2::XPathNameTest new)
prefix:'*';
localName:(nodes at:3) content
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNamespaceDecl1:nodes
^ (AstNamespaceDecl new)
prefix:(nodes at:3);
nsuri:(nodes at:5)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNewNameExpr1:nodes
self informAboutRuleReduction:'NewNameExpr'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNodeComp1:nodes
self informAboutRuleReduction:'NodeComp1'.
^ #is.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNodeComp2:nodes
self informAboutRuleReduction:'NodeComp2'.
^ #isLess.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNodeComp3:nodes
self informAboutRuleReduction:'NodeComp3'.
^ #isMore.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNodeTest1:nodes
self informAboutRuleReduction:'NodeTest1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNodeTest2:nodes
self informAboutRuleReduction:'NodeTest2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNumericLiteral1:nodes
self informAboutRuleReduction:'NumericLiteral1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNumericLiteral2:nodes
self informAboutRuleReduction:'NumericLiteral2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForNumericLiteral3:nodes
self informAboutRuleReduction:'NumericLiteral3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOccurenceIndicator1:nodes
^ self informAboutRuleReduction:'OccurenceIndicator1'
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOccurenceIndicator2:nodes
^ self informAboutRuleReduction:'OccurenceIndicator2'
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOccurenceIndicator3:nodes
^ self informAboutRuleReduction:'OccurenceIndicator3'
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOneOrMoreParamList1:nodes
^ (nodes at:1)
add:(nodes at:3);
yourself
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOneOrMoreParamList2:nodes
^ OrderedCollection with:(nodes at:1)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOptional__Group______updating_1:nodes
@@ -3093,21 +2749,15 @@
reduceActionForOptional___updating_1:nodes
^ nil
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOptional___updating_2:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrExpr1:nodes
self informAboutRuleReduction:'OrExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrExpr2:nodes
@@ -3115,8 +2765,6 @@
^ (AstOrExpr new)
andExpr:(nodes at:1);
orExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderByClause1:nodes
@@ -3124,8 +2772,6 @@
^ (AstOrderByClause new)
isStable:false;
orderSpecList:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderByClause2:nodes
@@ -3133,22 +2779,16 @@
^ (AstOrderByClause new)
isStable:true;
orderSpecList:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier1:nodes
self informAboutRuleReduction:'OrderModifier1'.
^ AstOrderModifier new ascDesc:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier2:nodes
self informAboutRuleReduction:'OrderModifier2'.
^ AstOrderModifier new greatestLeast:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier3:nodes
@@ -3156,43 +2796,31 @@
^ (AstOrderModifier new)
ascDesc:(nodes at:1);
greatestLeast:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier_AscDesc1:nodes
self informAboutRuleReduction:'OrderModifier_AscDesc1'.
^ #asc.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier_AscDesc2:nodes
self informAboutRuleReduction:'OrderModifier_AscDesc2'.
^ #desc.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier_GreatestLeast1:nodes
self informAboutRuleReduction:'OrderModifier_GreatestLeast1'.
^ #greatest.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderModifier_GreatestLeast2:nodes
self informAboutRuleReduction:'OrderModifier_GreatestLeast2'.
^ #least.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderSpec1:nodes
self informAboutRuleReduction:'OrderSpec1'.
^ AstOrderSpec new exprSingle:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderSpec2:nodes
@@ -3200,15 +2828,11 @@
^ (AstOrderSpec new)
exprSingle:(nodes at:1);
orderModifier:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderSpecList1:nodes
self informAboutRuleReduction:'OrderSpecList1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderSpecList2:nodes
@@ -3216,47 +2840,33 @@
^ (AstOrderSpecList new)
orderSpec:(nodes at:1);
orderSpecList:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForOrderedExpr1:nodes
self informAboutRuleReduction:'OrderedExpr1'.
^ nodes at:3.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForParam1:nodes
^ AstParam new name:(nodes at:2)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForParamList1:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForParamList2:nodes
^ '2'
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForParenthesizedExpr1:nodes
self informAboutRuleReduction:'ParenthesizedExpr1'.
^ AstParenthesizedExpr new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForParenthesizedExpr2:nodes
self informAboutRuleReduction:'ParenthesizedExpr2'.
^ AstParenthesizedExpr new expr:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPathExpr1:nodes
@@ -3264,8 +2874,6 @@
^ (nodes at:2)
absolute:true;
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPathExpr2:nodes
@@ -3275,44 +2883,32 @@
axis:XMLv2::XPathAxisDescendantOrSelf new;
nodeTest:XMLv2::XPathAnyKindTest new);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPathExpr3:nodes
self informAboutRuleReduction:'PathExpr4'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPositionalVar1:nodes
self informAboutRuleReduction:'PositionalVar1'.
^ nodes at:3.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPredefinedEntityRef1:nodes
self informAboutRuleReduction:'PredefinedEntityRef1 -'
, ((nodes at:1) asString).
^ AstPredefinedEntityRef new content:((nodes at:1) value).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPredicate1:nodes
self informAboutRuleReduction:'Predicate1'.
^ XMLv2::XPathPredicate new expr:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPredicate2:nodes
self informAboutRuleReduction:'Predicate2'.
^ XMLv2::XPathPredicate new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPredicateList1:nodes
@@ -3334,65 +2930,47 @@
reduceActionForPrimaryExpr1:nodes
self informAboutRuleReduction:'PrimaryExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr2:nodes
self informAboutRuleReduction:'PrimaryExpr2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr3:nodes
self informAboutRuleReduction:'PrimaryExpr3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr4:nodes
self informAboutRuleReduction:'PrimaryExpr4'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr5:nodes
self informAboutRuleReduction:'PrimaryExpr5'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr6:nodes
self informAboutRuleReduction:'PrimaryExpr6'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr7:nodes
self informAboutRuleReduction:'PrimaryExpr7'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrimaryExpr8:nodes
self informAboutRuleReduction:'PrimaryExpr8'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForProlog1:nodes
^ AstProlog new declarations:((nodes at:1)
addAll:(nodes at:2);
yourself)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrologDeclarationClass11:nodes
@@ -3439,41 +3017,29 @@
reduceActionForPrologDeclarationClassA1:nodes
^ AstModuleImport new uri:(nodes at:3)
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrologDeclarationClassA2:nodes
^ (AstModuleImport new)
prefix:(nodes at:4);
uri:(nodes at:6)
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrologDeclarationClassB1:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrologDeclarationClassB2:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForPrologDeclarationClassB3:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQName1:nodes
self informAboutRuleReduction:'QName1 - ' , ((nodes at:1) asString).
^ AstQName new content:((nodes at:1) value).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQuantifiedExpr1:nodes
@@ -3482,8 +3048,6 @@
someEvery:#some;
quantifiedExpr_Impl:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQuantifiedExpr2:nodes
@@ -3492,8 +3056,6 @@
someEvery:#every;
quantifiedExpr_Impl:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQuantifiedExpr_Impl1:nodes
@@ -3501,8 +3063,6 @@
^ (AstQuantifiedExpr_Impl new)
varName:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQuantifiedExpr_Impl2:nodes
@@ -3511,22 +3071,16 @@
varName:(nodes at:2);
exprSingle:(nodes at:4);
quantifiedExpr_Impl:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForQueryBody1:nodes
self informAboutRuleReduction:'QueryBody1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRangeExpr1:nodes
self informAboutRuleReduction:'RangeExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRangeExpr2:nodes
@@ -3534,15 +3088,11 @@
^ (AstRangeExpr new)
additiveExprFrom:(nodes at:1);
additiveExprTo:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRelativePathExpr1:nodes
self informAboutRuleReduction:'RelativePathExpr1'.
^ XMLv2::XPathExpression with:(nodes at:1).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRelativePathExpr2:nodes
@@ -3550,8 +3100,6 @@
^ (nodes at:1)
add:(nodes at:3);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRelativePathExpr3:nodes
@@ -3562,8 +3110,6 @@
nodeTest:XMLv2::XPathAnyKindTest new);
add:(nodes at:3);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRenameExpr1:nodes
@@ -3571,8 +3117,6 @@
^ (AstRenameExpr new)
targetExpr:(nodes at:3);
newNameExpr:(nodes at:5).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__Group_____________VarName______ExprSingle1:nodes
@@ -3587,30 +3131,22 @@
reduceActionForRepeat__Predicate1:nodes
^ OrderedCollection new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__Predicate2:nodes
^ (nodes at:1)
add:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__PrologDeclarationClassA1:nodes
^ OrderedCollection new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__PrologDeclarationClassA2:nodes
^ (nodes at:1)
add:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__PrologDeclarationClassAList1:nodes
@@ -3629,16 +3165,12 @@
reduceActionForRepeat__PrologDeclarationClassB1:nodes
^ OrderedCollection new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForRepeat__PrologDeclarationClassB2:nodes
^ (nodes at:1)
add:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReplaceClause1:nodes
@@ -3646,8 +3178,6 @@
^ (AstReplaceValueOfExpr new)
targetExpr:(nodes at:3);
sourceExpr:(nodes at:5).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReplaceClause2:nodes
@@ -3655,50 +3185,36 @@
^ (AstReplaceExpr new)
targetExpr:(nodes at:1);
sourceExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReplaceExpr1:nodes
self informAboutRuleReduction:'ReplaceExpr'.
^ nodes at:3.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseAxis1:nodes
self informAboutRuleReduction:'ReverseAxis1'.
^ XMLv2::XPathAxisParent new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseAxis2:nodes
self informAboutRuleReduction:'ReverseAxis2'.
^ XMLv2::XPathAxisAncestor new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseAxis3:nodes
self informAboutRuleReduction:'ReverseAxis3'.
^ XMLv2::XPathAxisAncestorOrSelf new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseAxis4:nodes
self informAboutRuleReduction:'ReverseAxis4'.
^ XMLv2::XPathAxisPrecedingSibling new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseAxis5:nodes
self informAboutRuleReduction:'ReverseAxis5'.
^ XMLv2::XPathAxisPreceding new
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseStep1:nodes
@@ -3707,29 +3223,21 @@
axis:(nodes at:1);
nodeTest:(nodes at:2);
yourself
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForReverseStep2:nodes
self informAboutRuleReduction:'ReverseStep2'.
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForSequenceType1:nodes
self informAboutRuleReduction:'SequenceType1'.
- ^ #empty - sequence.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
+ ^ #emptyseq.
!
reduceActionForSequenceType2:nodes
self informAboutRuleReduction:'SequenceType2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForSequenceType3:nodes
@@ -3741,44 +3249,32 @@
reduceActionForSourceExpr1:nodes
self informAboutRuleReduction:'SourceExpr'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForStepExpr1:nodes
self informAboutRuleReduction:'StepExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForStepExpr2:nodes
self informAboutRuleReduction:'StepExpr2'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForStringLiteral1:nodes
self
informAboutRuleReduction:'StringLiteral1 -' , ((nodes at:1) asString).
^ AstStringLiteral new content:((nodes at:1) value).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForTargetExpr1:nodes
self informAboutRuleReduction:'TargetExpr'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForTextTest1:nodes
self informAboutRuleReduction:'TextTest1'.
^ XMLv2::XPathTextTest new.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForTransformCopyClause1:nodes
@@ -3786,8 +3282,6 @@
^ (AstTransformCopyClause new)
varName:(nodes at:2);
exprSingle:(nodes at:4).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForTransformCopyClause2:nodes
@@ -3796,8 +3290,6 @@
varName:(nodes at:2);
exprSingle:(nodes at:4);
transformCopyClause:(nodes at:6).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForTransformExpr1:nodes
@@ -3806,14 +3298,10 @@
transformCopyClause:(nodes at:3);
modifyExpr:(nodes at:5);
returnExpr:(nodes at:7).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForURILiteral1:nodes
^ nodes at:1
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnaryExpr1:nodes
@@ -3821,8 +3309,6 @@
^ (AstUnaryExpr new)
operand:#minus;
unaryExpr:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnaryExpr2:nodes
@@ -3830,22 +3316,16 @@
^ (AstUnaryExpr new)
operand:#plus;
unaryExpr:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnaryExpr3:nodes
self informAboutRuleReduction:'UnaryExpr3'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnionExpr1:nodes
self informAboutRuleReduction:'UnionExpr1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnionExpr2:nodes
@@ -3853,8 +3333,6 @@
^ (AstUnionExpr new)
intersectExceptExpr:(nodes at:1);
unionExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnionExpr3:nodes
@@ -3862,85 +3340,61 @@
^ (AstUnionExpr new)
intersectExceptExpr:(nodes at:1);
unionExpr:(nodes at:3).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForUnorderedExpr1:nodes
self informAboutRuleReduction:'UnorderedExpr1'.
^ nodes at:3.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp1:nodes
self informAboutRuleReduction:'ValueComp1'.
^ #eqValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp2:nodes
self informAboutRuleReduction:'ValueComp2'.
^ #neValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp3:nodes
self informAboutRuleReduction:'ValueComp3'.
^ #ltValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp4:nodes
self informAboutRuleReduction:'ValueComp4'.
^ #leValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp5:nodes
self informAboutRuleReduction:'ValueComp5'.
^ #gtValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueComp6:nodes
self informAboutRuleReduction:'ValueComp6'.
^ #geValue.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForValueExpr1:nodes
self informAboutRuleReduction:'ValueExpr'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForVarName1:nodes
self informAboutRuleReduction:'VarName1'.
^ nodes at:1.
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForVarRef1:nodes
self informAboutRuleReduction:'VarRef1'.
^ AstVarRef new varName:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:47 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForWhereClause1:nodes
self informAboutRuleReduction:'WhereClause1'.
^ AstWhereClause new exprSingle:(nodes at:2).
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
reduceActionForWildcard1:nodes
@@ -4233,8 +3687,6 @@
#(248 2 #reduceActionForMainModule1:)
#(249 1 #reduceActionForURILiteral1:)
)
-
- "Modified: / 08-03-2009 / 22:33:48 / Jan Kurs <kursj1@fel.cvut.cz>"
!
transitionTable
@@ -4734,8 +4186,6 @@
#[0 0 54 0 34 0 42]
#[0 0 22 0 3 0 5 0 7 0 8 0 10 0 14 0 22 0 30 0 35 0 36 0 40 0 52 0 58 0 60 0 61 0 62 0 63 0 64 0 66 0 67 0 72 0 73 0 81 0 87 0 90 0 91 0 95 0 99 0 101 0 104 0 105 0 106 0 107 0 109 0 111 0 112 0 113 0 114 0 115 0 116 0 120 0 121 0 122 0 123 0 125]
)
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryParser methodsFor:'informing'!
--- a/xquery/branches/datatypes/XQuery__XQueryScanner.st Mon Apr 13 10:01:16 2009 +0000
+++ b/xquery/branches/datatypes/XQuery__XQueryScanner.st Mon Apr 13 10:10:16 2009 +0000
@@ -39,8 +39,6 @@
<qout_attr_content_char> : <char> - [""{}<&];
<apos_attr_content_char> : <char> - ['{}<&];
"
-
- "Modified: / 08-03-2009 / 22:33:48 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryScanner class methodsFor:'generated-initialization'!
@@ -206,8 +204,6 @@
put:each last
].
^ keywordMap
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryScanner methodsFor:'accessing'!
@@ -249,28 +245,107 @@
currentCharacter ~~ $:
] whileTrue.
^ self scan20
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan10
self step.
- (currentCharacter == $t) ifTrue:[
+ (currentCharacter == $;) ifTrue:[
^ self scan11
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan11
- self step.
- (currentCharacter == $;) ifTrue:[
- ^ self scan9
+ [
+ self step.
+ (currentCharacter <= $% or:[ currentCharacter >= $( ])
+ ] whileTrue.
+ (currentCharacter == $&) ifTrue:[
+ self step.
+ (currentCharacter == $g or:[ currentCharacter == $l ]) ifTrue:[
+ ^ self scan9
+ ].
+ (currentCharacter == $#) ifTrue:[
+ self step.
+ (currentCharacter isXMLDigit) ifTrue:[
+ [
+ self step.
+ (currentCharacter isXMLDigit)
+ ] whileTrue.
+ (currentCharacter == $;) ifTrue:[
+ ^ self scan11
+ ].
+ ^ self reportLastMatch
+ ].
+ (currentCharacter == $x) ifTrue:[
+ self step.
+ (currentCharacter isXMLDigit
+ or:[
+ (currentCharacter between:$A and:$F)
+ or:[ (currentCharacter between:$a and:$f) ]
+ ])
+ ifTrue:[
+ [
+ self step.
+ (currentCharacter isXMLDigit
+ or:[
+ (currentCharacter between:$A and:$F)
+ or:[ (currentCharacter between:$a and:$f) ]
+ ])
+ ] whileTrue.
+ (currentCharacter == $;) ifTrue:[
+ ^ self scan11
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ (currentCharacter == $a) ifTrue:[
+ self step.
+ (currentCharacter == $m) ifTrue:[
+ self step.
+ (currentCharacter == $p) ifTrue:[
+ ^ self scan10
+ ].
+ ^ self reportLastMatch
+ ].
+ (currentCharacter == $p) ifTrue:[
+ self step.
+ (currentCharacter == $o) ifTrue:[
+ self step.
+ (currentCharacter == $s) ifTrue:[
+ ^ self scan10
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ (currentCharacter == $q) ifTrue:[
+ self step.
+ (currentCharacter == $u) ifTrue:[
+ self step.
+ (currentCharacter == $o) ifTrue:[
+ ^ self scan9
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ ^ self reportLastMatch
+ ].
+ (currentCharacter == $') ifTrue:[
+ self recordMatch:#( 125 ).
+ self step.
+ (currentCharacter == $') ifTrue:[
+ ^ self scan11
+ ].
+ ^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan12
@@ -284,8 +359,6 @@
^ self scan2
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan13
@@ -914,8 +987,6 @@
^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan14
@@ -943,8 +1014,6 @@
^ self scan16
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan15
@@ -957,8 +1026,6 @@
^ self scan3
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan16
@@ -1307,8 +1374,6 @@
^ self scan17
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan17
@@ -1336,8 +1401,6 @@
^ self scan18
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan18
@@ -1365,8 +1428,6 @@
^ self scan19
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan19
@@ -1758,8 +1819,6 @@
^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan2
@@ -1774,8 +1833,6 @@
^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan20
@@ -1798,8 +1855,6 @@
(currentCharacter == $:)
] whileTrue.
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan3
@@ -1825,8 +1880,6 @@
^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan4
@@ -1835,8 +1888,6 @@
^ self scan5
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan5
@@ -1845,8 +1896,6 @@
^ self recordAndReportMatch:#( 124 ).
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan6
@@ -1855,8 +1904,6 @@
^ self scan7
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan7
@@ -1865,8 +1912,6 @@
^ self scan8
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan8
@@ -1961,103 +2006,14 @@
^ self reportLastMatch
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scan9
- [
- self step.
- (currentCharacter <= $% or:[ currentCharacter >= $( ])
- ] whileTrue.
- (currentCharacter == $&) ifTrue:[
- self step.
- (currentCharacter == $g or:[ currentCharacter == $l ]) ifTrue:[
- ^ self scan10
- ].
- (currentCharacter == $#) ifTrue:[
- self step.
- (currentCharacter isXMLDigit) ifTrue:[
- [
- self step.
- (currentCharacter isXMLDigit)
- ] whileTrue.
- (currentCharacter == $;) ifTrue:[
- ^ self scan9
- ].
- ^ self reportLastMatch
- ].
- (currentCharacter == $x) ifTrue:[
- self step.
- (currentCharacter isXMLDigit
- or:[
- (currentCharacter between:$A and:$F)
- or:[ (currentCharacter between:$a and:$f) ]
- ])
- ifTrue:[
- [
- self step.
- (currentCharacter isXMLDigit
- or:[
- (currentCharacter between:$A and:$F)
- or:[ (currentCharacter between:$a and:$f) ]
- ])
- ] whileTrue.
- (currentCharacter == $;) ifTrue:[
- ^ self scan9
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- (currentCharacter == $a) ifTrue:[
- self step.
- (currentCharacter == $m) ifTrue:[
- self step.
- (currentCharacter == $p) ifTrue:[
- ^ self scan11
- ].
- ^ self reportLastMatch
- ].
- (currentCharacter == $p) ifTrue:[
- self step.
- (currentCharacter == $o) ifTrue:[
- self step.
- (currentCharacter == $s) ifTrue:[
- ^ self scan11
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- (currentCharacter == $q) ifTrue:[
- self step.
- (currentCharacter == $u) ifTrue:[
- self step.
- (currentCharacter == $o) ifTrue:[
- ^ self scan10
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- ^ self reportLastMatch
- ].
- (currentCharacter == $') ifTrue:[
- self recordMatch:#( 125 ).
- self step.
- (currentCharacter == $') ifTrue:[
- ^ self scan9
- ].
- ^ self reportLastMatch
+ self step.
+ (currentCharacter == $t) ifTrue:[
+ ^ self scan10
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:45 / Jan Kurs <kursj1@fel.cvut.cz>"
!
scanForToken
@@ -2153,7 +2109,7 @@
^ self reportLastMatch
].
(currentCharacter == $') ifTrue:[
- ^ self scan9
+ ^ self scan11
].
(currentCharacter == $() ifTrue:[
self recordMatch:#( 36 ).
@@ -3261,22 +3217,16 @@
^ self recordAndReportMatch:#( 69 ).
].
^ self reportLastMatch
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryScanner methodsFor:'generated-tokens'!
emptySymbolTokenId
^246
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
!
errorTokenId
^247
-
- "Modified: / 08-03-2009 / 22:33:46 / Jan Kurs <kursj1@fel.cvut.cz>"
! !
!XQueryScanner class methodsFor:'documentation'!