Ignore:
Timestamp:
Aug 9, 2010, 10:22:30 AM (14 years ago)
Author:
george
Message:

Reworked tokenizer code with state machine instead of direct sequence analyze.
Parser classes with class methods rewrited back to single class TPaascalParser which inherit from TBasePascal.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/DelphiToC/DelphiToC.lpi

    r43 r44  
    4040        <Filename Value="DelphiToC.lpr"/>
    4141        <IsPartOfProject Value="True"/>
    42         <IsVisibleTab Value="True"/>
    4342        <EditorIndex Value="11"/>
    4443        <WindowIndex Value="0"/>
    4544        <TopLine Value="4"/>
    46         <CursorPos X="27" Y="16"/>
    47         <UsageCount Value="66"/>
     45        <CursorPos X="1" Y="27"/>
     46        <UsageCount Value="103"/>
    4847        <Loaded Value="True"/>
    4948      </Unit0>
    … …  
    5756        <EditorIndex Value="7"/>
    5857        <WindowIndex Value="0"/>
    59         <TopLine Value="69"/>
    60         <CursorPos X="1" Y="91"/>
    61         <UsageCount Value="66"/>
     58        <TopLine Value="34"/>
     59        <CursorPos X="40" Y="49"/>
     60        <UsageCount Value="103"/>
    6261        <Loaded Value="True"/>
    6362        <LoadedDesigner Value="True"/>
    … …  
    7069        <TopLine Value="1"/>
    7170        <CursorPos X="1" Y="1"/>
    72         <UsageCount Value="66"/>
     71        <UsageCount Value="103"/>
    7372      </Unit2>
    7473      <Unit3>
    … …  
    7877        <EditorIndex Value="5"/>
    7978        <WindowIndex Value="0"/>
    80         <TopLine Value="15"/>
    81         <CursorPos X="19" Y="34"/>
    82         <UsageCount Value="66"/>
     79        <TopLine Value="294"/>
     80        <CursorPos X="25" Y="296"/>
     81        <UsageCount Value="103"/>
    8382        <Loaded Value="True"/>
    8483      </Unit3>
    … …  
    9089        <WindowIndex Value="0"/>
    9190        <TopLine Value="25"/>
    92         <CursorPos X="21" Y="38"/>
    93         <UsageCount Value="66"/>
     91        <CursorPos X="1" Y="38"/>
     92        <UsageCount Value="103"/>
    9493        <Loaded Value="True"/>
    9594      </Unit4>
    … …  
    102101        <TopLine Value="1"/>
    103102        <CursorPos X="9" Y="12"/>
    104         <UsageCount Value="66"/>
     103        <UsageCount Value="103"/>
    105104        <Loaded Value="True"/>
    106105      </Unit5>
    … …  
    113112        <TopLine Value="1"/>
    114113        <CursorPos X="1" Y="1"/>
    115         <UsageCount Value="66"/>
     114        <UsageCount Value="103"/>
    116115        <Loaded Value="True"/>
    117116      </Unit6>
    … …  
    124123        <TopLine Value="75"/>
    125124        <CursorPos X="63" Y="89"/>
    126         <UsageCount Value="66"/>
     125        <UsageCount Value="103"/>
    127126        <Loaded Value="True"/>
    128127      </Unit7>
    … …  
    131130        <IsPartOfProject Value="True"/>
    132131        <UnitName Value="UPascalParser"/>
     132        <IsVisibleTab Value="True"/>
    133133        <EditorIndex Value="0"/>
    134134        <WindowIndex Value="0"/>
    135         <TopLine Value="136"/>
    136         <CursorPos X="1" Y="149"/>
    137         <UsageCount Value="66"/>
     135        <TopLine Value="540"/>
     136        <CursorPos X="3" Y="544"/>
     137        <UsageCount Value="103"/>
    138138        <Loaded Value="True"/>
    139139      </Unit8>
    … …  
    143143        <TopLine Value="1"/>
    144144        <CursorPos X="1" Y="1"/>
    145         <UsageCount Value="5"/>
     145        <UsageCount Value="2"/>
    146146        <DefaultSyntaxHighlighter Value="LFM"/>
    147147      </Unit9>
    … …  
    153153        <TopLine Value="68"/>
    154154        <CursorPos X="14" Y="90"/>
    155         <UsageCount Value="33"/>
     155        <UsageCount Value="51"/>
    156156        <Loaded Value="True"/>
    157157      </Unit10>
    … …  
    162162        <TopLine Value="1555"/>
    163163        <CursorPos X="1" Y="1"/>
    164         <UsageCount Value="9"/>
     164        <UsageCount Value="6"/>
    165165      </Unit11>
    166166      <Unit12>
    … …  
    170170        <TopLine Value="61"/>
    171171        <CursorPos X="7" Y="68"/>
    172         <UsageCount Value="16"/>
     172        <UsageCount Value="34"/>
    173173        <Loaded Value="True"/>
    174174      </Unit12>
    … …  
    179179        <TopLine Value="139"/>
    180180        <CursorPos X="16" Y="146"/>
    181         <UsageCount Value="16"/>
     181        <UsageCount Value="34"/>
    182182        <Loaded Value="True"/>
    183183      </Unit13>
    … …  
    187187        <TopLine Value="934"/>
    188188        <CursorPos X="10" Y="947"/>
    189         <UsageCount Value="13"/>
     189        <UsageCount Value="10"/>
    190190      </Unit14>
    191191      <Unit15>
    … …  
    194194        <TopLine Value="834"/>
    195195        <CursorPos X="11" Y="847"/>
    196         <UsageCount Value="9"/>
     196        <UsageCount Value="6"/>
    197197      </Unit15>
    198198      <Unit16>
    … …  
    201201        <TopLine Value="153"/>
    202202        <CursorPos X="8" Y="166"/>
    203         <UsageCount Value="12"/>
     203        <UsageCount Value="9"/>
    204204      </Unit16>
    205205      <Unit17>
    … …  
    209209        <EditorIndex Value="2"/>
    210210        <WindowIndex Value="0"/>
    211         <TopLine Value="112"/>
    212         <CursorPos X="1" Y="128"/>
    213         <UsageCount Value="28"/>
     211        <TopLine Value="198"/>
     212        <CursorPos X="1" Y="215"/>
     213        <UsageCount Value="65"/>
    214214        <Loaded Value="True"/>
    215215      </Unit17>
    … …  
    220220        <TopLine Value="2656"/>
    221221        <CursorPos X="3" Y="2669"/>
    222         <UsageCount Value="9"/>
     222        <UsageCount Value="6"/>
    223223      </Unit18>
    224224    </Units>
    225225    <JumpHistory Count="30" HistoryIndex="29">
    226226      <Position1>
    227         <Filename Value="Analyze\UPascalParser.pas"/>
    228         <Caret Line="234" Column="1" TopLine="213"/>
     227        <Filename Value="Visual\USourceTree.pas"/>
     228        <Caret Line="228" Column="1" TopLine="220"/>
    229229      </Position1>
    230230      <Position2>
    231         <Filename Value="Analyze\UPascalParser.pas"/>
    232         <Caret Line="238" Column="1" TopLine="217"/>
     231        <Filename Value="Visual\USourceTree.pas"/>
     232        <Caret Line="211" Column="22" TopLine="198"/>
    233233      </Position2>
    234234      <Position3>
    235         <Filename Value="Analyze\UPascalParser.pas"/>
    236         <Caret Line="242" Column="1" TopLine="221"/>
     235        <Filename Value="Visual\USourceTree.pas"/>
     236        <Caret Line="24" Column="15" TopLine="11"/>
    237237      </Position3>
    238238      <Position4>
    239         <Filename Value="Analyze\UPascalParser.pas"/>
    240         <Caret Line="248" Column="1" TopLine="235"/>
     239        <Filename Value="Visual\USourceTree.pas"/>
     240        <Caret Line="211" Column="16" TopLine="198"/>
    241241      </Position4>
    242242      <Position5>
    243         <Filename Value="Analyze\UPascalParser.pas"/>
    244         <Caret Line="264" Column="1" TopLine="251"/>
     243        <Filename Value="Visual\USourceTree.pas"/>
     244        <Caret Line="228" Column="32" TopLine="215"/>
    245245      </Position5>
    246246      <Position6>
    247         <Filename Value="Analyze\UPascalParser.pas"/>
    248         <Caret Line="266" Column="1" TopLine="251"/>
     247        <Filename Value="Visual\USourceTree.pas"/>
     248        <Caret Line="237" Column="1" TopLine="216"/>
    249249      </Position6>
    250250      <Position7>
    251         <Filename Value="Analyze\UPascalParser.pas"/>
    252         <Caret Line="225" Column="1" TopLine="212"/>
     251        <Filename Value="Visual\USourceTree.pas"/>
     252        <Caret Line="238" Column="1" TopLine="217"/>
    253253      </Position7>
    254254      <Position8>
    255         <Filename Value="Analyze\UPascalParser.pas"/>
    256         <Caret Line="227" Column="1" TopLine="212"/>
     255        <Filename Value="Visual\USourceTree.pas"/>
     256        <Caret Line="239" Column="1" TopLine="218"/>
    257257      </Position8>
    258258      <Position9>
    259         <Filename Value="Analyze\UPascalParser.pas"/>
    260         <Caret Line="229" Column="1" TopLine="212"/>
     259        <Filename Value="Visual\USourceTree.pas"/>
     260        <Caret Line="202" Column="1" TopLine="189"/>
    261261      </Position9>
    262262      <Position10>
    263         <Filename Value="Analyze\UPascalParser.pas"/>
    264         <Caret Line="230" Column="1" TopLine="212"/>
     263        <Filename Value="Visual\USourceTree.pas"/>
     264        <Caret Line="203" Column="1" TopLine="189"/>
    265265      </Position10>
    266266      <Position11>
    267         <Filename Value="Analyze\UPascalParser.pas"/>
    268         <Caret Line="234" Column="1" TopLine="213"/>
     267        <Filename Value="Visual\USourceTree.pas"/>
     268        <Caret Line="205" Column="1" TopLine="189"/>
    269269      </Position11>
    270270      <Position12>
    271         <Filename Value="Analyze\UPascalParser.pas"/>
    272         <Caret Line="238" Column="1" TopLine="217"/>
     271        <Filename Value="Visual\USourceTree.pas"/>
     272        <Caret Line="209" Column="1" TopLine="195"/>
    273273      </Position12>
    274274      <Position13>
    275         <Filename Value="Analyze\UPascalParser.pas"/>
    276         <Caret Line="242" Column="1" TopLine="221"/>
     275        <Filename Value="Visual\USourceTree.pas"/>
     276        <Caret Line="210" Column="20" TopLine="195"/>
    277277      </Position13>
    278278      <Position14>
    279         <Filename Value="Analyze\UPascalParser.pas"/>
    280         <Caret Line="248" Column="1" TopLine="235"/>
     279        <Filename Value="Visual\USourceTree.pas"/>
     280        <Caret Line="235" Column="1" TopLine="222"/>
    281281      </Position14>
    282282      <Position15>
    283         <Filename Value="Analyze\UPascalParser.pas"/>
    284         <Caret Line="263" Column="18" TopLine="251"/>
     283        <Filename Value="Visual\USourceTree.pas"/>
     284        <Caret Line="236" Column="1" TopLine="222"/>
    285285      </Position15>
    286286      <Position16>
    287         <Filename Value="Analyze\UPascalParser.pas"/>
    288         <Caret Line="149" Column="3" TopLine="147"/>
     287        <Filename Value="Visual\USourceTree.pas"/>
     288        <Caret Line="237" Column="1" TopLine="222"/>
    289289      </Position16>
    290290      <Position17>
    291         <Filename Value="Analyze\UPascalParser.pas"/>
    292         <Caret Line="266" Column="1" TopLine="253"/>
     291        <Filename Value="Visual\USourceTree.pas"/>
     292        <Caret Line="202" Column="1" TopLine="201"/>
    293293      </Position17>
    294294      <Position18>
    295         <Filename Value="Analyze\UPascalParser.pas"/>
    296         <Caret Line="225" Column="1" TopLine="212"/>
     295        <Filename Value="Visual\USourceTree.pas"/>
     296        <Caret Line="203" Column="1" TopLine="198"/>
    297297      </Position18>
    298298      <Position19>
    299         <Filename Value="Analyze\UPascalParser.pas"/>
    300         <Caret Line="227" Column="1" TopLine="212"/>
     299        <Filename Value="Visual\USourceTree.pas"/>
     300        <Caret Line="205" Column="1" TopLine="198"/>
    301301      </Position19>
    302302      <Position20>
    303         <Filename Value="Analyze\UPascalParser.pas"/>
    304         <Caret Line="229" Column="1" TopLine="212"/>
     303        <Filename Value="Visual\USourceTree.pas"/>
     304        <Caret Line="209" Column="1" TopLine="198"/>
    305305      </Position20>
    306306      <Position21>
    307         <Filename Value="Analyze\UPascalParser.pas"/>
    308         <Caret Line="230" Column="1" TopLine="212"/>
     307        <Filename Value="Visual\USourceTree.pas"/>
     308        <Caret Line="210" Column="1" TopLine="198"/>
    309309      </Position21>
    310310      <Position22>
    311         <Filename Value="Analyze\UPascalParser.pas"/>
    312         <Caret Line="234" Column="1" TopLine="213"/>
     311        <Filename Value="Visual\USourceTree.pas"/>
     312        <Caret Line="211" Column="1" TopLine="198"/>
    313313      </Position22>
    314314      <Position23>
    315         <Filename Value="Analyze\UPascalParser.pas"/>
    316         <Caret Line="238" Column="1" TopLine="217"/>
     315        <Filename Value="Visual\USourceTree.pas"/>
     316        <Caret Line="212" Column="1" TopLine="198"/>
    317317      </Position23>
    318318      <Position24>
    319         <Filename Value="Analyze\UPascalParser.pas"/>
    320         <Caret Line="242" Column="1" TopLine="221"/>
     319        <Filename Value="Visual\USourceTree.pas"/>
     320        <Caret Line="213" Column="1" TopLine="198"/>
    321321      </Position24>
    322322      <Position25>
    323         <Filename Value="Analyze\UPascalParser.pas"/>
    324         <Caret Line="248" Column="1" TopLine="235"/>
     323        <Filename Value="Visual\USourceTree.pas"/>
     324        <Caret Line="214" Column="1" TopLine="198"/>
    325325      </Position25>
    326326      <Position26>
    327327        <Filename Value="Analyze\UPascalParser.pas"/>
    328         <Caret Line="149" Column="1" TopLine="136"/>
     328        <Caret Line="625" Column="33" TopLine="610"/>
    329329      </Position26>
    330330      <Position27>
    331331        <Filename Value="Analyze\UPascalParser.pas"/>
    332         <Caret Line="150" Column="1" TopLine="136"/>
     332        <Caret Line="605" Column="16" TopLine="604"/>
    333333      </Position27>
    334334      <Position28>
    335335        <Filename Value="Analyze\UPascalParser.pas"/>
    336         <Caret Line="250" Column="36" TopLine="228"/>
     336        <Caret Line="606" Column="23" TopLine="589"/>
    337337      </Position28>
    338338      <Position29>
    339         <Filename Value="DelphiToC.lpr"/>
    340         <Caret Line="12" Column="39" TopLine="3"/>
     339        <Filename Value="Analyze\UPascalParser.pas"/>
     340        <Caret Line="522" Column="19" TopLine="506"/>
    341341      </Position29>
    342342      <Position30>
    343         <Filename Value="DelphiToC.lpr"/>
    344         <Caret Line="16" Column="38" TopLine="4"/>
     343        <Filename Value="Analyze\UPascalParser.pas"/>
     344        <Caret Line="562" Column="22" TopLine="551"/>
    345345      </Position30>
    346346    </JumpHistory>
    … …  
    383383  </CompilerOptions>
    384384  <Debugging>
    385     <BreakPoints Count="1">
     385    <BreakPoints Count="3">
    386386      <Item1>
     387        <Source Value="Visual\USourceTree.pas"/>
     388        <Line Value="234"/>
     389      </Item1>
     390      <Item2>
     391        <Source Value="Visual\USourceTree.pas"/>
     392        <Line Value="202"/>
     393      </Item2>
     394      <Item3>
    387395        <Source Value="Analyze\UPascalParser.pas"/>
    388         <Line Value="456"/>
    389       </Item1>
     396        <Line Value="543"/>
     397      </Item3>
    390398    </BreakPoints>
    391399    <Exceptions Count="3">
Note: See TracChangeset for help on using the changeset viewer.