Changeset 311 in dev for trunk/abdev/BasicCompiler_Common/src/Procedure.cpp

Timestamp:

Aug 31, 2007, 8:59:06 PM (17 years ago)

Author:

dai_9181

Message:

パラメータ初期値を設定したときにリテラル値用indexが型データに付加されないようにした。

File:

• trunk/abdev/BasicCompiler_Common/src/Procedure.cpp (modified) (1 diff)

trunk/abdev/BasicCompiler_Common/src/Procedure.cpp

@@ -142 +142 @@
 
             NumOpe_GetType( initValue, GetStringTypeInfo(), type );
+            
+            if( IS_LITERAL(type.GetIndex()) )
+            {
+                type.SetIndex( -1 );
+            }
         }
         else if(sourceOfParams[i]==1&&sourceOfParams[i+1]==ESC_AS){