Changeset 41 in dev for BasicCompiler_Common/NumOpe_GetType.cpp

Timestamp:

Jan 28, 2007, 5:28:43 AM (17 years ago)

Author:

dai_9181

Message:

ByVal演算子を追加

File:

• BasicCompiler_Common/NumOpe_GetType.cpp (modified) (2 diffs)

BasicCompiler_Common/NumOpe_GetType.cpp

@@ -163 +163 @@
         case CALC_AS:
             if((type[sp-1]&FLAG_CAST)==0){
+                //型名が指定されていないときはエラー
+                SetError(47,NULL,cp);
+                return 0;
+            }
+            break;
+
+        case CALC_BYVAL:
+            if(type[sp-1]&FLAG_CAST){
                 //型名が指定されていないときはエラー
                 SetError(47,NULL,cp);
@@ -601 +609 @@
                 sp--;
                 break;
+
+            case CALC_BYVAL:
+                //ポインタ型→参照型
+                if( PTR_LEVEL( type[sp-1] ) <= 0 ){
+                    //ポインタ型ではないとき
+                    SetError( 3, NULL, cp );
+                    goto error;
+                }
+
+                type[sp-1] = PTR_LEVEL_DOWN( type[sp-1] );
+                break;
         }
     }