// HSP2.61
// my_getptr p1, p2
// p1 : ポインタを代入する変数
// p2 : ポインタを取得する変数
#module "my_getptr"
#deffunc my_getptr val, val
    mref v, 16
    mref p, 1
    v = p
return
#global
ll_getptr a
ll_ret p
mes "ll_getptr : " + p
my_getptr p, a
mes "my_getptr : " + p
stop