mayatool3_test3: mayachemtools/docs/modules/html/code/SimpleCalcParser.html annotate

author	deepakjadmin
date	Wed, 20 Jan 2016 11:55:01 -0500
parents
children

rev	line source
0 73ae111cf86f Uploaded deepakjadmin parents: diff changeset	1 <html>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	2 <head>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	3 <title>MayaChemTools:Code:Parsers::SimpleCalcParser.pm</title>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	4 <meta http-equiv="content-type" content="text/html;charset=utf-8">
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	5 <link rel="stylesheet" type="text/css" href="../../../css/MayaChemToolsCode.css">
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	6 </head>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	7 <body leftmargin="20" rightmargin="20" topmargin="10" bottommargin="10">
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	8 <br/>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	9 <center>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	10 <a href="http://www.mayachemtools.org" title="MayaChemTools Home"><img src="../../../images/MayaChemToolsLogo.gif" border="0" alt="MayaChemTools"></a>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	11 </center>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	12 <br/>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	13 <pre>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	14 <a name="package-Parsers::SimpleCalcParser-"></a> 1 <span class="k">package </span><span class="i">Parsers::SimpleCalcParser</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	15 2 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	16 3 <span class="c"># $RCSfile: SimpleCalcParser.yy,v $</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	17 4 <span class="c"># $Date: 2015/02/28 20:50:55 $</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	18 5 <span class="c"># $Revision: 1.10 $</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	19 6 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	20 7 <span class="c"># Author: Manish Sud <msud@san.rr.com></span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	21 8 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	22 9 <span class="c"># Copyright (C) 2015 Manish Sud. All rights reserved.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	23 10 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	24 11 <span class="c"># This file is part of MayaChemTools.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	25 12 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	26 13 <span class="c"># MayaChemTools is free software; you can redistribute it and/or modify it under</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	27 14 <span class="c"># the terms of the GNU Lesser General Public License as published by the Free</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	28 15 <span class="c"># Software Foundation; either version 3 of the License, or (at your option) any</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	29 16 <span class="c"># later version.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	30 17 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	31 18 <span class="c"># MayaChemTools is distributed in the hope that it will be useful, but without</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	32 19 <span class="c"># any warranty; without even the implied warranty of merchantability of fitness</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	33 20 <span class="c"># for a particular purpose. See the GNU Lesser General Public License for more</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	34 21 <span class="c"># details.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	35 22 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	36 23 <span class="c"># You should have received a copy of the GNU Lesser General Public License</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	37 24 <span class="c"># along with MayaChemTools; if not, see <http://www.gnu.org/licenses/> or</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	38 25 <span class="c"># write to the Free Software Foundation Inc., 59 Temple Place, Suite 330,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	39 26 <span class="c"># Boston, MA, 02111-1307, USA.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	40 27 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	41 28 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	42 29 <span class="c"># A WORD TO THE WISE:</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	43 30 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	44 31 <span class="c"># The parser package and token table files, SimpleCalcParser.pm and</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	45 32 <span class="c"># SimpleCalcParser.tab.ph, are automatically generated from parser grammar</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	46 33 <span class="c"># definition file, SimpleCalcParser.yy, using byacc available through perl-byacc1.8</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	47 34 <span class="c"># modified with perl5-byacc-patches-0.5 for generation of object oriented parser:</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	48 35 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	49 36 <span class="c"># byacc -l -P -d -b SimpleCalcParser SimpleCalcParser.yy</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	50 37 <span class="c"># mv SimpleCalcParser.tab.pl SimpleCalcParser.pm</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	51 38 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	52 39
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	53 40 <span class="k">use</span> <span class="w">Carp</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	54 41
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	55 42 <span class="c"># Setup a hash map for mapping of words/letters to values...</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	56 43 <span class="i">%LetterToValueMap</span> = <span class="s">(</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	57 44
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	58 45 <span class="i">$NUMBER</span>=<span class="n">257</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	59 46 <span class="i">$LETTER</span>=<span class="n">258</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	60 47 <span class="i">$YYERRCODE</span>=<span class="n">256</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	61 48 <span class="i">@yylhs</span> = <span class="s">(</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	62 49 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">1</span><span class="cm">,</span> <span class="n">1</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	63 50 <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	64 51 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	65 52 <span class="i">@yylen</span> = <span class="s">(</span> <span class="n">2</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	66 53 <span class="n">0</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">1</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	67 54 <span class="n">3</span><span class="cm">,</span> <span class="n">1</span><span class="cm">,</span> <span class="n">1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	68 55 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	69 56 <span class="i">@yydefred</span> = <span class="s">(</span> <span class="n">1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	70 57 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">12</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	71 58 <span class="n">0</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">6</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	72 59 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">11</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	73 60 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	74 61 <span class="i">@yydgoto</span> = <span class="s">(</span> <span class="n">1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	75 62 <span class="n">6</span><span class="cm">,</span> <span class="n">7</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	76 63 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	77 64 <span class="i">@yysindex</span> = <span class="s">(</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	78 65 <span class="n">-40</span><span class="cm">,</span> <span class="n">-7</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-57</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-5</span><span class="cm">,</span> <span class="n">-18</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	79 66 <span class="n">-31</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-38</span><span class="cm">,</span> <span class="n">-18</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-16</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	80 67 <span class="n">-16</span><span class="cm">,</span> <span class="n">-30</span><span class="cm">,</span> <span class="n">-30</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	81 68 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	82 69 <span class="i">@yyrindex</span> = <span class="s">(</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	83 70 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-9</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	84 71 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	85 72 <span class="n">13</span><span class="cm">,</span> <span class="n">-2</span><span class="cm">,</span> <span class="n">5</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	86 73 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	87 74 <span class="i">@yygindex</span> = <span class="s">(</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	88 75 <span class="n">0</span><span class="cm">,</span> <span class="n">50</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	89 76 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	90 77 <span class="i">$YYTABLESIZE</span>=<span class="n">220</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	91 78 <span class="i">@yytable</span> = <span class="s">(</span> <span class="n">5</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	92 79 <span class="n">13</span><span class="cm">,</span> <span class="n">5</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">12</span><span class="cm">,</span> <span class="n">17</span><span class="cm">,</span> <span class="n">17</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">4</span><span class="cm">,</span> <span class="n">19</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	93 80 <span class="n">15</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">5</span><span class="cm">,</span> <span class="n">14</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">16</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">7</span><span class="cm">,</span> <span class="n">17</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	94 81 <span class="n">17</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span> <span class="n">15</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">15</span><span class="cm">,</span> <span class="n">14</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">16</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	95 82 <span class="n">16</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	96 83 <span class="n">9</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">7</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	97 84 <span class="n">7</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">7</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span> <span class="n">11</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">8</span><span class="cm">,</span> <span class="n">18</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	98 85 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">20</span><span class="cm">,</span> <span class="n">21</span><span class="cm">,</span> <span class="n">22</span><span class="cm">,</span> <span class="n">23</span><span class="cm">,</span> <span class="n">24</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	99 86 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	100 87 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	101 88 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	102 89 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	103 90 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	104 91 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	105 92 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	106 93 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	107 94 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	108 95 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	109 96 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	110 97 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	111 98 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	112 99 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	113 100 <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">0</span><span class="cm">,</span> <span class="n">2</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">4</span><span class="cm">,</span> <span class="n">3</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	114 101 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	115 102 <span class="i">@yycheck</span> = <span class="s">(</span> <span class="n">40</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	116 103 <span class="n">10</span><span class="cm">,</span> <span class="n">40</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">61</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">37</span><span class="cm">,</span> <span class="n">37</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">41</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	117 104 <span class="n">42</span><span class="cm">,</span> <span class="n">43</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">47</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">37</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	118 105 <span class="n">37</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">10</span><span class="cm">,</span> <span class="n">42</span><span class="cm">,</span> <span class="n">43</span><span class="cm">,</span> <span class="n">42</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">37</span><span class="cm">,</span> <span class="n">47</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	119 106 <span class="n">47</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">42</span><span class="cm">,</span> <span class="n">43</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">47</span><span class="cm">,</span> <span class="n">41</span><span class="cm">,</span> <span class="n">42</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	120 107 <span class="n">43</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">47</span><span class="cm">,</span> <span class="n">41</span><span class="cm">,</span> <span class="n">42</span><span class="cm">,</span> <span class="n">43</span><span class="cm">,</span> <span class="n">41</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	121 108 <span class="n">43</span><span class="cm">,</span> <span class="n">47</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">41</span><span class="cm">,</span> <span class="n">5</span><span class="cm">,</span> <span class="n">43</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">45</span><span class="cm">,</span> <span class="n">9</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	122 109 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">13</span><span class="cm">,</span> <span class="n">14</span><span class="cm">,</span> <span class="n">15</span><span class="cm">,</span> <span class="n">16</span><span class="cm">,</span> <span class="n">17</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	123 110 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	124 111 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	125 112 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	126 113 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	127 114 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	128 115 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	129 116 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	130 117 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	131 118 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	132 119 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	133 120 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	134 121 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	135 122 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	136 123 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	137 124 <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">-1</span><span class="cm">,</span> <span class="n">256</span><span class="cm">,</span> <span class="n">257</span><span class="cm">,</span> <span class="n">258</span><span class="cm">,</span> <span class="n">257</span><span class="cm">,</span> <span class="n">258</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	138 125 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	139 126 <span class="i">$YYFINAL</span>=<span class="n">1</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	140 127 <span class="c">#ifndef YYDEBUG</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	141 128 <span class="c">#define YYDEBUG 0</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	142 129 <span class="c">#endif</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	143 130 <span class="i">$YYMAXTOKEN</span>=<span class="n">258</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	144 131 <span class="c">#if YYDEBUG</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	145 132 <span class="i">@yyname</span> = <span class="s">(</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	146 133 <span class="q">"end-of-file"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'\\n'"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	147 134 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'%'"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'('"</span><span class="cm">,</span><span class="q">"')'"</span><span class="cm">,</span><span class="q">"'*'"</span><span class="cm">,</span><span class="q">"'+'"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'-'"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'/'"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	148 135 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"'='"</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	149 136 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	150 137 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	151 138 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	152 139 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	153 140 <span class="q">''</span><span class="cm">,</span><span class="q">''</span><span class="cm">,</span><span class="q">"NUMBER"</span><span class="cm">,</span><span class="q">"LETTER"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	154 141 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	155 142 <span class="i">@yyrule</span> = <span class="s">(</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	156 143 <span class="q">"\$accept : list"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	157 144 <span class="q">"list :"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	158 145 <span class="q">"list : list stat '\\n'"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	159 146 <span class="q">"list : list error '\\n'"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	160 147 <span class="q">"stat : expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	161 148 <span class="q">"stat : LETTER '=' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	162 149 <span class="q">"expr : '(' expr ')'"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	163 150 <span class="q">"expr : expr '+' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	164 151 <span class="q">"expr : expr '-' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	165 152 <span class="q">"expr : expr '*' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	166 153 <span class="q">"expr : expr '/' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	167 154 <span class="q">"expr : expr '%' expr"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	168 155 <span class="q">"expr : NUMBER"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	169 156 <span class="q">"expr : LETTER"</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	170 157 <span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	171 158 <span class="c">#endif</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	172 159
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	173 <a name="yyclearin-"></a> 160 <span class="k">sub </span><span class="m">yyclearin</span> <span class="s">{</span> <span class="i">$_</span>[<span class="n">0</span>]->{<span class="q">'yychar'</span>} = <span class="n">-1</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	174 161
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	175 <a name="yyerrok-"></a> 162 <span class="k">sub </span><span class="m">yyerrok</span> <span class="s">{</span> <span class="i">$_</span>[<span class="n">0</span>]->{<span class="q">'yyerrflag'</span>} = <span class="n">0</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	176 163
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	177 <a name="new-"></a> 164 <span class="k">sub </span><span class="m">new</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	178 165 <span class="k">my</span> <span class="i">$p</span> = <span class="s">{</span><span class="q">'yylex'</span> <span class="cm">=></span> <span class="i">$_</span>[<span class="n">1</span>]<span class="cm">,</span> <span class="q">'yyerror'</span> <span class="cm">=></span> <span class="i">$_</span>[<span class="n">2</span>]<span class="cm">,</span> <span class="q">'yydebug'</span> <span class="cm">=></span> <span class="i">$_</span>[<span class="n">3</span>]<span class="s">}</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	179 166 <span class="k">bless</span> <span class="i">$p</span><span class="cm">,</span> <span class="i">$_</span>[<span class="n">0</span>]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	180 167 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	181 168
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	182 <a name="YYERROR-"></a> 169 <span class="k">sub </span><span class="m">YYERROR</span> <span class="s">{</span> ++<span class="i">$_</span>[<span class="n">0</span>]->{<span class="q">'yynerrs'</span>}<span class="sc">;</span> <span class="i">$_</span>[<span class="n">0</span>]<span class="i">->yy_err_recover</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	183 170
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	184 <a name="yy_err_recover-"></a> 171 <span class="k">sub </span><span class="m">yy_err_recover</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	185 172 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	186 173 <span class="c"># msud@san.rr.com:</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	187 174 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	188 175 <span class="c"># Turn off "exiting" warning to suppress the following warning at "next yyloop":</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	189 176 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	190 177 <span class="c"># Exiting subroutine via next at <LineNum></span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	191 178 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	192 179 <span class="c"># The code does work as expected with or without turning off the warning.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	193 180 <span class="c"># This method is invoked in yyparse method directly or indirectly in another</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	194 181 <span class="c"># method and Perl compilers ends up finding "yyloop" as the nearst enclosure</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	195 182 <span class="c"># label.</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	196 183 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	197 184 <span class="k">no</span> <span class="w">warnings</span> <span class="q">qw(exiting)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	198 185
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	199 186 <span class="k">my</span> <span class="s">(</span><span class="i">$p</span><span class="s">)</span> = <span class="i">@_</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	200 187 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyerrflag'</span>} < <span class="n">3</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	201 188 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	202 189 <span class="i">$p</span>->{<span class="q">'yyerrflag'</span>} = <span class="n">3</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	203 190 <span class="k">while</span> <span class="s">(</span><span class="n">1</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	204 191 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	205 192 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yysindex</span>[<span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}]]<span class="s">)</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	206 193 <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} += <span class="i">$YYERRCODE</span><span class="s">)</span> >= <span class="n">0</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	207 194 <span class="i">$p</span>->{<span class="q">'yyn'</span>} < <span class="i">@yycheck</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	208 195 <span class="i">$yycheck</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] == <span class="i">$YYERRCODE</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	209 196 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	210 197 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	211 198 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	212 199 <span class="q">", error recovery shifting to state"</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	213 200 <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] . <span class="q">"\n"</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	214 201 <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	215 202 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] =
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	216 203 <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	217 204 <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}] = <span class="i">$p</span>->{<span class="q">'yylval'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	218 205 <span class="k">next</span> <span class="j">yyloop</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	219 206 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	220 207 <span class="k">else</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	221 208 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	222 209 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: error recovery discarding state "</span>.
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	223 210 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}]. <span class="q">"\n"</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	224 211 <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	225 212 <span class="k">return</span><span class="s">(</span><span class="k">undef</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yyssp'</span>} <= <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	226 213 --<span class="i">$p</span>->{<span class="q">'yyssp'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	227 214 --<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	228 215 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	229 216 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	230 217 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	231 218 <span class="k">else</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	232 219 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	233 220 <span class="k">return</span> <span class="s">(</span><span class="k">undef</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yychar'</span>} == <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	234 221 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	235 222 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	236 223 <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">''</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	237 224 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} <= <span class="i">$YYMAXTOKEN</span><span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} =
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	238 225 <span class="i">$yyname</span>[<span class="i">$p</span>->{<span class="q">'yychar'</span>}]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	239 226 <span class="k">if</span> <span class="s">(</span>!<span class="i">$p</span>->{<span class="q">'yys'</span>}<span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">'illegal-symbol'</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	240 227 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state "</span> . <span class="i">$p</span>->{<span class="q">'yystate'</span>} .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	241 228 <span class="q">", error recovery discards "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	242 229 <span class="q">"token "</span> . <span class="i">$p</span>->{<span class="q">'yychar'</span>} . <span class="q">"("</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	243 230 <span class="i">$p</span>->{<span class="q">'yys'</span>} . <span class="q">")\n"</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	244 231 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	245 232 <span class="i">$p</span>->{<span class="q">'yychar'</span>} = <span class="n">-1</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	246 233 <span class="k">next</span> <span class="j">yyloop</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	247 234 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	248 235 <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	249 236 <span class="s">}</span> <span class="c"># yy_err_recover</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	250 237
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	251 <a name="yyparse-"></a> 238 <span class="k">sub </span><span class="m">yyparse</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	252 239 <span class="k">my</span> <span class="s">(</span><span class="i">$p</span><span class="cm">,</span> <span class="i">$s</span><span class="s">)</span> = <span class="i">@_</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	253 240 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="i">$ENV</span>{<span class="q">'YYDEBUG'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	254 241 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	255 242 <span class="i">$p</span>->{<span class="q">'yydebug'</span>} = <span class="k">int</span><span class="s">(</span><span class="i">$1</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} =~ <span class="q">/^(\d)/</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	256 243 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	257 244
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	258 245 <span class="i">$p</span>->{<span class="q">'yynerrs'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	259 246 <span class="i">$p</span>->{<span class="q">'yyerrflag'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	260 247 <span class="i">$p</span>->{<span class="q">'yychar'</span>} = <span class="s">(</span><span class="n">-1</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	261 248
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	262 249 <span class="i">$p</span>->{<span class="q">'yyssp'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	263 250 <span class="i">$p</span>->{<span class="q">'yyvsp'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	264 251 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] = <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	265 252
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	266 253 <span class="j">yyloop:</span> <span class="k">while</span><span class="s">(</span><span class="n">1</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	267 254 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	268 255 <span class="j">yyreduce:</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	269 256 <span class="k">last</span> <span class="j">yyreduce</span> <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yydefred</span>[<span class="i">$p</span>->{<span class="q">'yystate'</span>}]<span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	270 257 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} < <span class="n">0</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	271 258 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	272 259 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="cm">,</span> <span class="i">$p</span>->{<span class="q">'yylval'</span>}<span class="s">)</span> =
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	273 260 <span class="i">&</span>{<span class="i">$p</span>->{<span class="q">'yylex'</span>}}<span class="s">(</span><span class="i">$s</span><span class="s">)</span><span class="s">)</span> < <span class="n">0</span><span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yychar'</span>} = <span class="n">0</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	274 261 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	275 262 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	276 263 <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">''</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	277 264 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} <= <span class="i">$#yyname</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	278 265 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="i">$yyname</span>[<span class="i">$p</span>->{<span class="q">'yychar'</span>}]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	279 266 <span class="k">if</span> <span class="s">(</span>!<span class="i">$p</span>->{<span class="q">'yys'</span>}<span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">'illegal-symbol'</span><span class="sc">;</span> <span class="s">}</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	280 267 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state "</span> . <span class="i">$p</span>->{<span class="q">'yystate'</span>} .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	281 268 <span class="q">", reading "</span> . <span class="i">$p</span>->{<span class="q">'yychar'</span>} . <span class="q">" ("</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	282 269 <span class="i">$p</span>->{<span class="q">'yys'</span>} . <span class="q">")\n"</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	283 270 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	284 271 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	285 272 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yysindex</span>[<span class="i">$p</span>->{<span class="q">'yystate'</span>}]<span class="s">)</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	286 273 <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} += <span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="s">)</span> >= <span class="n">0</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	287 274 <span class="i">$yycheck</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] == <span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	288 275 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	289 276 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state "</span> . <span class="i">$p</span>->{<span class="q">'yystate'</span>} .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	290 277 <span class="q">", shifting to state "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	291 278 <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] . <span class="q">"\n"</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	292 279 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] = <span class="i">$p</span>->{<span class="q">'yystate'</span>} =
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	293 280 <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	294 281 <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}] = <span class="i">$p</span>->{<span class="q">'yylval'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	295 282 <span class="i">$p</span>->{<span class="q">'yychar'</span>} = <span class="s">(</span><span class="n">-1</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	296 283 --<span class="i">$p</span>->{<span class="q">'yyerrflag'</span>} <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yyerrflag'</span>} > <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	297 284 <span class="k">next</span> <span class="j">yyloop</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	298 285 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	299 286 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yyrindex</span>[<span class="i">$p</span>->{<span class="q">'yystate'</span>}]<span class="s">)</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	300 287 <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} += <span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="s">)</span> >= <span class="n">0</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	301 288 <span class="i">$yycheck</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] == <span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	302 289 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	303 290 <span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	304 291 <span class="k">last</span> <span class="j">yyreduce</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	305 292 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	306 293 <span class="k">if</span> <span class="s">(</span>! <span class="i">$p</span>->{<span class="q">'yyerrflag'</span>}<span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	307 294 <span class="k">if</span> <span class="s">(</span> <span class="s">(</span><span class="k">defined</span><span class="s">(</span><span class="i">$EOI</span><span class="s">)</span> && <span class="i">$p</span>->{<span class="q">'yychar'</span>} == <span class="i">$EOI</span><span class="s">)</span> \|\| <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} == <span class="n">0</span><span class="s">)</span> <span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	308 295 <span class="i">&</span>{<span class="i">$p</span>->{<span class="q">'yyerror'</span>}}<span class="s">(</span><span class="q">"syntax error at or near the end of input text"</span><span class="cm">,</span> <span class="i">$s</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	309 296 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	310 297 <span class="k">else</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	311 298 <span class="i">&</span>{<span class="i">$p</span>->{<span class="q">'yyerror'</span>}}<span class="s">(</span><span class="q">"syntax error at or near input text: '$p->{'yylval'}'"</span><span class="cm">,</span> <span class="i">$s</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	312 299 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	313 300 ++<span class="i">$p</span>->{<span class="q">'yynerrs'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	314 301 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	315 302 <span class="k">return</span><span class="s">(</span><span class="k">undef</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span><span class="i">->yy_err_recover</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	316 303 <span class="s">}</span> <span class="c"># yyreduce</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	317 304 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state "</span> . <span class="i">$p</span>->{<span class="q">'yystate'</span>} .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	318 305 <span class="q">", reducing by rule "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	319 306 <span class="i">$p</span>->{<span class="q">'yyn'</span>} . <span class="q">" ("</span> . <span class="i">$yyrule</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	320 307 <span class="q">")\n"</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	321 308 <span class="i">$p</span>->{<span class="q">'yym'</span>} = <span class="i">$yylen</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	322 309 <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}+<span class="n">1</span>-<span class="i">$p</span>->{<span class="q">'yym'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	323 310
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	324 311 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">2</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	325 312 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">1</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	326 313 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	327 314
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	328 315 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">3</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	329 316 <span class="s">{</span> <span class="i">$p</span><span class="i">->yyerrok</span><span class="sc">;</span> <span class="i">$p</span><span class="i">->yyclearin</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	330 317 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	331 318
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	332 319 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">4</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	333 320 <span class="s">{</span> <span class="i">$ExprOut</span> = <span class="k">sprintf</span> <span class="q">"%5i"</span><span class="cm">,</span> <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="k">print</span> <span class="q">"$ExprOut\n"</span><span class="sc">;</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	334 321 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	335 322
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	336 323 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">5</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	337 324 <span class="s">{</span> <span class="i">$LetterToValueMap</span>{<span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>]} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	338 325 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	339 326
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	340 327 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">6</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	341 328 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">1</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	342 329 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	343 330
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	344 331 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">7</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	345 332 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>] + <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	346 333 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	347 334
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	348 335 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">8</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	349 336 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>] - <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	350 337 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	351 338
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	352 339 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">9</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	353 340 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>] * <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	354 341 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	355 342
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	356 343 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">10</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	357 344 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>] / <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	358 345 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	359 346
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	360 347 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">11</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	361 348 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">2</span>] % <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	362 349 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	363 350
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	364 351 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} == <span class="n">13</span><span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	365 352 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	366 353 <span class="k">if</span> <span class="s">(</span><span class="k">exists</span> <span class="i">$LetterToValueMap</span>{<span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]}<span class="s">)</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	367 354 <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="i">$LetterToValueMap</span>{<span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	368 355 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	369 356 <span class="k">else</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	370 357 <span class="i">$Letter</span> = <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}-<span class="n">0</span>]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	371 358 <span class="k">print</span> <span class="q">"Undefined variable $Letter encountered by SimpleCalcParser; Value set to 0\n"</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	372 359 <span class="i">$p</span>->{<span class="q">'yyval'</span>} = <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	373 360 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	374 361 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	375 362 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	376 363 <span class="i">$p</span>->{<span class="q">'yyssp'</span>} -= <span class="i">$p</span>->{<span class="q">'yym'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	377 364 <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	378 365 <span class="i">$p</span>->{<span class="q">'yyvsp'</span>} -= <span class="i">$p</span>->{<span class="q">'yym'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	379 366 <span class="i">$p</span>->{<span class="q">'yym'</span>} = <span class="i">$yylhs</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	380 367 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yystate'</span>} == <span class="n">0</span> && <span class="i">$p</span>->{<span class="q">'yym'</span>} == <span class="n">0</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	381 368 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	382 369 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: after reduction, shifting from state 0 "</span><span class="cm">,</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	383 370 <span class="q">"to state $YYFINAL\n"</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	384 371 <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="i">$YYFINAL</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	385 372 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] = <span class="i">$YYFINAL</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	386 373 <span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[++<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}] = <span class="i">$p</span>->{<span class="q">'yyval'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	387 374 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} < <span class="n">0</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	388 375 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	389 376 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>}<span class="cm">,</span> <span class="i">$p</span>->{<span class="q">'yylval'</span>}<span class="s">)</span> =
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	390 377 <span class="i">&</span>{<span class="i">$p</span>->{<span class="q">'yylex'</span>}}<span class="s">(</span><span class="i">$s</span><span class="s">)</span><span class="s">)</span> < <span class="n">0</span><span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yychar'</span>} = <span class="n">0</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	391 378 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	392 379 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	393 380 <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">''</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	394 381 <span class="k">if</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yychar'</span>} <= <span class="i">$#yyname</span><span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	395 382 <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="i">$yyname</span>[<span class="i">$p</span>->{<span class="q">'yychar'</span>}]<span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	396 383 <span class="k">if</span> <span class="s">(</span>!<span class="i">$p</span>->{<span class="q">'yys'</span>}<span class="s">)</span> <span class="s">{</span> <span class="i">$p</span>->{<span class="q">'yys'</span>} = <span class="q">'illegal-symbol'</span><span class="sc">;</span> <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	397 384 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: state $YYFINAL, reading "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	398 385 <span class="i">$p</span>->{<span class="q">'yychar'</span>} . <span class="q">" ("</span> . <span class="i">$p</span>->{<span class="q">'yys'</span>} . <span class="q">")\n"</span><span class="s">)</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	399 386 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	400 387 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	401 388 <span class="k">return</span> <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyvs'</span>}->[<span class="n">1</span>]<span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yychar'</span>} == <span class="n">0</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	402 389 <span class="k">next</span> <span class="j">yyloop</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	403 390 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	404 391 <span class="k">if</span> <span class="s">(</span><span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} = <span class="i">$yygindex</span>[<span class="i">$p</span>->{<span class="q">'yym'</span>}]<span class="s">)</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	405 392 <span class="s">(</span><span class="i">$p</span>->{<span class="q">'yyn'</span>} += <span class="i">$p</span>->{<span class="q">'yystate'</span>}<span class="s">)</span> >= <span class="n">0</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	406 393 <span class="i">$p</span>->{<span class="q">'yyn'</span>} <= <span class="i">$#yycheck</span> &&
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	407 394 <span class="i">$yycheck</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}] == <span class="i">$p</span>->{<span class="q">'yystate'</span>}<span class="s">)</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	408 395 <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	409 396 <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="i">$yytable</span>[<span class="i">$p</span>->{<span class="q">'yyn'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	410 397 <span class="s">}</span> <span class="k">else</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	411 398 <span class="i">$p</span>->{<span class="q">'yystate'</span>} = <span class="i">$yydgoto</span>[<span class="i">$p</span>->{<span class="q">'yym'</span>}]<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	412 399 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	413 400 <span class="k">warn</span><span class="s">(</span><span class="q">"yydebug: after reduction, shifting from state "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	414 401 <span class="i">$p</span>->{<span class="q">'yyss'</span>}->[<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] . <span class="q">" to state "</span> .
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	415 402 <span class="i">$p</span>->{<span class="q">'yystate'</span>} . <span class="q">"\n"</span><span class="s">)</span> <span class="k">if</span> <span class="i">$p</span>->{<span class="q">'yydebug'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	416 403 <span class="i">$p</span>->{<span class="q">'yyss'</span>}[++<span class="i">$p</span>->{<span class="q">'yyssp'</span>}] = <span class="i">$p</span>->{<span class="q">'yystate'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	417 404 <span class="i">$p</span>->{<span class="q">'yyvs'</span>}[++<span class="i">$p</span>->{<span class="q">'yyvsp'</span>}] = <span class="i">$p</span>->{<span class="q">'yyval'</span>}<span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	418 405 <span class="s">}</span> <span class="c"># yyloop</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	419 406 <span class="s">}</span> <span class="c"># yyparse</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	420 407
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	421 408
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	422 409 <span class="c"># yyerror function supplied to parser along with a lexer during initialization of</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	423 410 <span class="c"># the parser...</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	424 411 <span class="c">#</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	425 412
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	426 <a name="yyerror-1-"></a> 413 <span class="k">sub </span><span class="m">yyerror</span> <span class="s">{</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	427 414 <span class="k">my</span> <span class="s">(</span><span class="i">$msg</span><span class="s">)</span> = <span class="i">@_</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	428 415 <span class="k">print</span> <span class="q">"yyerror: $msg...\n"</span><span class="sc">;</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	429 416 <span class="s">}</span>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	430 417
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	431 <a name="EOF-"></a></pre>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	432 <p> </p>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	433 <br />
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	434 <center>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	435 <img src="../../../images/h2o2.png">
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	436 </center>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	437 </body>
73ae111cf86f Uploaded deepakjadmin parents: diff changeset	438 </html>

0

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

1 <html>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

2 <head>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

3 <title>MayaChemTools:Code:Parsers::SimpleCalcParser.pm</title>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

4 <meta http-equiv="content-type" content="text/html;charset=utf-8">

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

5 <link rel="stylesheet" type="text/css" href="../../../css/MayaChemToolsCode.css">

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

6 </head>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

7 <body leftmargin="20" rightmargin="20" topmargin="10" bottommargin="10">

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

8

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

9 <center>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

10 <a href="http://www.mayachemtools.org" title="MayaChemTools Home"><img src="../../../images/MayaChemToolsLogo.gif" border="0" alt="MayaChemTools"></a>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

11 </center>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

12

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

13 <pre>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

14 <a name="package-Parsers::SimpleCalcParser-"></a> 1 package Parsers::SimpleCalcParser;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

15 2 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

16 3 # $RCSfile: SimpleCalcParser.yy,v $

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

17 4 # $Date: 2015/02/28 20:50:55 $

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

18 5 # $Revision: 1.10 $

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

19 6 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

20 7 # Author: Manish Sud <msud@san.rr.com>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

21 8 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

23 10 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

24 11 # This file is part of MayaChemTools.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

25 12 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

26 13 # MayaChemTools is free software; you can redistribute it and/or modify it under

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

27 14 # the terms of the GNU Lesser General Public License as published by the Free

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

28 15 # Software Foundation; either version 3 of the License, or (at your option) any

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

29 16 # later version.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

30 17 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

31 18 # MayaChemTools is distributed in the hope that it will be useful, but without

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

32 19 # any warranty; without even the implied warranty of merchantability of fitness

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

33 20 # for a particular purpose. See the GNU Lesser General Public License for more

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

34 21 # details.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

35 22 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

36 23 # You should have received a copy of the GNU Lesser General Public License

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

37 24 # along with MayaChemTools; if not, see <http://www.gnu.org/licenses/> or

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

38 25 # write to the Free Software Foundation Inc., 59 Temple Place, Suite 330,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

39 26 # Boston, MA, 02111-1307, USA.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

40 27 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

41 28 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

42 29 # A WORD TO THE WISE:

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

43 30 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

44 31 # The parser package and token table files, SimpleCalcParser.pm and

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

45 32 # SimpleCalcParser.tab.ph, are automatically generated from parser grammar

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

46 33 # definition file, SimpleCalcParser.yy, using byacc available through perl-byacc1.8

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

47 34 # modified with perl5-byacc-patches-0.5 for generation of object oriented parser:

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

48 35 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

49 36 # byacc -l -P -d -b SimpleCalcParser SimpleCalcParser.yy

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

50 37 # mv SimpleCalcParser.tab.pl SimpleCalcParser.pm

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

51 38 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

52 39

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

53 40 use Carp;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

54 41

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

55 42 # Setup a hash map for mapping of words/letters to values...

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

56 43 %LetterToValueMap = ();

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

57 44

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

58 45 $NUMBER=257;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

59 46 $LETTER=258;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

60 47 $YYERRCODE=256;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

61 48 @yylhs = ( -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

62 49 0, 0, 0, 1, 1, 2, 2, 2, 2, 2,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

63 50 2, 2, 2,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

64 51 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

65 52 @yylen = ( 2,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

66 53 0, 3, 3, 1, 3, 3, 3, 3, 3, 3,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

67 54 3, 1, 1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

68 55 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

69 56 @yydefred = ( 1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

70 57 0, 0, 12, 0, 0, 0, 0, 3, 0, 13,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

71 58 0, 2, 0, 0, 0, 0, 0, 0, 6, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

72 59 0, 0, 0, 11,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

73 60 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

74 61 @yydgoto = ( 1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

75 62 6, 7,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

76 63 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

77 64 @yysindex = ( 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

78 65 -40, -7, 0, -57, -38, -5, -18, 0, -38, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

79 66 -31, 0, -38, -38, -38, -38, -38, -18, 0, -16,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

80 67 -16, -30, -30, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

81 68 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

82 69 @yyrindex = ( 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

83 70 0, 0, 0, -9, 0, 0, -1, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

84 71 0, 0, 0, 0, 0, 0, 0, 3, 0, 8,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

85 72 13, -2, 5, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

86 73 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

87 74 @yygindex = ( 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

88 75 0, 50,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

89 76 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

90 77 $YYTABLESIZE=220;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

91 78 @yytable = ( 5,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

92 79 13, 5, 8, 9, 12, 17, 17, 9, 4, 19,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

93 80 15, 13, 5, 14, 10, 16, 0, 7, 17, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

94 81 17, 0, 8, 15, 13, 15, 14, 13, 16, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

95 82 16, 0, 13, 13, 0, 13, 0, 13, 9, 9,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

96 83 9, 0, 9, 0, 9, 10, 10, 10, 7, 10,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

97 84 7, 10, 7, 8, 11, 8, 0, 8, 18, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

98 85 0, 0, 20, 21, 22, 23, 24, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

99 86 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

100 87 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

101 88 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

102 89 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

103 90 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

104 91 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

105 92 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

106 93 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

107 94 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

108 95 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

109 96 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

110 97 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

111 98 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

112 99 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

113 100 0, 0, 0, 0, 0, 2, 3, 4, 3, 10,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

114 101 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

115 102 @yycheck = ( 40,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

116 103 10, 40, 10, 61, 10, 37, 37, 10, 10, 41,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

117 104 42, 43, 10, 45, 10, 47, -1, 10, 37, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

118 105 37, -1, 10, 42, 43, 42, 45, 37, 47, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

119 106 47, -1, 42, 43, -1, 45, -1, 47, 41, 42,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

120 107 43, -1, 45, -1, 47, 41, 42, 43, 41, 45,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

121 108 43, 47, 45, 41, 5, 43, -1, 45, 9, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

122 109 -1, -1, 13, 14, 15, 16, 17, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

123 110 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

124 111 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

125 112 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

126 113 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

127 114 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

128 115 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

129 116 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

130 117 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

131 118 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

132 119 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

133 120 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

134 121 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

135 122 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

136 123 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

137 124 -1, -1, -1, -1, -1, 256, 257, 258, 257, 258,

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

138 125 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

139 126 $YYFINAL=1;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

140 127 #ifndef YYDEBUG

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

141 128 #define YYDEBUG 0

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

142 129 #endif

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

143 130 $YYMAXTOKEN=258;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

144 131 #if YYDEBUG

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

145 132 @yyname = (

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

146 133 "end-of-file",'','','','','','','','','',"'\\n'",'','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

147 134 '','','','','','',"'%'",'','',"'('","')'","'*'","'+'",'',"'-'",'',"'/'",'','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

148 135 '','','','',"'='",'','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

149 136 '','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

150 137 '','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

151 138 '','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

152 139 '','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','','',

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

153 140 '','',"NUMBER","LETTER",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

154 141 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

155 142 @yyrule = (

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

156 143 "\$accept : list",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

157 144 "list :",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

158 145 "list : list stat '\\n'",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

159 146 "list : list error '\\n'",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

160 147 "stat : expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

161 148 "stat : LETTER '=' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

162 149 "expr : '(' expr ')'",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

163 150 "expr : expr '+' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

164 151 "expr : expr '-' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

165 152 "expr : expr '*' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

166 153 "expr : expr '/' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

167 154 "expr : expr '%' expr",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

168 155 "expr : NUMBER",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

169 156 "expr : LETTER",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

170 157 );

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

171 158 #endif

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

172 159

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

173 <a name="yyclearin-"></a> 160 sub yyclearin { $_[0]->{'yychar'} = -1; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

174 161

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

175 <a name="yyerrok-"></a> 162 sub yyerrok { $_[0]->{'yyerrflag'} = 0; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

176 163

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

177 <a name="new-"></a> 164 sub new {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

178 165 my $p = {'yylex' => $_[1], 'yyerror' => $_[2], 'yydebug' => $_[3]};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

179 166 bless $p, $_[0];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

180 167 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

181 168

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

182 <a name="YYERROR-"></a> 169 sub YYERROR { ++$_[0]->{'yynerrs'}; $_[0]->yy_err_recover; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

183 170

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

184 <a name="yy_err_recover-"></a> 171 sub yy_err_recover {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

185 172 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

186 173 # msud@san.rr.com:

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

187 174 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

188 175 # Turn off "exiting" warning to suppress the following warning at "next yyloop":

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

189 176 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

190 177 # Exiting subroutine via next at <LineNum>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

191 178 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

192 179 # The code does work as expected with or without turning off the warning.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

193 180 # This method is invoked in yyparse method directly or indirectly in another

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

194 181 # method and Perl compilers ends up finding "yyloop" as the nearst enclosure

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

195 182 # label.

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

196 183 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

197 184 no warnings qw(exiting);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

198 185

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

199 186 my ($p) = @_;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

200 187 if ($p->{'yyerrflag'} < 3)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

201 188 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

202 189 $p->{'yyerrflag'} = 3;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

203 190 while (1)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

204 191 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

205 192 if (($p->{'yyn'} = $yysindex[$p->{'yyss'}->[$p->{'yyssp'}]]) &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

206 193 ($p->{'yyn'} += $YYERRCODE) >= 0 &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

207 194 $p->{'yyn'} < @yycheck &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

208 195 $yycheck[$p->{'yyn'}] == $YYERRCODE)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

209 196 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

210 197 warn("yydebug: state " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

211 198 $p->{'yyss'}->[$p->{'yyssp'}] .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

212 199 ", error recovery shifting to state" .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

213 200 $yytable[$p->{'yyn'}] . "\n")

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

214 201 if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

215 202 $p->{'yyss'}->[++$p->{'yyssp'}] =

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

216 203 $p->{'yystate'} = $yytable[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

217 204 $p->{'yyvs'}->[++$p->{'yyvsp'}] = $p->{'yylval'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

218 205 next yyloop;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

219 206 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

220 207 else

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

221 208 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

222 209 warn("yydebug: error recovery discarding state ".

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

223 210 $p->{'yyss'}->[$p->{'yyssp'}]. "\n")

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

224 211 if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

225 212 return(undef) if $p->{'yyssp'} <= 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

226 213 --$p->{'yyssp'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

227 214 --$p->{'yyvsp'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

228 215 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

229 216 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

230 217 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

231 218 else

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

232 219 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

233 220 return (undef) if $p->{'yychar'} == 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

234 221 if ($p->{'yydebug'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

235 222 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

236 223 $p->{'yys'} = '';

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

237 224 if ($p->{'yychar'} <= $YYMAXTOKEN) { $p->{'yys'} =

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

238 225 $yyname[$p->{'yychar'}]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

239 226 if (!$p->{'yys'}) { $p->{'yys'} = 'illegal-symbol'; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

240 227 warn("yydebug: state " . $p->{'yystate'} .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

241 228 ", error recovery discards " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

242 229 "token " . $p->{'yychar'} . "(" .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

243 230 $p->{'yys'} . ")\n");

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

244 231 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

245 232 $p->{'yychar'} = -1;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

246 233 next yyloop;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

247 234 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

248 235 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

249 236 } # yy_err_recover

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

250 237

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

251 <a name="yyparse-"></a> 238 sub yyparse {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

252 239 my ($p, $s) = @_;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

253 240 if ($p->{'yys'} = $ENV{'YYDEBUG'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

254 241 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

255 242 $p->{'yydebug'} = int($1) if $p->{'yys'} =~ /^(\d)/;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

256 243 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

257 244

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

258 245 $p->{'yynerrs'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

259 246 $p->{'yyerrflag'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

260 247 $p->{'yychar'} = (-1);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

261 248

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

262 249 $p->{'yyssp'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

263 250 $p->{'yyvsp'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

264 251 $p->{'yyss'}->[$p->{'yyssp'}] = $p->{'yystate'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

265 252

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

266 253 yyloop: while(1)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

267 254 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

268 255 yyreduce: {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

269 256 last yyreduce if ($p->{'yyn'} = $yydefred[$p->{'yystate'}]);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

270 257 if ($p->{'yychar'} < 0)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

271 258 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

272 259 if ((($p->{'yychar'}, $p->{'yylval'}) =

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

273 260 &{$p->{'yylex'}}($s)) < 0) { $p->{'yychar'} = 0; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

274 261 if ($p->{'yydebug'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

275 262 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

276 263 $p->{'yys'} = '';

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

277 264 if ($p->{'yychar'} <= $#yyname)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

278 265 { $p->{'yys'} = $yyname[$p->{'yychar'}]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

279 266 if (!$p->{'yys'}) { $p->{'yys'} = 'illegal-symbol'; };

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

280 267 warn("yydebug: state " . $p->{'yystate'} .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

281 268 ", reading " . $p->{'yychar'} . " (" .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

282 269 $p->{'yys'} . ")\n");

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

283 270 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

284 271 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

285 272 if (($p->{'yyn'} = $yysindex[$p->{'yystate'}]) &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

286 273 ($p->{'yyn'} += $p->{'yychar'}) >= 0 &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

287 274 $yycheck[$p->{'yyn'}] == $p->{'yychar'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

288 275 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

289 276 warn("yydebug: state " . $p->{'yystate'} .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

290 277 ", shifting to state " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

291 278 $yytable[$p->{'yyn'}] . "\n") if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

292 279 $p->{'yyss'}->[++$p->{'yyssp'}] = $p->{'yystate'} =

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

293 280 $yytable[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

294 281 $p->{'yyvs'}->[++$p->{'yyvsp'}] = $p->{'yylval'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

295 282 $p->{'yychar'} = (-1);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

296 283 --$p->{'yyerrflag'} if $p->{'yyerrflag'} > 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

297 284 next yyloop;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

298 285 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

299 286 if (($p->{'yyn'} = $yyrindex[$p->{'yystate'}]) &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

300 287 ($p->{'yyn'} += $p->{'yychar'}) >= 0 &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

301 288 $yycheck[$p->{'yyn'}] == $p->{'yychar'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

302 289 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

303 290 $p->{'yyn'} = $yytable[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

304 291 last yyreduce;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

305 292 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

306 293 if (! $p->{'yyerrflag'}) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

307 294 if ( (defined($EOI) && $p->{'yychar'} == $EOI) || ($p->{'yychar'} == 0) ) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

308 295 &{$p->{'yyerror'}}("syntax error at or near the end of input text", $s);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

309 296 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

310 297 else {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

311 298 &{$p->{'yyerror'}}("syntax error at or near input text: '$p->{'yylval'}'", $s);

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

312 299 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

313 300 ++$p->{'yynerrs'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

314 301 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

315 302 return(undef) if $p->yy_err_recover;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

316 303 } # yyreduce

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

317 304 warn("yydebug: state " . $p->{'yystate'} .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

318 305 ", reducing by rule " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

319 306 $p->{'yyn'} . " (" . $yyrule[$p->{'yyn'}] .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

320 307 ")\n") if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

321 308 $p->{'yym'} = $yylen[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

322 309 $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}+1-$p->{'yym'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

323 310

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

324 311 if ($p->{'yyn'} == 2) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

325 312 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-1]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

326 313 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

327 314

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

328 315 if ($p->{'yyn'} == 3) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

329 316 { $p->yyerrok; $p->yyclearin; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

330 317 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

331 318

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

332 319 if ($p->{'yyn'} == 4) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

333 320 { $ExprOut = sprintf "%5i", $p->{'yyvs'}->[$p->{'yyvsp'}-0]; print "$ExprOut\n"; $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

334 321 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

335 322

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

336 323 if ($p->{'yyn'} == 5) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

337 324 { $LetterToValueMap{$p->{'yyvs'}->[$p->{'yyvsp'}-2]} = $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

338 325 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

339 326

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

340 327 if ($p->{'yyn'} == 6) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

341 328 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-1]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

342 329 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

343 330

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

344 331 if ($p->{'yyn'} == 7) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

345 332 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-2] + $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

346 333 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

347 334

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

348 335 if ($p->{'yyn'} == 8) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

349 336 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-2] - $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

350 337 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

351 338

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

352 339 if ($p->{'yyn'} == 9) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

353 340 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-2] * $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

354 341 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

355 342

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

356 343 if ($p->{'yyn'} == 10) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

357 344 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-2] / $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

358 345 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

359 346

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

360 347 if ($p->{'yyn'} == 11) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

361 348 { $p->{'yyval'} = $p->{'yyvs'}->[$p->{'yyvsp'}-2] % $p->{'yyvs'}->[$p->{'yyvsp'}-0]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

362 349 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

363 350

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

364 351 if ($p->{'yyn'} == 13) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

365 352 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

366 353 if (exists $LetterToValueMap{$p->{'yyvs'}->[$p->{'yyvsp'}-0]}) {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

367 354 $p->{'yyval'} = $LetterToValueMap{$p->{'yyvs'}->[$p->{'yyvsp'}-0]};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

368 355 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

369 356 else {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

370 357 $Letter = $p->{'yyvs'}->[$p->{'yyvsp'}-0];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

371 358 print "Undefined variable $Letter encountered by SimpleCalcParser; Value set to 0\n";

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

372 359 $p->{'yyval'} = 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

373 360 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

374 361 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

375 362 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

376 363 $p->{'yyssp'} -= $p->{'yym'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

377 364 $p->{'yystate'} = $p->{'yyss'}->[$p->{'yyssp'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

378 365 $p->{'yyvsp'} -= $p->{'yym'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

379 366 $p->{'yym'} = $yylhs[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

380 367 if ($p->{'yystate'} == 0 && $p->{'yym'} == 0)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

381 368 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

382 369 warn("yydebug: after reduction, shifting from state 0 ",

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

383 370 "to state $YYFINAL\n") if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

384 371 $p->{'yystate'} = $YYFINAL;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

385 372 $p->{'yyss'}->[++$p->{'yyssp'}] = $YYFINAL;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

386 373 $p->{'yyvs'}->[++$p->{'yyvsp'}] = $p->{'yyval'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

387 374 if ($p->{'yychar'} < 0)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

388 375 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

389 376 if ((($p->{'yychar'}, $p->{'yylval'}) =

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

390 377 &{$p->{'yylex'}}($s)) < 0) { $p->{'yychar'} = 0; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

391 378 if ($p->{'yydebug'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

392 379 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

393 380 $p->{'yys'} = '';

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

394 381 if ($p->{'yychar'} <= $#yyname)

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

395 382 { $p->{'yys'} = $yyname[$p->{'yychar'}]; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

396 383 if (!$p->{'yys'}) { $p->{'yys'} = 'illegal-symbol'; }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

397 384 warn("yydebug: state $YYFINAL, reading " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

398 385 $p->{'yychar'} . " (" . $p->{'yys'} . ")\n");

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

399 386 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

400 387 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

401 388 return ($p->{'yyvs'}->[1]) if $p->{'yychar'} == 0;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

402 389 next yyloop;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

403 390 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

404 391 if (($p->{'yyn'} = $yygindex[$p->{'yym'}]) &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

405 392 ($p->{'yyn'} += $p->{'yystate'}) >= 0 &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

406 393 $p->{'yyn'} <= $#yycheck &&

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

407 394 $yycheck[$p->{'yyn'}] == $p->{'yystate'})

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

408 395 {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

409 396 $p->{'yystate'} = $yytable[$p->{'yyn'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

410 397 } else {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

411 398 $p->{'yystate'} = $yydgoto[$p->{'yym'}];

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

412 399 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

413 400 warn("yydebug: after reduction, shifting from state " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

414 401 $p->{'yyss'}->[$p->{'yyssp'}] . " to state " .

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

415 402 $p->{'yystate'} . "\n") if $p->{'yydebug'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

416 403 $p->{'yyss'}[++$p->{'yyssp'}] = $p->{'yystate'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

417 404 $p->{'yyvs'}[++$p->{'yyvsp'}] = $p->{'yyval'};

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

418 405 } # yyloop

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

419 406 } # yyparse

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

420 407

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

421 408

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

422 409 # yyerror function supplied to parser along with a lexer during initialization of

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

423 410 # the parser...

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

424 411 #

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

425 412

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

426 <a name="yyerror-1-"></a> 413 sub yyerror {

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

427 414 my ($msg) = @_;

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

428 415 print "yyerror: $msg...\n";

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

429 416 }

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

430 417

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

431 <a name="EOF-"></a></pre>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

432

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

433

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

434 <center>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

435 <img src="../../../images/h2o2.png">

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

436 </center>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

437 </body>

73ae111cf86f Uploaded

deepakjadmin

parents:

diff changeset

438 </html>

Mercurial > repos > deepakjadmin > mayatool3_test3

annotate mayachemtools/docs/modules/html/code/SimpleCalcParser.html @ 0:73ae111cf86f draft