inlined pushPoint(). no-op

This commit is contained in:
Dima Kogan 2021-02-09 23:08:44 -08:00
parent 5442566524
commit fb0a178dbc

View File

@ -1034,11 +1034,20 @@ sub mainThread
my $rangesize = getRangeSize($id);
last if @fields < $rangesize;
pushPoint(getCurve($id),
# Done. The curve is created. I add a point to the plot.
my $curve = getCurve($id);
push @{$curve->{datastring_meta}},
{ offset_start => length( $curve->{datastring} ) +
$curve->{datastring_offset},
domain => $domain0_numeric };
$curve->{datastring} .=
join(' ',
@domain,
splice( @fields, 0, $rangesize ) ) . "\n",
$domain0_numeric);
splice( @fields, 0, $rangesize ) ) . "\n";
$haveNewData = 1;
$i_column += $rangesize;
}
@ -1346,18 +1355,6 @@ sub replot
}
}
# function to add a point to the plot. Assumes that the curve indexed by $idx already exists
sub pushPoint
{
my ($curve, $datastring, $domain0_numeric) = @_;
push @{$curve->{datastring_meta}}, { offset_start => length( $curve->{datastring} ) + $curve->{datastring_offset},
domain => $domain0_numeric };
$curve->{datastring} .= $datastring;
$haveNewData = 1;
}
mainThread();