Changeset 49 in dev for BasicCompiler32/NumOpe.cpp

Timestamp:

Feb 10, 2007, 6:13:37 AM (18 years ago)

Author:

dai_9181

Message:

戻り値オブジェクトのメンバを直接的に参照できるようにした。

File:

• BasicCompiler32/NumOpe.cpp (modified) (2 diffs)

BasicCompiler32/NumOpe.cpp

@@ -284 +284 @@
 
                         if(idProc){
-                            //閉じカッコ")"に続く文字がNULLでないときはエラーにする
-                            if(term[i2+1+i4+1]!='\0') SetError(42,NULL,cp);
+                            //閉じカッコ")"に続く文字がNULLでないとき
+                            if(term[i2+1+i4+1]!='\0'){
+                                if( term[i2+1+i4+1] == '.'
+                                    || term[i2+1+i4+1] == 1 && term[i2+1+i4+2] == ESC_PSMEM ){
+                                        goto NonProc;
+                                }
+                                else{
+                                    SetError(42,NULL,cp);
+                                }
+                            }
 
                             ////////////////
@@ -351 +359 @@
                         }
                     }
+NonProc: