Ignore:
Timestamp:
Nov 9, 2010, 11:19:28 AM (14 years ago)
Author:
george
Message:
  • Added: Support for multiple combined sections var, type, const and functions.
  • Modified: Functions for parsing types redone to return Boolean result of success.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/IDE/Transpascal.lpi

    r18 r19  
    5353      </Item5>
    5454    </RequiredPackages>
    55     <Units Count="62">
     55    <Units Count="63">
    5656      <Unit0>
    5757        <Filename Value="Transpascal.lpr"/>
    5858        <IsPartOfProject Value="True"/>
    5959        <UnitName Value="Transpascal"/>
    60         <EditorIndex Value="14"/>
    6160        <WindowIndex Value="0"/>
    6261        <TopLine Value="1"/>
    6362        <CursorPos X="17" Y="3"/>
    6463        <UsageCount Value="215"/>
    65         <Loaded Value="True"/>
    6664        <DefaultSyntaxHighlighter Value="Delphi"/>
    6765      </Unit0>
    … …  
    184182        <IsPartOfProject Value="True"/>
    185183        <UnitName Value="UProject"/>
    186         <EditorIndex Value="2"/>
    187         <WindowIndex Value="0"/>
    188         <TopLine Value="255"/>
     184        <EditorIndex Value="1"/>
     185        <WindowIndex Value="0"/>
     186        <TopLine Value="262"/>
    189187        <CursorPos X="1" Y="269"/>
    190188        <UsageCount Value="223"/>
    … …  
    259257        <ResourceBaseClass Value="Form"/>
    260258        <UnitName Value="UCompiledForm"/>
    261         <EditorIndex Value="10"/>
    262259        <WindowIndex Value="0"/>
    263260        <TopLine Value="2"/>
    264261        <CursorPos X="14" Y="3"/>
    265262        <UsageCount Value="206"/>
    266         <Loaded Value="True"/>
    267263        <DefaultSyntaxHighlighter Value="Delphi"/>
    268264      </Unit21>
    … …  
    273269        <ResourceBaseClass Value="Form"/>
    274270        <UnitName Value="UCodeTreeForm"/>
    275         <EditorIndex Value="9"/>
    276271        <WindowIndex Value="0"/>
    277272        <TopLine Value="1"/>
    278273        <CursorPos X="14" Y="3"/>
    279274        <UsageCount Value="206"/>
    280         <Loaded Value="True"/>
    281275        <DefaultSyntaxHighlighter Value="Delphi"/>
    282276      </Unit22>
    … …  
    451445        <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/>
    452446        <WindowIndex Value="0"/>
    453         <TopLine Value="1"/>
    454         <CursorPos X="60" Y="13"/>
    455         <UsageCount Value="74"/>
     447        <TopLine Value="71"/>
     448        <CursorPos X="1" Y="84"/>
     449        <UsageCount Value="77"/>
    456450      </Unit43>
    457451      <Unit44>
    … …  
    473467        <Filename Value="..\Compiler\UCompiler.pas"/>
    474468        <UnitName Value="UCompiler"/>
    475         <EditorIndex Value="3"/>
     469        <EditorIndex Value="2"/>
    476470        <WindowIndex Value="0"/>
    477471        <TopLine Value="63"/>
    478472        <CursorPos X="19" Y="79"/>
    479         <UsageCount Value="31"/>
     473        <UsageCount Value="34"/>
    480474        <Loaded Value="True"/>
    481475      </Unit46>
    … …  
    483477        <Filename Value="..\Compiler\Produce\UProducer.pas"/>
    484478        <UnitName Value="UProducer"/>
    485         <EditorIndex Value="13"/>
    486         <WindowIndex Value="0"/>
    487         <TopLine Value="10"/>
    488         <CursorPos X="15" Y="23"/>
    489         <UsageCount Value="30"/>
    490         <Loaded Value="True"/>
     479        <WindowIndex Value="0"/>
     480        <TopLine Value="58"/>
     481        <CursorPos X="1" Y="79"/>
     482        <UsageCount Value="32"/>
    491483      </Unit47>
    492484      <Unit48>
    493485        <Filename Value="..\Compiler\Analyze\UAnalyzer.pas"/>
    494486        <UnitName Value="UAnalyzer"/>
    495         <EditorIndex Value="4"/>
     487        <EditorIndex Value="3"/>
    496488        <WindowIndex Value="0"/>
    497489        <TopLine Value="22"/>
    498490        <CursorPos X="14" Y="77"/>
    499         <UsageCount Value="30"/>
     491        <UsageCount Value="33"/>
    500492        <Loaded Value="True"/>
    501493      </Unit48>
    … …  
    504496        <UnitName Value="UAnalyzerPascal"/>
    505497        <IsVisibleTab Value="True"/>
    506         <EditorIndex Value="12"/>
    507         <WindowIndex Value="0"/>
    508         <TopLine Value="1194"/>
    509         <CursorPos X="44" Y="1207"/>
    510         <UsageCount Value="30"/>
     498        <EditorIndex Value="6"/>
     499        <WindowIndex Value="0"/>
     500        <TopLine Value="517"/>
     501        <CursorPos X="1" Y="530"/>
     502        <UsageCount Value="33"/>
    511503        <Loaded Value="True"/>
    512504      </Unit49>
    … …  
    514506        <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    515507        <UnitName Value="UProducerPascal"/>
    516         <EditorIndex Value="5"/>
    517         <WindowIndex Value="0"/>
    518         <TopLine Value="126"/>
    519         <CursorPos X="25" Y="140"/>
    520         <UsageCount Value="30"/>
     508        <EditorIndex Value="4"/>
     509        <WindowIndex Value="0"/>
     510        <TopLine Value="267"/>
     511        <CursorPos X="14" Y="270"/>
     512        <UsageCount Value="33"/>
    521513        <Loaded Value="True"/>
    522514      </Unit50>
    … …  
    524516        <Filename Value="..\Compiler\Produce\UProducerDynamicC.pas"/>
    525517        <UnitName Value="UProducerDynamicC"/>
    526         <EditorIndex Value="8"/>
    527518        <WindowIndex Value="0"/>
    528519        <TopLine Value="10"/>
    529520        <CursorPos X="40" Y="23"/>
    530         <UsageCount Value="29"/>
    531         <Loaded Value="True"/>
     521        <UsageCount Value="31"/>
    532522      </Unit51>
    533523      <Unit52>
    … …  
    542532        <Filename Value="..\Compiler\Produce\UProducerGCCC.pas"/>
    543533        <UnitName Value="UProducerGCCC"/>
    544         <EditorIndex Value="7"/>
    545534        <WindowIndex Value="0"/>
    546535        <TopLine Value="16"/>
    547536        <CursorPos X="33" Y="26"/>
    548         <UsageCount Value="10"/>
    549         <Loaded Value="True"/>
     537        <UsageCount Value="13"/>
    550538      </Unit53>
    551539      <Unit54>
    552540        <Filename Value="..\Compiler\USourceCode.pas"/>
    553541        <UnitName Value="USourceCode"/>
    554         <EditorIndex Value="11"/>
    555         <WindowIndex Value="0"/>
    556         <TopLine Value="208"/>
    557         <CursorPos X="3" Y="221"/>
    558         <UsageCount Value="30"/>
     542        <EditorIndex Value="5"/>
     543        <WindowIndex Value="0"/>
     544        <TopLine Value="707"/>
     545        <CursorPos X="3" Y="711"/>
     546        <UsageCount Value="33"/>
    559547        <Loaded Value="True"/>
    560548      </Unit54>
    … …  
    578566        <Filename Value="..\Compiler\Analyze\UAnalyzers.pas"/>
    579567        <UnitName Value="UAnalyzers"/>
    580         <EditorIndex Value="15"/>
    581568        <WindowIndex Value="0"/>
    582569        <TopLine Value="1"/>
    583570        <CursorPos X="37" Y="12"/>
    584         <UsageCount Value="30"/>
    585         <Loaded Value="True"/>
     571        <UsageCount Value="32"/>
    586572      </Unit57>
    587573      <Unit58>
    588574        <Filename Value="..\Compiler\Produce\UProducers.pas"/>
    589575        <UnitName Value="UProducers"/>
    590         <EditorIndex Value="16"/>
    591576        <WindowIndex Value="0"/>
    592577        <TopLine Value="12"/>
    593         <CursorPos X="55" Y="26"/>
    594         <UsageCount Value="30"/>
    595         <Loaded Value="True"/>
     578        <CursorPos X="38" Y="26"/>
     579        <UsageCount Value="32"/>
    596580      </Unit58>
    597581      <Unit59>
    … …  
    605589      <Unit60>
    606590        <Filename Value="E:\Programy\Lazarus\lcl\include\fileutil.inc"/>
    607         <EditorIndex Value="1"/>
    608591        <WindowIndex Value="0"/>
    609592        <TopLine Value="628"/>
    610593        <CursorPos X="1" Y="649"/>
    611         <UsageCount Value="29"/>
    612         <Loaded Value="True"/>
     594        <UsageCount Value="32"/>
    613595      </Unit60>
    614596      <Unit61>
    615597        <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericObjectList.inc"/>
    616         <EditorIndex Value="6"/>
    617598        <WindowIndex Value="0"/>
    618599        <TopLine Value="1"/>
    619600        <CursorPos X="24" Y="4"/>
    620         <UsageCount Value="10"/>
    621         <Loaded Value="True"/>
     601        <UsageCount Value="13"/>
    622602      </Unit61>
     603      <Unit62>
     604        <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedObjectList.pas"/>
     605        <UnitName Value="SpecializedObjectList"/>
     606        <WindowIndex Value="0"/>
     607        <TopLine Value="1"/>
     608        <CursorPos X="1" Y="1"/>
     609        <UsageCount Value="12"/>
     610      </Unit62>
    623611    </Units>
    624612    <JumpHistory Count="30" HistoryIndex="29">
    625613      <Position1>
    626         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    627         <Caret Line="176" Column="41" TopLine="158"/>
     614        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     615        <Caret Line="1072" Column="1" TopLine="1053"/>
    628616      </Position1>
    629617      <Position2>
    630618        <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    631         <Caret Line="69" Column="28" TopLine="59"/>
     619        <Caret Line="438" Column="23" TopLine="416"/>
    632620      </Position2>
    633621      <Position3>
    634         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    635         <Caret Line="73" Column="61" TopLine="59"/>
     622        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     623        <Caret Line="41" Column="65" TopLine="27"/>
    636624      </Position3>
    637625      <Position4>
    638626        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    639         <Caret Line="29" Column="27" TopLine="15"/>
     627        <Caret Line="3" Column="61" TopLine="1"/>
    640628      </Position4>
    641629      <Position5>
    642         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    643         <Caret Line="143" Column="17" TopLine="123"/>
     630        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     631        <Caret Line="40" Column="31" TopLine="27"/>
    644632      </Position5>
    645633      <Position6>
    646         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    647         <Caret Line="128" Column="26" TopLine="120"/>
     634        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     635        <Caret Line="626" Column="39" TopLine="623"/>
    648636      </Position6>
    649637      <Position7>
    650         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    651         <Caret Line="130" Column="14" TopLine="120"/>
     638        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     639        <Caret Line="576" Column="27" TopLine="563"/>
    652640      </Position7>
    653641      <Position8>
    654         <Filename Value="..\Compiler\USourceCode.pas"/>
    655         <Caret Line="173" Column="21" TopLine="160"/>
     642        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     643        <Caret Line="1191" Column="19" TopLine="1178"/>
    656644      </Position8>
    657645      <Position9>
    658         <Filename Value="..\Compiler\USourceCode.pas"/>
    659         <Caret Line="26" Column="15" TopLine="13"/>
     646        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     647        <Caret Line="714" Column="34" TopLine="695"/>
    660648      </Position9>
    661649      <Position10>
    662         <Filename Value="..\Compiler\USourceCode.pas"/>
    663         <Caret Line="301" Column="66" TopLine="286"/>
     650        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     651        <Caret Line="531" Column="42" TopLine="512"/>
    664652      </Position10>
    665653      <Position11>
    666         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    667         <Caret Line="130" Column="25" TopLine="118"/>
     654        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     655        <Caret Line="530" Column="44" TopLine="520"/>
    668656      </Position11>
    669657      <Position12>
    670658        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    671         <Caret Line="1227" Column="4" TopLine="1221"/>
     659        <Caret Line="533" Column="11" TopLine="520"/>
    672660      </Position12>
    673661      <Position13>
    674662        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    675         <Caret Line="1225" Column="1" TopLine="1220"/>
     663        <Caret Line="531" Column="26" TopLine="514"/>
    676664      </Position13>
    677665      <Position14>
    678666        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    679         <Caret Line="1226" Column="1" TopLine="1220"/>
     667        <Caret Line="532" Column="17" TopLine="514"/>
    680668      </Position14>
    681669      <Position15>
    682670        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    683         <Caret Line="1232" Column="1" TopLine="1220"/>
     671        <Caret Line="530" Column="1" TopLine="514"/>
    684672      </Position15>
    685673      <Position16>
    686674        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    687         <Caret Line="1233" Column="1" TopLine="1220"/>
     675        <Caret Line="531" Column="1" TopLine="514"/>
    688676      </Position16>
    689677      <Position17>
    690         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    691         <Caret Line="137" Column="13" TopLine="126"/>
     678        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     679        <Caret Line="534" Column="1" TopLine="514"/>
    692680      </Position17>
    693681      <Position18>
    694         <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>
    695         <Caret Line="143" Column="19" TopLine="126"/>
     682        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     683        <Caret Line="531" Column="1" TopLine="514"/>
    696684      </Position18>
    697685      <Position19>
    698686        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    699         <Caret Line="1197" Column="28" TopLine="1178"/>
     687        <Caret Line="534" Column="1" TopLine="514"/>
    700688      </Position19>
    701689      <Position20>
    702690        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    703         <Caret Line="1196" Column="1" TopLine="1178"/>
     691        <Caret Line="537" Column="1" TopLine="522"/>
    704692      </Position20>
    705693      <Position21>
    706694        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    707         <Caret Line="1213" Column="1" TopLine="1191"/>
     695        <Caret Line="546" Column="1" TopLine="525"/>
    708696      </Position21>
    709697      <Position22>
    710698        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    711         <Caret Line="1197" Column="1" TopLine="1191"/>
     699        <Caret Line="517" Column="1" TopLine="510"/>
    712700      </Position22>
    713701      <Position23>
    714702        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    715         <Caret Line="1198" Column="1" TopLine="1191"/>
     703        <Caret Line="521" Column="1" TopLine="510"/>
    716704      </Position23>
    717705      <Position24>
    718706        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    719         <Caret Line="1199" Column="1" TopLine="1191"/>
     707        <Caret Line="525" Column="1" TopLine="510"/>
    720708      </Position24>
    721709      <Position25>
    722710        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    723         <Caret Line="1205" Column="1" TopLine="1191"/>
     711        <Caret Line="530" Column="1" TopLine="510"/>
    724712      </Position25>
    725713      <Position26>
    726714        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    727         <Caret Line="1206" Column="1" TopLine="1191"/>
     715        <Caret Line="531" Column="1" TopLine="510"/>
    728716      </Position26>
    729717      <Position27>
    730718        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    731         <Caret Line="1207" Column="1" TopLine="1191"/>
     719        <Caret Line="534" Column="1" TopLine="519"/>
    732720      </Position27>
    733721      <Position28>
    734722        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    735         <Caret Line="1193" Column="21" TopLine="1188"/>
     723        <Caret Line="537" Column="1" TopLine="519"/>
    736724      </Position28>
    737725      <Position29>
    738726        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    739         <Caret Line="1207" Column="34" TopLine="1188"/>
     727        <Caret Line="546" Column="1" TopLine="536"/>
    740728      </Position29>
    741729      <Position30>
    742730        <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
    743         <Caret Line="1206" Column="28" TopLine="1187"/>
     731        <Caret Line="550" Column="47" TopLine="540"/>
    744732      </Position30>
    745733    </JumpHistory>
    … …  
    784772  </CompilerOptions>
    785773  <Debugging>
    786     <BreakPoints Count="1">
     774    <BreakPoints Count="3">
    787775      <Item1>
    788         <Source Value="..\Compiler\Produce\UProducerPascal.pas"/>
    789         <Line Value="143"/>
     776        <Source Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     777        <Line Value="1205"/>
    790778      </Item1>
     779      <Item2>
     780        <Source Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     781        <Line Value="1230"/>
     782      </Item2>
     783      <Item3>
     784        <Source Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>
     785        <Line Value="1040"/>
     786      </Item3>
    791787    </BreakPoints>
    792788    <Exceptions Count="3">
Note: See TracChangeset for help on using the changeset viewer.