Changeset 551 in dev for trunk/ab5.0/abdev/BasicCompiler_Common
- Timestamp:
- May 5, 2008, 12:39:50 AM (17 years ago)
- Location:
- trunk/ab5.0/abdev/BasicCompiler_Common
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/abdev/BasicCompiler_Common/Compile.cpp
r537 r551 744 744 } 745 745 746 compiler.codeGenerator.NextSourceLine( );746 compiler.codeGenerator.NextSourceLine( compiler.GetObjectModule().GetCurrentSourceIndex() ); 747 747 748 748 if(Command[0]==1){ -
trunk/ab5.0/abdev/BasicCompiler_Common/include/CodeGenerator.h
r524 r551 241 241 } 242 242 243 void NextSourceLine( )244 { 245 pNativeCode->NextSourceLine( );243 void NextSourceLine( int currentSourceIndex ) 244 { 245 pNativeCode->NextSourceLine( currentSourceIndex ); 246 246 } 247 247 … … 266 266 continueCodePositions.pop_back(); 267 267 } 268 268 269 void PutWithSchedule( long l, Schedule::Type scheduleType ); 270 269 271 void ResolveExitSubSchedule(); 270 272 … … 469 471 void PutOld( long l, Schedule::Type scheduleType ) 470 472 { 471 pNativeCode->PutEx( l, scheduleType );473 this->PutWithSchedule( l, scheduleType ); 472 474 } 473 475 const PertialSchedule *PutOld( long l, bool isPertialSchedule ) … … 479 481 pPertialSchedule = pertialSchedules.back(); 480 482 } 481 pNativeCode->Put Ex( l, Schedule::None);483 pNativeCode->Put( l ); 482 484 return pPertialSchedule; 483 485 } -
trunk/ab5.0/abdev/BasicCompiler_Common/include/NativeCode.h
r550 r551 254 254 return sourceLines; 255 255 } 256 void NextSourceLine( );256 void NextSourceLine( int currentSourceIndex ); 257 257 258 258 void ResetDataSectionBaseOffset( long dataSectionBaseOffset ); -
trunk/ab5.0/abdev/BasicCompiler_Common/src/CommonCodeGenerator.cpp
r485 r551 10 10 11 11 12 void CodeGenerator::PutWithSchedule( long l, Schedule::Type scheduleType ) 13 { 14 if( scheduleType == Schedule::CatchAddress ) 15 { 16 const UserProc *pCurrentUserProc = compiler.IsGlobalAreaCompiling() 17 ? UserProc::pGlobalProc 18 : &compiler.GetCompilingUserProc(); 19 20 this->pNativeCode->PutCatchAddressSchedule( pCurrentUserProc, l ); 21 } 22 else 23 { 24 this->pNativeCode->PutEx( l, scheduleType ); 25 } 26 } 27 12 28 void CodeGenerator::ResolveExitSubSchedule() 13 29 { -
trunk/ab5.0/abdev/BasicCompiler_Common/src/NativeCode.cpp
r550 r551 57 57 void NativeCode::PutEx( long l, Schedule::Type scheduleType ) 58 58 { 59 if( scheduleType == Schedule::CatchAddress)59 if( scheduleType != Schedule::None ) 60 60 { 61 const UserProc *pUserProc = &compiler.GetCompilingUserProc(); 62 if( compiler.IsGlobalAreaCompiling() ) 63 { 64 pUserProc = UserProc::pGlobalProc; 65 } 66 PutCatchAddressSchedule( pUserProc, l ); 61 schedules.push_back( Schedule( scheduleType, GetSize() ) ); 67 62 } 68 else69 {70 if( scheduleType != Schedule::None )71 {72 schedules.push_back( Schedule( scheduleType, GetSize() ) );73 }74 63 75 Put( l ); 76 } 64 Put( l ); 77 65 } 78 66 … … 120 108 } 121 109 122 void NativeCode::NextSourceLine( )110 void NativeCode::NextSourceLine( int currentSourceIndex ) 123 111 { 124 112 if( sourceLines.size() ) … … 146 134 (long)sourceLines.size(), 147 135 GetSize(), 148 c ompiler.GetObjectModule().GetCurrentSourceIndex(),136 currentSourceIndex, 149 137 cp, 150 138 sourceLineType
Note:
See TracChangeset
for help on using the changeset viewer.