Ignore:
Timestamp:
Jan 23, 2011, 7:25:13 PM (14 years ago)
Author:
george
Message:
  • Fixed: Switching micro thread using SP register only was not working. To switch method context BP register have to be switched too.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Microthreading/Demo/Demo.lpi

    r133 r134  
    4242      </Item3>
    4343    </RequiredPackages>
    44     <Units Count="21">
     44    <Units Count="22">
    4545      <Unit0>
    4646        <Filename Value="Demo.lpr"/>
    4747        <IsPartOfProject Value="True"/>
    4848        <UnitName Value="Demo"/>
    49         <UsageCount Value="31"/>
     49        <WindowIndex Value="0"/>
     50        <TopLine Value="1"/>
     51        <CursorPos X="1" Y="15"/>
     52        <UsageCount Value="34"/>
    5053      </Unit0>
    5154      <Unit1>
    … …  
    5861        <EditorIndex Value="0"/>
    5962        <WindowIndex Value="0"/>
    60         <TopLine Value="124"/>
    61         <CursorPos X="5" Y="149"/>
    62         <UsageCount Value="31"/>
     63        <TopLine Value="125"/>
     64        <CursorPos X="7" Y="149"/>
     65        <UsageCount Value="34"/>
    6366        <Loaded Value="True"/>
    6467        <LoadedDesigner Value="True"/>
    … …  
    6770        <Filename Value="../umicrothreading.pas"/>
    6871        <UnitName Value="UMicroThreading"/>
    69         <EditorIndex Value="6"/>
    70         <WindowIndex Value="0"/>
    71         <TopLine Value="202"/>
    72         <CursorPos X="1" Y="225"/>
    73         <UsageCount Value="16"/>
     72        <EditorIndex Value="7"/>
     73        <WindowIndex Value="0"/>
     74        <TopLine Value="146"/>
     75        <CursorPos X="9" Y="155"/>
     76        <UsageCount Value="17"/>
    7477        <Loaded Value="True"/>
    7578      </Unit2>
    … …  
    117120        <Filename Value="../../ExceptionLogger/UStackTrace.pas"/>
    118121        <UnitName Value="UStackTrace"/>
    119         <EditorIndex Value="3"/>
     122        <EditorIndex Value="4"/>
    120123        <WindowIndex Value="0"/>
    121124        <TopLine Value="56"/>
    122125        <CursorPos X="24" Y="77"/>
    123         <UsageCount Value="16"/>
     126        <UsageCount Value="17"/>
    124127        <Loaded Value="True"/>
    125128        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    128131        <Filename Value="../../ExceptionLogger/CustomLineInfo.pas"/>
    129132        <UnitName Value="CustomLineInfo"/>
    130         <EditorIndex Value="5"/>
     133        <EditorIndex Value="6"/>
    131134        <WindowIndex Value="0"/>
    132135        <TopLine Value="264"/>
    133136        <CursorPos X="37" Y="141"/>
    134         <UsageCount Value="16"/>
     137        <UsageCount Value="17"/>
    135138        <Loaded Value="True"/>
    136139        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    153156      <Unit12>
    154157        <Filename Value="/usr/share/fpcsrc/2.4.0/rtl/i386/i386.inc"/>
    155         <EditorIndex Value="4"/>
     158        <EditorIndex Value="5"/>
    156159        <WindowIndex Value="0"/>
    157160        <TopLine Value="1046"/>
    158161        <CursorPos X="34" Y="1053"/>
    159         <UsageCount Value="16"/>
     162        <UsageCount Value="17"/>
    160163        <Loaded Value="True"/>
    161164      </Unit12>
    … …  
    176179      <Unit15>
    177180        <Filename Value="../../../../lazarus/lcl/include/control.inc"/>
     181        <EditorIndex Value="2"/>
    178182        <WindowIndex Value="0"/>
    179183        <TopLine Value="2271"/>
    180         <CursorPos X="30" Y="2293"/>
    181         <UsageCount Value="9"/>
     184        <CursorPos X="4" Y="2274"/>
     185        <UsageCount Value="11"/>
     186        <Loaded Value="True"/>
    182187      </Unit15>
    183188      <Unit16>
    184189        <Filename Value="../Coroutine.pas"/>
    185190        <UnitName Value="Coroutine"/>
    186         <EditorIndex Value="1"/>
    187         <WindowIndex Value="0"/>
    188         <TopLine Value="270"/>
     191        <EditorIndex Value="3"/>
     192        <WindowIndex Value="0"/>
     193        <TopLine Value="290"/>
    189194        <CursorPos X="51" Y="287"/>
    190         <UsageCount Value="16"/>
     195        <UsageCount Value="17"/>
    191196        <Loaded Value="True"/>
    192197      </Unit16>
    … …  
    200205      <Unit18>
    201206        <Filename Value="/usr/share/fpcsrc/2.4.0/rtl/objpas/classes/classesh.inc"/>
    202         <EditorIndex Value="2"/>
    203207        <WindowIndex Value="0"/>
    204208        <TopLine Value="1368"/>
    205209        <CursorPos X="3" Y="1385"/>
    206210        <UsageCount Value="11"/>
    207         <Loaded Value="True"/>
    208211      </Unit18>
    209212      <Unit19>
    … …  
    221224        <UsageCount Value="10"/>
    222225      </Unit20>
     226      <Unit21>
     227        <Filename Value="/usr/share/fpcsrc/2.4.0/rtl/objpas/sysutils/osutilsh.inc"/>
     228        <EditorIndex Value="1"/>
     229        <WindowIndex Value="0"/>
     230        <TopLine Value="8"/>
     231        <CursorPos X="11" Y="25"/>
     232        <UsageCount Value="11"/>
     233        <Loaded Value="True"/>
     234      </Unit21>
    223235    </Units>
    224236    <JumpHistory Count="30" HistoryIndex="29">
    225237      <Position1>
    226238        <Filename Value="../umicrothreading.pas"/>
    227         <Caret Line="178" Column="1" TopLine="161"/>
     239        <Caret Line="250" Column="1" TopLine="222"/>
    228240      </Position1>
    229241      <Position2>
    230         <Filename Value="umainform.pas"/>
    231         <Caret Line="152" Column="3" TopLine="124"/>
     242        <Filename Value="../umicrothreading.pas"/>
     243        <Caret Line="251" Column="1" TopLine="223"/>
    232244      </Position2>
    233245      <Position3>
    234         <Filename Value="umainform.pas"/>
    235         <Caret Line="150" Column="29" TopLine="124"/>
     246        <Filename Value="../umicrothreading.pas"/>
     247        <Caret Line="255" Column="1" TopLine="225"/>
    236248      </Position3>
    237249      <Position4>
    238250        <Filename Value="../umicrothreading.pas"/>
    239         <Caret Line="176" Column="7" TopLine="161"/>
     251        <Caret Line="82" Column="1" TopLine="65"/>
    240252      </Position4>
    241253      <Position5>
    242         <Filename Value="../umicrothreading.pas"/>
    243         <Caret Line="209" Column="1" TopLine="192"/>
     254        <Filename Value="umainform.pas"/>
     255        <Caret Line="150" Column="1" TopLine="125"/>
    244256      </Position5>
    245257      <Position6>
    246         <Filename Value="../umicrothreading.pas"/>
    247         <Caret Line="212" Column="1" TopLine="192"/>
     258        <Filename Value="umainform.pas"/>
     259        <Caret Line="151" Column="1" TopLine="125"/>
    248260      </Position6>
    249261      <Position7>
    250262        <Filename Value="../umicrothreading.pas"/>
    251         <Caret Line="213" Column="1" TopLine="192"/>
     263        <Caret Line="240" Column="1" TopLine="223"/>
    252264      </Position7>
    253265      <Position8>
    254266        <Filename Value="../umicrothreading.pas"/>
    255         <Caret Line="214" Column="1" TopLine="192"/>
     267        <Caret Line="163" Column="37" TopLine="137"/>
    256268      </Position8>
    257269      <Position9>
    258270        <Filename Value="../umicrothreading.pas"/>
    259         <Caret Line="216" Column="1" TopLine="192"/>
     271        <Caret Line="155" Column="9" TopLine="137"/>
    260272      </Position9>
    261273      <Position10>
    262274        <Filename Value="../umicrothreading.pas"/>
    263         <Caret Line="217" Column="1" TopLine="192"/>
     275        <Caret Line="162" Column="52" TopLine="137"/>
    264276      </Position10>
    265277      <Position11>
    266278        <Filename Value="../umicrothreading.pas"/>
    267         <Caret Line="218" Column="1" TopLine="192"/>
     279        <Caret Line="161" Column="29" TopLine="145"/>
    268280      </Position11>
    269281      <Position12>
    270282        <Filename Value="../umicrothreading.pas"/>
    271         <Caret Line="221" Column="1" TopLine="193"/>
     283        <Caret Line="155" Column="14" TopLine="145"/>
    272284      </Position12>
    273285      <Position13>
    274286        <Filename Value="../umicrothreading.pas"/>
    275         <Caret Line="222" Column="1" TopLine="194"/>
     287        <Caret Line="143" Column="20" TopLine="135"/>
    276288      </Position13>
    277289      <Position14>
    278290        <Filename Value="../umicrothreading.pas"/>
    279         <Caret Line="223" Column="1" TopLine="195"/>
     291        <Caret Line="216" Column="50" TopLine="196"/>
    280292      </Position14>
    281293      <Position15>
    282         <Filename Value="umainform.pas"/>
    283         <Caret Line="150" Column="29" TopLine="124"/>
     294        <Filename Value="../umicrothreading.pas"/>
     295        <Caret Line="158" Column="12" TopLine="144"/>
    284296      </Position15>
    285297      <Position16>
    286298        <Filename Value="../umicrothreading.pas"/>
    287         <Caret Line="177" Column="15" TopLine="167"/>
     299        <Caret Line="164" Column="22" TopLine="144"/>
    288300      </Position16>
    289301      <Position17>
    290302        <Filename Value="../umicrothreading.pas"/>
    291         <Caret Line="209" Column="1" TopLine="210"/>
     303        <Caret Line="157" Column="12" TopLine="144"/>
    292304      </Position17>
    293305      <Position18>
    294306        <Filename Value="../umicrothreading.pas"/>
    295         <Caret Line="212" Column="1" TopLine="206"/>
     307        <Caret Line="164" Column="1" TopLine="144"/>
    296308      </Position18>
    297309      <Position19>
    298310        <Filename Value="../umicrothreading.pas"/>
    299         <Caret Line="213" Column="1" TopLine="206"/>
     311        <Caret Line="165" Column="1" TopLine="144"/>
    300312      </Position19>
    301313      <Position20>
    302314        <Filename Value="../umicrothreading.pas"/>
    303         <Caret Line="214" Column="1" TopLine="206"/>
     315        <Caret Line="166" Column="1" TopLine="144"/>
    304316      </Position20>
    305317      <Position21>
    306318        <Filename Value="../umicrothreading.pas"/>
    307         <Caret Line="216" Column="1" TopLine="206"/>
     319        <Caret Line="167" Column="1" TopLine="144"/>
    308320      </Position21>
    309321      <Position22>
    310322        <Filename Value="../umicrothreading.pas"/>
    311         <Caret Line="217" Column="1" TopLine="206"/>
     323        <Caret Line="168" Column="1" TopLine="144"/>
    312324      </Position22>
    313325      <Position23>
    314326        <Filename Value="../umicrothreading.pas"/>
    315         <Caret Line="218" Column="1" TopLine="206"/>
     327        <Caret Line="173" Column="1" TopLine="145"/>
    316328      </Position23>
    317329      <Position24>
    318330        <Filename Value="../umicrothreading.pas"/>
    319         <Caret Line="221" Column="1" TopLine="206"/>
     331        <Caret Line="174" Column="1" TopLine="146"/>
    320332      </Position24>
    321333      <Position25>
    322334        <Filename Value="../umicrothreading.pas"/>
    323         <Caret Line="222" Column="1" TopLine="206"/>
     335        <Caret Line="161" Column="1" TopLine="146"/>
    324336      </Position25>
    325337      <Position26>
    326338        <Filename Value="../umicrothreading.pas"/>
    327         <Caret Line="223" Column="1" TopLine="206"/>
     339        <Caret Line="164" Column="1" TopLine="146"/>
    328340      </Position26>
    329341      <Position27>
    330         <Filename Value="umainform.pas"/>
    331         <Caret Line="152" Column="5" TopLine="124"/>
     342        <Filename Value="../umicrothreading.pas"/>
     343        <Caret Line="165" Column="1" TopLine="146"/>
    332344      </Position27>
    333345      <Position28>
    334         <Filename Value="umainform.pas"/>
    335         <Caret Line="149" Column="5" TopLine="124"/>
     346        <Filename Value="../umicrothreading.pas"/>
     347        <Caret Line="166" Column="1" TopLine="146"/>
    336348      </Position28>
    337349      <Position29>
    338350        <Filename Value="../umicrothreading.pas"/>
    339         <Caret Line="184" Column="1" TopLine="167"/>
     351        <Caret Line="167" Column="1" TopLine="146"/>
    340352      </Position29>
    341353      <Position30>
    342354        <Filename Value="../umicrothreading.pas"/>
    343         <Caret Line="209" Column="1" TopLine="202"/>
     355        <Caret Line="168" Column="1" TopLine="146"/>
    344356      </Position30>
    345357    </JumpHistory>
    … …  
    366378  </CompilerOptions>
    367379  <Debugging>
    368     <BreakPoints Count="12">
     380    <BreakPoints Count="6">
    369381      <Item1>
    370382        <Source Value="../Coroutine.pas"/>
    … …  
    376388      </Item2>
    377389      <Item3>
    378         <Source Value="../umicrothreading.pas"/>
    379         <Line Value="115"/>
     390        <Source Value="umainform.pas"/>
     391        <Line Value="50"/>
    380392      </Item3>
    381393      <Item4>
     394        <Source Value="../Coroutine.pas"/>
     395        <Line Value="257"/>
     396      </Item4>
     397      <Item5>
     398        <Source Value="../Coroutine.pas"/>
     399        <Line Value="145"/>
     400      </Item5>
     401      <Item6>
    382402        <Source Value="umainform.pas"/>
    383403        <Line Value="146"/>
    384       </Item4>
    385       <Item5>
    386         <Source Value="umainform.pas"/>
    387         <Line Value="50"/>
    388       </Item5>
    389       <Item6>
    390         <Source Value="../Coroutine.pas"/>
    391         <Line Value="257"/>
    392404      </Item6>
    393       <Item7>
    394         <Source Value="../Coroutine.pas"/>
    395         <Line Value="145"/>
    396       </Item7>
    397       <Item8>
    398         <Source Value="../umicrothreading.pas"/>
    399         <Line Value="239"/>
    400       </Item8>
    401       <Item9>
    402         <Source Value="../umicrothreading.pas"/>
    403         <Line Value="183"/>
    404       </Item9>
    405       <Item10>
    406         <Source Value="../umicrothreading.pas"/>
    407         <Line Value="209"/>
    408       </Item10>
    409       <Item11>
    410         <Source Value="../umicrothreading.pas"/>
    411         <Line Value="225"/>
    412       </Item11>
    413       <Item12>
    414         <Source Value="umainform.pas"/>
    415         <Line Value="154"/>
    416       </Item12>
    417405    </BreakPoints>
    418406    <Exceptions Count="3">
Note: See TracChangeset for help on using the changeset viewer.