benchmark.udp-echo0: "over over" is just "2dup".
parent
eaa19eb36f
commit
22f8d09220
|
@ -7,7 +7,7 @@ sequences ;
|
||||||
IN: benchmark.udp-echo0
|
IN: benchmark.udp-echo0
|
||||||
|
|
||||||
: send/recv ( packet server client -- )
|
: send/recv ( packet server client -- )
|
||||||
[ over over addr>> ] [ send ] bi* receive drop assert= ;
|
[ 2dup addr>> ] [ send ] bi* receive drop assert= ;
|
||||||
|
|
||||||
: udp-echo ( #times #bytes -- )
|
: udp-echo ( #times #bytes -- )
|
||||||
'[
|
'[
|
||||||
|
|
Loading…
Reference in New Issue