scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-10-31 02:38:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

video_em: uses object ref to sleep_sec, sleep_ms

Browse Source
This commit is contained in:
Jed Reynolds
2020-03-23 10:04:59 -07:00
parent 19d548ab91
commit e3d0863564
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
l3_video_em.pl
View File

@@ -498,7 +498,7 @@ do {
my $bytes = 0; my $bytes = 0;
while($bytes < ($buf_size + $startbytes)) { while($bytes < ($buf_size + $startbytes)) {
$bytes = txbytes($endp); $bytes = txbytes($endp);
sleep_ms(200); $::utils->sleep_ms(200);
#print " +$bytes" unless ($silent); #print " +$bytes" unless ($silent);
} }
my ($finishtime_sec, $finishtime_usec) = gettimeofday(); my ($finishtime_sec, $finishtime_usec) = gettimeofday();
@@ -516,7 +516,7 @@ do {
$cmd = $::utils->fmt_cmd("add_endp", $endp, 1, $res, $port, $type, $NA, $NA, $::min_tx, $::min_tx); $cmd = $::utils->fmt_cmd("add_endp", $endp, 1, $res, $port, $type, $NA, $NA, $::min_tx, $::min_tx);
print "-" unless($silent); print "-" unless($silent);
$::utils->doCmd($cmd); $::utils->doCmd($cmd);
sleep_sec($drain_wait_sec); $::utils->sleep_sec($drain_wait_sec);
$startbytes = txbytes($endp); $startbytes = txbytes($endp);
$cmd = $::utils->fmt_cmd("add_endp", $endp, 1, $res, $port, $type, $NA, $NA, $::max_tx, $::max_tx); $cmd = $::utils->fmt_cmd("add_endp", $endp, 1, $res, $port, $type, $NA, $NA, $::max_tx, $::max_tx);
$::utils->doCmd($cmd); $::utils->doCmd($cmd);