Changeset 41 in dev for BasicCompiler32

Timestamp:

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

Author:

dai_9181

Message:

ByVal演算子を追加

File:

• BasicCompiler32/NumOpe.cpp (modified) (1 diff)

BasicCompiler32/NumOpe.cpp

@@ -667 +667 @@
                 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;
+
             default:
                 SetError(300,NULL,cp);
-                break;
+                goto error;
         }
     }