benchmark.udp-echo0: Fix the memory leak.
parent
1c99568492
commit
1d84f5e190
|
@ -12,8 +12,8 @@ IN: benchmark.udp-echo0
|
||||||
: udp-echo ( #times #bytes -- )
|
: udp-echo ( #times #bytes -- )
|
||||||
'[
|
'[
|
||||||
_ iota [ _ >be ] map
|
_ iota [ _ >be ] map
|
||||||
"127.0.0.1" 0 <inet4> <datagram>
|
"127.0.0.1" 0 <inet4> <datagram> &dispose
|
||||||
"127.0.0.1" 0 <inet4> <datagram>
|
"127.0.0.1" 0 <inet4> <datagram> &dispose
|
||||||
[ send/recv ] 2curry each
|
[ send/recv ] 2curry each
|
||||||
] with-destructors ;
|
] with-destructors ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue