- 275 名前：デフォルトの名無しさん mailto:sage [2011/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
|
 |
