pathlist.mata

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

*! version 1.0.0  01nov2004
version 9.0
mata:

string rowvector pathlist(|string scalar dirpath)
{
	real scalar		i
	string rowvector	tok
	string rowvector	res

	tok = tokens(args()==0 ? c("adopath") : dirpath, " ;")
	pragma unset res
	for (i=1; i<=cols(tok); i++) {
		if (tok[i]!=";") res = res, tok[i]
	}
	return(res)
}

end