Lines Matching refs:try
21 my ($args, $op, $target, $test, $test_set, $try, $val, $zvalue, @set, @val);
364 $try = "abs(\$z0 - \$z1) <= $eps ? \$z1 : \$z0";
365 push @script, "\$res = $try; ";
368 my ($try, $args);
370 $try = "$op \$z0";
373 $try = ($op =~ /^\w/) ? "$op(\$z0, \$z1)" : "\$z0 $op \$z1";
376 push @script, "\$res = $try; ";
377 push @script, "check($test, '$try', \$res, \$z$#args, $args);\n";
445 my ($test, $try, $got, $expected, @z) = @_;
459 print "# '$try' expected: '$expected' got: '$got' for $args\n";