Changeset 340 in dev for trunk/abdev/BasicCompiler_Common/src

Timestamp:

Oct 6, 2007, 12:56:37 AM (17 years ago)

Author:

dai_9181

Message:

Implements修飾子を作り始めた

File:

• trunk/abdev/BasicCompiler_Common/src/Class.cpp (modified) (5 diffs)

trunk/abdev/BasicCompiler_Common/src/Class.cpp

@@ -398 +398 @@
     return true;
 }
+
+bool CClass::Implements( const char *interfaceNames, int nowLine )
+{
+    Jenga::Common::Strings paramStrs;
+    SplitParameter( interfaceNames, paramStrs );
+
+    // TODO: 実装
+    return true;
+}
+
 CMember *CClass::CreateMember( Prototype::Accessibility accessibility, bool isConst, bool isRef, char *buffer, int nowLine )
 {
@@ -1273 +1283 @@
                     break;
                 }
+                else if( basbuf[i] == 1 && basbuf[i+1] == ESC_IMPLEMENTS )
+                {
+                    SetError(137, NULL, i );
+                    break;
+                }
 
                 sub_address=i;
@@ -1412 +1427 @@
             }
             else{
-                bool isInherits = false;
-                if(basbuf[i+1]==1&&basbuf[i+2]==ESC_INHERITS){
-                    //継承を行う場合
-                    isInherits = true;
-
+                if(basbuf[i+1]==1&&basbuf[i+2]==ESC_INHERITS)
+                {
+                    // クラス継承先が指定されているとき
                     i += 3;
                     GetCommandToken( temporary, basbuf, i );
@@ -1425 +1438 @@
                     }
                 }
-
-                if( !isInherits ){
-                    //Objectを継承する
+                else
+                {
+                    // 何の指定もないときはObjectクラスを継承する
                     lstrcpy( temporary, "Object" );
                 }
-
                 pobj_c->Inherits( temporary, i );
+
+                if( basbuf[i+1] == 1 && basbuf[i+2] == ESC_IMPLEMENTS )
+                {
+                    // インターフェイス実装を行う場合
+                    i += 3;
+                    GetCommandToken( temporary, basbuf, i );
+
+                    pobj_c->Implements( temporary, i );
+                }
             }
 InheritsError:
@@ -1448 +1469 @@
                 if(basbuf[i]==1&&basbuf[i+1]==ESC_INHERITS){
                     SetError(111,NULL,i);
+                    break;
+                }
+                else if( basbuf[i] == 1 && basbuf[i+1] == ESC_IMPLEMENTS )
+                {
+                    SetError(137, NULL, i );
                     break;
                 }