diff --git a/vpi/sys_fileio.c b/vpi/sys_fileio.c
index df07a2768..33962d3f5 100644
--- a/vpi/sys_fileio.c
+++ b/vpi/sys_fileio.c
@@ -205,6 +205,7 @@ static PLI_INT32 sys_fclose_calltf(PLI_BYTE8*name)
 	    case vpiReg:
 	    case vpiRealVal:
 	    case vpiIntegerVar:
+	    case vpiMemoryWord:
 	      break;
 	    default:
 	      vpi_printf("ERROR: %s mcd parameter must be of integral type",