Changeset 17 in dev for BasicCompiler_Common/Class.cpp

Timestamp:

Dec 20, 2006, 2:51:56 AM (18 years ago)

Author:

dai_9181

Message:

定数メンバ機能を有効にした。

File:

• BasicCompiler_Common/Class.cpp (modified) (11 diffs)

BasicCompiler_Common/Class.cpp

@@ -16 +16 @@
 
 
-CMember::CMember(CClass *pobj_c,DWORD access,char *buffer,int NowLine){
+CMember::CMember( CClass *pobj_c, DWORD access, bool isConst, char *buffer, int NowLine ){
     extern int cp;
 
@@ -46 +46 @@
     dwAccess=access;
 
+    //定数扱いかどうか
+    this->isConst = isConst;
+
     //初期データ
     InitBuf=(char *)HeapAlloc(hHeap,0,lstrlen(init_buf)+1);
@@ -64 +67 @@
     name=(char *)HeapAlloc(hHeap,0,lstrlen(pobj->name)+1);
     lstrcpy(name,pobj->name);
+
+    //定数扱いかどうか
+    isConst = pobj->isConst;
 
     //SubScripts
@@ -81 +87 @@
     if(InitBuf) HeapDefaultFree(InitBuf);
     if(ConstractParameter) HeapDefaultFree(ConstractParameter);
+}
+
+bool CMember::IsConst(){
+    return isConst;
 }
 
@@ -159 +169 @@
     this->name=(char *)HeapAlloc(hHeap,0,lstrlen(name)+1);
     lstrcpy(this->name,name);
+
+    isCompilingConstructor = 0;
 }
 CClass::~CClass(){
@@ -202 +214 @@
     }
 }
-void CClass::AddMember(DWORD dwAccess,char *buffer){
-    ppobj_Member=(CMember **)HeapReAlloc(hHeap,0,ppobj_Member,(iMemberNum+1)*sizeof(CMember *));
-    ppobj_Member[iMemberNum]=new CMember(this,dwAccess,buffer);
+void CClass::AddMember( DWORD dwAccess, bool isConst, char *buffer ){
+    ppobj_Member = (CMember **)HeapReAlloc( hHeap, 0, ppobj_Member, ( iMemberNum + 1 ) * sizeof(CMember *) );
+    ppobj_Member[iMemberNum] = new CMember( this, dwAccess, isConst, buffer );
     iMemberNum++;
 }
-void CClass::AddStaticMember(DWORD dwAccess,char *buffer,int NowLine){
+void CClass::AddStaticMember( DWORD dwAccess, bool isConst, char *buffer, int NowLine ){
     ppobj_StaticMember=(CMember **)HeapReAlloc(hHeap,0,ppobj_StaticMember,(iStaticMemberNum+1)*sizeof(CMember *));
-    ppobj_StaticMember[iStaticMemberNum]=new CMember(this,dwAccess,buffer,NowLine);
+    ppobj_StaticMember[iStaticMemberNum]=new CMember( this, dwAccess, isConst, buffer, NowLine );
     iStaticMemberNum++;
 }
@@ -380 +392 @@
 
     return ppArray_si;
+}
+
+// コンストラクタのコンパイルを開始
+void CClass::NotifyStartConstructorCompile(){
+    isCompilingConstructor = true;
+}
+
+//コンストラクタのコンパイルを終了
+void CClass::NotifyFinishConstructorCompile(){
+    isCompilingConstructor = false;
+}
+
+//コンストラクタをコンパイル中かどうかを判別
+bool CClass::IsCompilingConstructor(){
+    return isCompilingConstructor;
 }
 
@@ -700 +727 @@
 
             //インターフェイス名を取得
-            for(i2=0;;i++,i2++){
-                if(IsCommandDelimitation(basbuf[i])){
-                    temporary[i2]=0;
-                    break;
-                }
-                temporary[i2]=basbuf[i];
-            }
+            GetIdentifierToken( temporary, basbuf, i );
 
             pobj_c=pobj_DBClass->check(temporary);
@@ -897 +918 @@
 
             //クラス名を取得
-            for(i2=0;;i++,i2++){
-                if(IsCommandDelimitation(basbuf[i])){
-                    temporary[i2]=0;
-                    break;
-                }
-                temporary[i2]=basbuf[i];
-            }
+            GetIdentifierToken( temporary, basbuf, i );
 
             pobj_c=pobj_DBClass->check(temporary);
@@ -1051 +1066 @@
                 else bStatic=0;
 
+                //Const修飾子
+                bool isConst = false;
+                if( basbuf[i] == 1 && basbuf[i + 1] == ESC_CONST ){
+                    isConst = true;
+                    i += 2;
+                }
+
                 if(basbuf[i]==1&&(
                     basbuf[i+1]==ESC_ABSTRACT||basbuf[i+1]==ESC_VIRTUAL||basbuf[i+1]==ESC_OVERRIDE||
@@ -1128 +1150 @@
                         //静的メンバを追加
                         cp=i;   //エラー用
-                        pobj_c->AddStaticMember(dwAccess,temporary,i);
+                        pobj_c->AddStaticMember( dwAccess, isConst, temporary, i);
                     }
                     else{
                         //メンバを追加
                         cp=i;   //エラー用
-                        pobj_c->AddMember(dwAccess,temporary);
+                        pobj_c->AddMember( dwAccess, isConst, temporary );