diff options
Diffstat (limited to 'tests/iii/implicit-declaration-errors/program.cps')
| -rw-r--r-- | tests/iii/implicit-declaration-errors/program.cps | 21 |
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 |