aboutsummaryrefslogtreecommitdiff
path: root/tests/ii/overload-functions/program.cps
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-functions/program.cps
parentb47c302bbffd668334f307d512b674f804f8f2fc (diff)
test(overload): add randomized differential coverage
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Diffstat (limited to 'tests/ii/overload-functions/program.cps')
-rw-r--r--tests/ii/overload-functions/program.cps33
1 files changed, 33 insertions, 0 deletions
diff --git a/tests/ii/overload-functions/program.cps b/tests/ii/overload-functions/program.cps
new file mode 100644
index 0000000..ea94a93
--- /dev/null
+++ b/tests/ii/overload-functions/program.cps
@@ -0,0 +1,33 @@
+INCLUDE "scalar.cps"
+INCLUDE "arrays.cps"
+DECLARE Count : INTEGER
+DECLARE Row : INTEGER
+DECLARE A : INTEGER
+DECLARE B : INTEGER
+DECLARE Size : INTEGER
+DECLARE Lower : INTEGER
+DECLARE Text : STRING
+DECLARE I : INTEGER
+DECLARE Changed : INTEGER
+INPUT Count
+FOR Row <- 1 TO Count
+ INPUT A
+ INPUT B
+ INPUT Size
+ INPUT Lower
+ INPUT Text
+ DECLARE Integers : ARRAY[Lower:Lower+Size-1] OF INTEGER
+ DECLARE Reals : ARRAY[Lower:Lower+Size-1] OF REAL
+ DECLARE Matrix : ARRAY[1:2,1:2] OF INTEGER
+ FOR I <- Lower TO Lower + Size - 1
+ Integers[I] <- A + (I - Lower) * B
+ Reals[I] <- (A + (I - Lower) * B) / 8
+ NEXT I
+ Matrix[1,1] <- A
+ Matrix[1,2] <- B
+ Matrix[2,1] <- A + B
+ Matrix[2,2] <- A - B
+ Changed <- A
+ CALL sCoRe(Changed, B, Size)
+ OUTPUT Score(A), ":", Score(A / 8), ":", Score(Text), ":", Score(A, B), ":", Score(Integers, Lower, Size), ":", Score(Reals, Lower, Size), ":", Score(Matrix, Lower, Size), ":", Score(Score(A)), ":", Changed, ":", A
+NEXT Row