aboutsummaryrefslogtreecommitdiff
path: root/tests/ii/overload-methods/generate.pl
diff options
context:
space:
mode:
author_ov4 <ov4@ov4.org>2026-10-17 10:39:45 +0000
committer_ov4 <ov4@ov4.org>2026-10-17 10:39:45 +0000
commit4a34e970fb224be7640883f6b0dfa602157759f4 (patch)
tree3f2e0a54163b179b411e604b6362c08cb1075d3d /tests/ii/overload-methods/generate.pl
parentb47c302bbffd668334f307d512b674f804f8f2fc (diff)
test(overload): add randomized differential coverage
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Diffstat (limited to 'tests/ii/overload-methods/generate.pl')
-rw-r--r--tests/ii/overload-methods/generate.pl19
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/ii/overload-methods/generate.pl b/tests/ii/overload-methods/generate.pl
new file mode 100644
index 0000000..6ea50f2
--- /dev/null
+++ b/tests/ii/overload-methods/generate.pl
@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+use FindBin;
+use lib "$FindBin::Bin/..";
+use Random;
+my ($seed, $count) = @ARGV;
+my $rng = Random->new($seed, "overload-methods");
+my @edges = (
+ '0 0 1 x',
+ '-1000 1000 8 boundary',
+ '1000 -1000 8 z',
+ '0 24 2 equal',
+ '0 23 2 below',
+ '0 25 2 above',
+);
+$rng->emit($count, \@edges, sub {
+ return join ' ', $rng->integer(-1000,1000), $rng->integer(-1000,1000),
+ $rng->integer(1,8), 'x' x $rng->integer(1,24);
+});