Changeset 67 in dev for BasicCompiler64

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:

BasicCompiler64

Files:

• MakePeHdr.cpp (modified) (2 diffs)
• NumOpe.cpp (modified) (1 diff)

BasicCompiler64/MakePeHdr.cpp

@@ -141 +141 @@
     ProcPtrInfoNum=0;
 
-    //クラス名を取得（詳細情報はGetObjectClassInfoで取得）
+    //クラス名を取得（詳細情報はGetAllClassInfoで取得）
     //   GetSubInfo関数の中で参照されるオブジェクト名を事前に取得する。
     //     ※オブジェクトの内容までは取得しない
@@ -155 +155 @@
 
     //クラス情報を取得（※注 - GetSubInfoの後に呼び出す）
-    pobj_DBClass->GetObjectClassInfo();
+    pobj_DBClass->GetAllClassInfo();
 
     //コードと行番号の関係

BasicCompiler64/NumOpe.cpp

@@ -402 +402 @@
 
 
+                    // Nothing
+                    if( lstrcmp( term, "Nothing" ) == 0 ){
+                        type[sp] = DEF_OBJECT;
+                        if( BaseType == DEF_OBJECT ){
+                            index_stack[sp] = lpBaseIndex;
+                        }
+                        else{
+                            index_stack[sp] = (LONG_PTR)pobj_DBClass->GetObjectClass();
+                        }
+
+                        bLiteralCalculation = 0;
+
+                        //xor reg,reg
+                        op_zero_reg( UseReg );
+
+                        if(UseReg==REG_R14){
+                            //mov qword ptr[rsp+offset],r14     ※スタックフレームを利用
+                            pobj_sf->push(REG_R14);
+                        }
+
+                        pobj_reg->LockReg();
+                        sp++;
+                        break;
+                    }
+
+
                     RELATIVE_VAR RelativeVar;
                     if(GetVarOffset(