aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/implicit-declaration-errors/program.cps
diff options
context:
space:
mode:
author_ov4 <ov4@ov4.org>2026-10-30 14:23:32 +0000
committer_ov4 <ov4@ov4.org>2026-10-30 14:23:32 +0000
commit4cb0d9b196008bc55dbfcdac1f9211dbbc879895 (patch)
tree0d95a2682ef26455483c4bb9222e1dff0d5c8e69 /tests/iii/implicit-declaration-errors/program.cps
parent63109537383fa58c6a1db95f275d6b5de63b0015 (diff)
feat(types): support implicit single-argument constructors
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Diffstat (limited to 'tests/iii/implicit-declaration-errors/program.cps')
-rw-r--r--tests/iii/implicit-declaration-errors/program.cps21
1 files changed, 21 insertions, 0 deletions
diff --git a/tests/iii/implicit-declaration-errors/program.cps b/tests/iii/implicit-declaration-errors/program.cps
new file mode 100644
index 0000000..31cd23c
--- /dev/null
+++ b/tests/iii/implicit-declaration-errors/program.cps
@@ -0,0 +1,21 @@
+CLASS Invalid
+ IMPLICIT PROCEDURE NEW()
+ ENDPROCEDURE
+ENDCLASS
+CLASS RefInvalid
+ IMPLICIT PROCEDURE NEW(BYREF Value : INTEGER)
+ ENDPROCEDURE
+ENDCLASS
+CLASS ArrayInvalid
+ IMPLICIT PROCEDURE NEW(Value : ARRAY OF INTEGER)
+ ENDPROCEDURE
+ENDCLASS
+CLASS MethodInvalid
+ IMPLICIT PROCEDURE Convert(Value : INTEGER)
+ ENDPROCEDURE
+ENDCLASS
+CLASS PairInvalid
+ IMPLICIT PROCEDURE NEW(A : INTEGER, B : INTEGER)
+ ENDPROCEDURE
+ENDCLASS
+OUTPUT 1