Changeset 327 in dev for trunk/abdev/BasicCompiler32

Timestamp:

Sep 25, 2007, 9:23:38 PM (17 years ago)

Author:

dai_9181

Message:

デリゲートのベースがほぼ実装できた

Location:

trunk/abdev/BasicCompiler32

Files:

• NumOpe.cpp (modified) (1 diff)
• Opcode.h (modified) (1 diff)

trunk/abdev/BasicCompiler32/NumOpe.cpp

@@ -333 +333 @@
         int idProc=GetProc(procName,(void **)&pInfo);
 
-        if(idProc){
-            //閉じカッコ")"に続く文字がNULLでないとき
-            if(termFull[i2+1+i4+1]!='\0'){
+        if(idProc)
+        {
+            if(termFull[i2+1+i4+1]!='\0')
+            {
+                //閉じカッコ")"に続く文字がNULLでないとき
                 SetError(42,NULL,cp);
             }

trunk/abdev/BasicCompiler32/Opcode.h

@@ -19 +19 @@
 #define breakpoint compiler.codeGenerator.PutOld( (char)0xCC );
 
-
-//プロシージャの種類
-#define PROC_DEFAULT    1   //ユーザー定義関数
-#define PROC_DLL        2   //DLL関数
-#define PROC_BUILTIN    3   //コンパイラ埋め込み型
-#define PROC_PTR        4   //関数ポインタ
 
 //プロシージャ