DIR*	T_DIR

INPUT
T_DIR
	$var = IoDIRP(sv_2io($arg))
