Changeset 67 in dev for BasicCompiler32


Ignore:
Timestamp:
Mar 11, 2007, 3:25:42 AM (17 years ago)
Author:
dai_9181
Message:

[32bit Compiler]op_push_value → op_push_V
Nothingに対応。

Location:
BasicCompiler32
Files:
14 edited

Legend:

Unmodified
Added
Removed

  • BasicCompiler32/BasicCompiler.vcproj

    r56 r67  
    19271927            <File
    19281928                RelativePath="..\BasicCompiler_Common\BasicCompiler.h"
     1929                >
     1930            </File>
     1931            <File
     1932                RelativePath="..\BasicCompiler_Common\BasicFixed.h"
    19291933                >
    19301934            </File>

  • BasicCompiler32/CParameter.cpp

    r66 r67  
    135135
    136136    //push object_size
    137     op_push_value(object_size);
     137    op_push_V(object_size);
    138138
    139139    //call calloc

  • BasicCompiler32/Compile_Calc.cpp

    r66 r67  
    3131
    3232        //push 0
    33         op_push_value(0);
     33        op_push_V(0);
    3434
    3535        //push eax
    … …  
    116116
    117117            //push 0
    118             op_push_value(0);
     118            op_push_V(0);
    119119
    120120            //push eax
    … …  
    260260
    261261            //push 0
    262             op_push_value(0);
     262            op_push_V(0);
    263263
    264264            //push eax

  • BasicCompiler32/Compile_CallProc.cpp

    r64 r67  
    256256
    257257        //push object_size
    258         op_push_value(object_size);
     258        op_push_V(object_size);
    259259
    260260        //call calloc

  • BasicCompiler32/Compile_Set_Var.cpp

    r66 r67  
    610610
    611611        //push 0
    612         op_push_value(0);
     612        op_push_V(0);
    613613
    614614        //push eax

  • BasicCompiler32/Compile_Statement.cpp

    r64 r67  
    146146
    147147        //push 0
    148         op_push_value(0);
     148        op_push_V(0);
    149149
    150150        //fild dword ptr[esp]
    … …  
    180180
    181181        //push 0
    182         op_push_value(0);
     182        op_push_V(0);
    183183
    184184        //fild dword ptr[esp]
    … …  
    400400
    401401        //push 0
    402         op_push_value(0);
     402        op_push_V(0);
    403403
    404404        //fild dword ptr[esp]
    … …  
    434434
    435435        //push 0
    436         op_push_value(0);
     436        op_push_V(0);
    437437
    438438        //fild dword ptr[esp]
    … …  
    731731
    732732                //push 0
    733                 op_push_value(0);
     733                op_push_V(0);
    734734
    735735                //fild dword ptr[esp]
    … …  
    772772
    773773                //push 0
    774                 op_push_value(0);
     774                op_push_V(0);
    775775
    776776                //fild dword ptr[esp]

  • BasicCompiler32/Compile_Var.cpp

    r65 r67  
    107107
    108108    //push 0
    109     op_push_value(0);
     109    op_push_V(0);
    110110
    111111    for(i=i3-1;i>=0;i--){
    … …  
    11921192        else{
    11931193            //push 0
    1194             op_push_value(0);
     1194            op_push_V(0);
    11951195
    11961196            //push VarSize
    1197             op_push_value(VarSize);
     1197            op_push_V(VarSize);
    11981198
    11991199            //mov eax,ebp

  • BasicCompiler32/MakePeHdr.cpp

    r64 r67  
    155155    ProcPtrInfoNum=0;
    156156
    157     //クラス名を取得（詳細情報はGetObjectClassInfoで取得）
     157    //クラス名を取得（詳細情報はGetAllClassInfoで取得）
    158158    //   GetSubInfo関数の中で参照されるオブジェクト名を事前に取得する。
    159159    //     ※オブジェクトの内容までは取得しない
    … …  
    169169
    170170    //クラス情報を取得（※注 - GetSubInfoの後に呼び出す）
    171     pobj_DBClass->GetObjectClassInfo();
     171    pobj_DBClass->GetAllClassInfo();
    172172
    173173    //コードと行番号の関係

  • BasicCompiler32/NumOpe.cpp

    r64 r67  
    359359
    360360
     361                    // Nothing
     362                    if( lstrcmp( term, "Nothing" ) == 0 ){
     363                        type[sp] = DEF_OBJECT;
     364                        if( BaseType == DEF_OBJECT ){
     365                            index_stack[sp] = lpBaseIndex;
     366                        }
     367                        else{
     368                            index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClass();
     369                        }
     370
     371                        bLiteralCalculation = 0;
     372
     373                        //push 0
     374                        op_push_V( 0 );
     375
     376                        sp++;
     377                        break;
     378                    }
     379
     380
    361381
    362382                    RELATIVE_VAR RelativeVar;
    … …  
    521541
    522542                        //push HILONG(dbl)
    523                         op_push_value((long)*(long *)(((char *)(&i64data))+4));
     543                        op_push_V((long)*(long *)(((char *)(&i64data))+4));
    524544
    525545                        //push LOLONG(dbl)
    526                         op_push_value(*(long *)(&i64data));
     546                        op_push_V(*(long *)(&i64data));
    527547                    }
    528548                    else if(type[sp]==DEF_SINGLE){
    … …  
    535555
    536556                        //push term
    537                         op_push_value(i3);
     557                        op_push_V(i3);
    538558                    }
    539559                    else{
    … …  
    541561
    542562                        //push term
    543                         op_push_value((long)i64data);
     563                        op_push_V((long)i64data);
    544564
    545565                        if((long)i64data==0) index_stack[sp]=LITERAL_NULL;
    … …  
    693713
    694714            //push HILONG(i64data)
    695             op_push_value((long)*(long *)(((char *)(&i64data))+4));
     715            op_push_V((long)*(long *)(((char *)(&i64data))+4));
    696716
    697717            //push LOLONG(i64data)
    698             op_push_value(*(long *)(&i64data));
     718            op_push_V(*(long *)(&i64data));
    699719        }
    700720        else if(i2==DEF_SINGLE){
    … …  
    708728
    709729            //push flt
    710             op_push_value(i3);
     730            op_push_V(i3);
    711731        }
    712732        else{
    … …  
    719739
    720740            //push term
    721             op_push_value(i3);
     741            op_push_V(i3);
    722742        }
    723743

  • BasicCompiler32/NumOpe_Arithmetic.cpp

    r66 r67  
    605605
    606606        //push 0
    607         op_push_value(0);
     607        op_push_V(0);
    608608
    609609        //push eax
    … …  
    645645
    646646        //push 0
    647         op_push_value(0);
     647        op_push_V(0);
    648648
    649649        //push eax
    … …  
    834834
    835835        //push -1
    836         op_push_value(-1);
     836        op_push_V(-1);
    837837
    838838        //fild dword ptr[esp]
    … …  
    856856
    857857        //push -1
    858         op_push_value(-1);
     858        op_push_V(-1);
    859859
    860860        //fild dword ptr[esp]

  • BasicCompiler32/NumOpe_TypeOperation.cpp

    r66 r67  
    3232
    3333        //push 0
    34         op_push_value(0);
     34        op_push_V(0);
    3535
    3636        //push eax

  • BasicCompiler32/Opcode.h

    r66 r67  
    319319
    320320void op_push(int reg);
    321 void op_push_value(long data);
     321void op_push_V(long data);
    322322void op_pop(int reg);
    323323void op_add_esp(int num);

  • BasicCompiler32/OperatorProc.cpp

    r64 r67  
    125125
    126126        //push object_size
    127         op_push_value(object_size);
     127        op_push_V(object_size);
    128128
    129129        //call calloc

  • BasicCompiler32/op32_main.cpp

    r66 r67  
    519519    __op_format(0,(char)0x50,reg);
    520520}
    521 void op_push_value(long data){
     521void op_push_V(long data){
    522522    //スタックにリテラル値をプッシュ
    523523    if(-128<=data&&data<=127){
Note: See TracChangeset for help on using the changeset viewer.