Index: BasicCompiler64/Compile_CallProc.cpp
===================================================================
--- BasicCompiler64/Compile_CallProc.cpp	(revision 28)
+++ BasicCompiler64/Compile_CallProc.cpp	(revision 29)
@@ -434,8 +434,6 @@
 				SetVarPtrToReg(REG_RCX,&RelativeVar);
 
-				//参照タイプが整合しているかをチェック
-				if(i2!=RefType) SetError(104,ObjectName,cp);
-
-				if(i2==DEF_PTR_OBJECT){
+				//参照タイプが "->" の場合
+				if(RefType==DEF_PTR_OBJECT){
 					//mov rcx,qword ptr[rcx]
 					op_mov_RM(sizeof(_int64),REG_RCX,REG_RCX,0,MOD_BASE);