Changeset 290 in dev for trunk/abdev/BasicCompiler32/Compile_CallProc.cpp

Timestamp:

Aug 21, 2007, 11:00:25 PM (17 years ago)

Author:

dai_9181

Message:

ジェネリクスのベースを実装

File:

• trunk/abdev/BasicCompiler32/Compile_CallProc.cpp (modified) (2 diffs)

trunk/abdev/BasicCompiler32/Compile_CallProc.cpp

@@ -81 +81 @@
 }
 
-bool Opcode_CallProc(const char *Parameter,const UserProc *pUserProc,DWORD dwFlags,const char *ObjectName,int RefType){
+bool Opcode_CallProc(const char *Parameter,const UserProc *pUserProc,DWORD dwFlags,const char *ObjectName ){
     int i2;
 
@@ -115 +115 @@
                 Type varType;
                 GetVarType( ObjectName, varType, false );
-                pobj_c = &varType.GetClass();
-                if( NATURAL_TYPE( varType.GetBasicType() ) != DEF_OBJECT ){
+                if( NATURAL_TYPE( varType.GetBasicType() ) == DEF_OBJECT )
+                {
+                    pobj_c = &varType.GetClass();
+                }
+                else
+                {
                     pobj_c=compiler.GetObjectModule().meta.GetClasses().Find(ObjectName);
                     if( pobj_c ){