11/07/26 19:04:25.64
苦労した成果
#module hoge a, b
#deffunc swap_var var x, var y, local z
z=x : x=y : y=z
return
#modinit int a_, int b_
a=a_ : b=b_
return
#modfunc hoge_print
mes strf("a=%d b=%d", a, b)
return
#modfunc hoge_swap_ var a_, var b_
swap_var a, a_
swap_var b, b_
return
#modfunc hoge_swap var target
hoge_swap_ target, a, b
return
#global
newmod x, hoge, 1, 2
newmod x, hoge, 3, 4
newmod y, hoge, 5, 6
hoge_swap x.1, y.0
foreach x
hoge_print x.cnt
loop
hoge_print y.0