Changeset 468 in dev for trunk/ab5.0/abdev/BasicCompiler64/Compile_Statement.cpp
- Timestamp:
- Mar 27, 2008, 3:04:28 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/abdev/BasicCompiler64/Compile_Statement.cpp
r436 r468 15 15 //ダブルクォートは不正なのでエラー扱い 16 16 leftTerm[i]=0; 17 SetError(3,leftTerm,cp);17 compiler.errorMessenger.Output(3,leftTerm,cp); 18 18 return; 19 19 } … … 47 47 (leftTerm[0]==1&&leftTerm[1]==ESC_PSMEM) 48 48 )){ 49 SetError(1,NULL,cp);49 compiler.errorMessenger.Output(1,NULL,cp); 50 50 return; 51 51 } … … 75 75 if(pUserProc){ 76 76 if( !pUserProc->IsMacro() ){ 77 SetError(10,Command,cp);77 compiler.errorMessenger.Output(10,Command,cp); 78 78 } 79 79 … … 90 90 91 91 if( pobj_reg ){ 92 SetError();92 compiler.errorMessenger.OutputFatalError(); 93 93 } 94 94 pobj_reg=new CRegister(REG_RAX); … … 118 118 119 119 // どこにも当てはまらなかったため、失敗 120 SetError(1,NULL,cp);120 compiler.errorMessenger.Output(1,NULL,cp); 121 121 } 122 122 … … 174 174 for(int i=0;;i++){ 175 175 if(Parameter[i]=='\0'){ 176 SetError(21,NULL,cp);176 compiler.errorMessenger.Output(21,NULL,cp); 177 177 return; 178 178 } … … 314 314 compiler.codeGenerator.ContinueAreaBegin(); 315 315 316 if(!Parameter[0]) SetError(10,"While",cp);316 if(!Parameter[0]) compiler.errorMessenger.Output(10,"While",cp); 317 317 318 318 //条件式を実行してフラグをセット … … 353 353 i=GetOneParameter(Parameter,0,temporary); 354 354 if(!Parameter[i]){ 355 SetError(12,"For",cp);355 compiler.errorMessenger.Output(12,"For",cp); 356 356 isError = true; 357 357 goto ErrorStep; … … 367 367 } 368 368 if(temporary[i2]=='\0'){ 369 SetError(12,"For",cp);369 compiler.errorMessenger.Output(12,"For",cp); 370 370 isError = true; 371 371 goto ErrorStep; … … 386 386 if(Parameter[i]){ 387 387 i=GetOneParameter(Parameter,i,StepNum); 388 if(Parameter[i]) SetError(12,"For",cp);388 if(Parameter[i]) compiler.errorMessenger.Output(12,"For",cp); 389 389 } 390 390 else lstrcpy(StepNum,"1"); … … 450 450 if(szNextVariable[0]){ 451 451 if(lstrcmp(szNextVariable,variable)!=0){ 452 SetError(55,szNextVariable,cp);452 compiler.errorMessenger.Output(55,szNextVariable,cp); 453 453 } 454 454 } … … 480 480 GetCustomToken( variable, Parameter, i, ESC_IN, true ); 481 481 if(!Parameter[i]){ 482 SetError(12,"Foreach",cp);482 compiler.errorMessenger.Output(12,"Foreach",cp); 483 483 isError = true; 484 484 goto ErrorStep; … … 537 537 if(szNextVariable[0]){ 538 538 if(lstrcmp(szNextVariable,variable)!=0){ 539 SetError(55,szNextVariable,cp);539 compiler.errorMessenger.Output(55,szNextVariable,cp); 540 540 } 541 541 } … … 561 561 int i,i2,i3; 562 562 563 if(Parameter[0]) SetError(10,"Do",cp);563 if(Parameter[0]) compiler.errorMessenger.Output(10,"Do",cp); 564 564 565 565 //Continueアドレスのバックアップとセット … … 641 641 void OpcodeExitSub(void){ 642 642 if( UserProc::IsGlobalAreaCompiling() ){ 643 SetError(12,"Exit Sub/Function",cp);643 compiler.errorMessenger.Output(12,"Exit Sub/Function",cp); 644 644 return; 645 645 } … … 705 705 if(basbuf[i]=='\0'){ 706 706 selectSchedules.pop_back(); 707 SetError(22,"Select",cp);707 compiler.errorMessenger.Output(22,"Select",cp); 708 708 return; 709 709 } … … 893 893 894 894 if(selectSchedules.back().typeSize==-1){ 895 SetError(30,"Case",cp);895 compiler.errorMessenger.Output(30,"Case",cp); 896 896 return; 897 897 } … … 914 914 915 915 void OpcodeGosub(char *Parameter){ 916 SetError(-1,"Gosub ~ Returnステートメントは64ビットコンパイラで利用することはできません。",cp);916 compiler.errorMessenger.Output(-1,"Gosub ~ Returnステートメントは64ビットコンパイラで利用することはできません。",cp); 917 917 } 918 918 void OpcodeReturn(char *Parameter){ 919 919 if( UserProc::IsGlobalAreaCompiling() ){ 920 SetError(62,NULL,cp);920 compiler.errorMessenger.Output(62,NULL,cp); 921 921 } 922 922 else{ … … 966 966 i=GetOneParameter(Parameter,0,temporary); 967 967 if(!Parameter[i]){ 968 SetError(1,NULL,cp);968 compiler.errorMessenger.Output(1,NULL,cp); 969 969 return; 970 970 } … … 976 976 } 977 977 if(!resultType.IsWhole()){ 978 SetError(11,Parameter,cp);978 compiler.errorMessenger.Output(11,Parameter,cp); 979 979 return; 980 980 } … … 986 986 i=GetOneParameter(Parameter,i,temporary); 987 987 if(Parameter[i]){ 988 SetError(1,NULL,cp);988 compiler.errorMessenger.Output(1,NULL,cp); 989 989 return; 990 990 }
Note:
See TracChangeset
for help on using the changeset viewer.