[Tora-cvs] SF.net SVN: tora:[4248] branches/tora-trotl/sandbox.cpp

[<ibr...@us...>]

Revision: 4248
          http://tora.svn.sourceforge.net/tora/?rev=4248&view=rev
Author:   ibre5041
Date:     2012-03-21 16:16:45 +0000 (Wed, 21 Mar 2012)
Log Message:
-----------
LT->getType => LA

Modified Paths:
--------------
    branches/tora-trotl/sandbox.cpp/PLSQLCommons.g
    branches/tora-trotl/sandbox.cpp/PLSQL_DMLParser.g

Modified: branches/tora-trotl/sandbox.cpp/PLSQLCommons.g
===================================================================
--- branches/tora-trotl/sandbox.cpp/PLSQLCommons.g	2012-03-20 21:26:28 UTC (rev 4247)
+++ branches/tora-trotl/sandbox.cpp/PLSQLCommons.g	2012-03-21 16:16:45 UTC (rev 4248)
@@ -197,7 +197,7 @@
 tableview_name
     :    id ((PERIOD id_expression)=> PERIOD id_expression)? 
     (    AT_SIGN link_name
-    |    {!(LT(2)->getType() == SQL92_RESERVED_BY)}?=> partition_extension_clause
+    |    {!(LA(2) == SQL92_RESERVED_BY)}?=> partition_extension_clause
     )?
     ;
 

Modified: branches/tora-trotl/sandbox.cpp/PLSQL_DMLParser.g
===================================================================
--- branches/tora-trotl/sandbox.cpp/PLSQL_DMLParser.g	2012-03-20 21:26:28 UTC (rev 4247)
+++ branches/tora-trotl/sandbox.cpp/PLSQL_DMLParser.g	2012-03-21 16:16:45 UTC (rev 4248)
@@ -772,13 +772,11 @@
     |    prior_key unary_expression
     |    connect_by_root_key unary_expression
     |    { // input.LT(1).getText().equalsIgnoreCase("new") && !input.LT(2).getText().equals(".")}?
-            equalsIgnoreCase(LT(1)->getText(), "new") && !equalsIgnoreCase(LT(2)->getText(), "." )
+            equalsIgnoreCase(LT(1)->getText(), "NEW") && !equalsIgnoreCase(LT(2)->getText(), "." )
          }? => new_key unary_expression
     |    distinct_key unary_expression
     |    all_key unary_expression
-    |    { // (input.LA(1) == SQL92_RESERVED_CASE || input.LA(2) == SQL92_RESERVED_CASE)}?
-            LT(1)->getType() == SQL92_RESERVED_CASE || LT(2)->getType() == SQL92_RESERVED_CASE
-         }? case_statement[false]
+    |    { LA(1) == SQL92_RESERVED_CASE || LA(2) == SQL92_RESERVED_CASE }? case_statement[false]
     |    quantified_expression
     |    standard_function
     |    atom
@@ -919,7 +917,7 @@
             LEFT_PAREN
                 (entityescaping_key|noentityescaping_key)?
                 (name_key|evalname_key)? expression_wrapper
-                ({equalsIgnoreCase(LT(2)->getText(), "xmlattributes")}? COMMA xml_attributes_clause)?
+                ({equalsIgnoreCase(LT(2)->getText(), "XMLATTRIBUTES")}? COMMA xml_attributes_clause)?
                 (COMMA expression_wrapper column_alias?)*
             RIGHT_PAREN
             (PERIOD general_element_part)?

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.