- Timestamp:
- Nov 11, 2007, 5:15:30 PM (17 years ago)
- Location:
- trunk/abdev
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abdev/BasicCompiler32/Compile_ProcOp.cpp
r358 r365 226 226 // グローバル領域をコンパイル 227 227 //////////////////////////////////////// 228 229 UserProc::pGlobalProc = &userProc; 228 230 229 231 const UserProc *pBackUserProc = &UserProc::CompilingUserProc(); -
trunk/abdev/BasicCompiler_Common/error.cpp
r359 r365 88 88 if(num==-106) sprintf(msg,"[警告] DLLファイル \"%s\" が見つかりません。",tempKeyWord); 89 89 if(num==-107) sprintf(msg,"[警告] DLL関数 \"%s\" を参照できません。",tempKeyWord); 90 if(num==-108) lstrcpy(msg,"[警告] Catch節、Finally節を持たない意味のないTryスコープです。"); 90 91 if(num==-120) sprintf(msg,"[警告] VarPtr関数の引数にオブジェクト インスタンスが指定されました。オブジェクトの先頭アドレスを取得したいときはObjPtr関数に切り替えをお願いします。m(__)m(この警告はVarPtr→ObjPtrへの切り替えが完了したら消します(切り替えは \"適材箇所に限り\" ですので、ご注意ください!))",tempKeyWord); 91 92 #else -
trunk/abdev/BasicCompiler_Common/include/ver.h
r364 r365 6 6 // バージョン付加文字列 7 7 #ifdef _AMD64_ 8 #define VER_INFO "(x64) (rev.37 5)"8 #define VER_INFO "(x64) (rev.376)" 9 9 #else 10 #define VER_INFO "(rev.37 5)"10 #define VER_INFO "(rev.376)" 11 11 #endif -
trunk/abdev/BasicCompiler_Common/src/Exception.cpp
r364 r365 38 38 class TryScope 39 39 { 40 int sourceCodePos; 40 41 bool isDefinedFinally; 41 42 … … 61 62 62 63 public: 63 TryScope() 64 : isDefinedFinally( false ) 64 TryScope( int sourceCodePos ) 65 : sourceCodePos( sourceCodePos ) 66 , isDefinedFinally( false ) 65 67 { 66 68 } … … 69 71 } 70 72 73 int GetSourceCodePos() const 74 { 75 return sourceCodePos; 76 } 71 77 const CatchScopes &GetCatchScopes() const 72 78 { … … 237 243 void TryCommand() 238 244 { 239 tryScopes.push_back( TryScope( ) );245 tryScopes.push_back( TryScope( cp ) ); 240 246 tryScopes.back().Try(); 241 247 … … 315 321 SetError(1,NULL,cp); 316 322 return; 323 } 324 325 if( !tryScopes.back().IsDefinedFinally() && !tryScopes.back().IsCatched() ) 326 { 327 // CatchもFinallyも存在しないとき 328 SetError(-108,NULL,tryScopes.back().GetSourceCodePos() ); 317 329 } 318 330
Note:
See TracChangeset
for help on using the changeset viewer.