Changeset 103 in dev for BasicCompiler64/NumOpe.cpp

Timestamp:

May 2, 2007, 4:08:58 AM (18 years ago)

Author:

dai_9181

Message:

名前空間機能をグローバル変数、定数と列挙型に適用。
一部、クラスの静的メンバと名前空間の相性が悪いコードが潜んでいるため、要改修

File:

• BasicCompiler64/NumOpe.cpp (modified) (6 diffs)

BasicCompiler64/NumOpe.cpp

@@ -239 +239 @@
     lstrcpy(termLeft,termFull);
 
-    if( (string)term=="DayOfWeek"){
-        int test=0;
-    }
-
     // パース
     char member[VN_SIZE];
@@ -258 +254 @@
         Type leftType;
         if( !TermOpe( termLeft, baseType, leftType, isLiteral, pbUseHeap, &isClassName ) ){
-            return false;
+            goto globalArea;
         }
 
@@ -273 +269 @@
         return TermMemberOpe( leftType.GetClass(), baseType, resultType, termFull, termLeft, member );
     }
-
+globalArea:
 
     //////////////////////////////////////////////
@@ -290 +286 @@
     // グローバル属性エリア
     /////////////////////////////////////////////////////////////////
-globalArea:
 
     int UseReg=pobj_reg->GetNextReg();
@@ -783 +778 @@
                     // 何らかの識別子
 
+    if( (string)term=="ParentArea.NamespaceEnumTest.x"){
+        int test=0;
+    }
+
                     bool isLiteral;
                     if( TermOpe( term, baseType, resultType, isLiteral, &bUseHeap[sp] ) ){
@@ -870 +869 @@
                     //////////////
 
-                    i3 = CDBConst::obj.GetType(term);
+                    i3 = CDBConst::obj.GetBasicType(term);
                     if(i3){
+                        if( CDBConst::obj.IsStringPtr( term ) ){
+                            //リテラル文字列
+
+                            double dbl = CDBConst::obj.GetDoubleData(term);
+                            memcpy(&i64data,&dbl,sizeof(double));
+
+                            //バイト数
+                            i3=lstrlen((char *)i64data);
+
+                            memcpy(term,(char *)i64data,i3);
+                            term[i3]=0;
+                            goto StrLiteral;
+                        }
+
                         type_stack[sp] = i3;
                         if(IsRealNumberType(i3)){