Changeset 7 in dev for BasicCompiler_Common/Intermediate_Step2.cpp

Timestamp:

Dec 7, 2006, 3:09:44 AM (17 years ago)

Author:

dai_9181

Message:

Constステートメントで定数変数を宣言できるように改良。

File:

• BasicCompiler_Common/Intermediate_Step2.cpp (modified) (3 diffs)

BasicCompiler_Common/Intermediate_Step2.cpp

@@ -44 +44 @@
             return;
         }
-        if(Command[i]=='='||Command[i]=='('){
+        if(Command[i]=='='){
+            //定数定義は新しいクラスモジュール（CDBConst）へ移行
+            return;
+        }
+        if(Command[i]=='('){
             temporary[i]=0;
             break;
@@ -230 +234 @@
 
         //定数を追加
-        CONSTINFO *pci;
-        pci=GetNewConstHash(temporary);
-        pci->name=(char *)HeapAlloc(hHeap,0,lstrlen(temporary)+1);
-        lstrcpy(pci->name,temporary);
-        pci->type=DEF_LONG;
-        pci->lpIndex=-1;
-        pci->DblValue=(double)NextValue;
-        pci->StrValue=0;
+        CDBConst::obj.AddConst(temporary, NextValue);
     }
 }
@@ -282 +279 @@
                 temporary[i2]=basbuf[i];
             }
-            AddConstData(temporary);
+            CDBConst::obj.Add(temporary);
             if(basbuf[i]=='\0') break;
         }