PValアドレスとAPTRってHSPCTX::prmstackを経由しなくてもとれる

mrefのリソースID 0, 1 を使うってだけ。

#module
#defcfunc get_pval1 var
	mref hspctx, 68
	dupptr vptr, hspctx(207), 4
	return vptr
#defcfunc get_aptr1 var
	mref hspctx, 68
	dupptr vptr, hspctx(207)+4, 4
	return vptr
#global

#module
#defcfunc get_pval2 var
	mref ppval, 0
	return ppval
#defcfunc get_aptr2 var
	mref aptr, 1
	return aptr
#global

mes get_pval1(a)
mes get_pval2(a)

mes get_aptr1(a.123)
mes get_aptr2(a.123)