diff options
Diffstat (limited to 'tests/iii/class-constructor-default-errors/program.cps')
| -rw-r--r-- | tests/iii/class-constructor-default-errors/program.cps | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/tests/iii/class-constructor-default-errors/program.cps b/tests/iii/class-constructor-default-errors/program.cps new file mode 100644 index 0000000..43dfef7 --- /dev/null +++ b/tests/iii/class-constructor-default-errors/program.cps @@ -0,0 +1,21 @@ +CLASS Required + PROCEDURE NEW(Number : INTEGER) + ENDPROCEDURE +ENDCLASS +CLASS Plain + Value : INTEGER +ENDCLASS +CLASS Hidden + PRIVATE PROCEDURE NEW() + ENDPROCEDURE +ENDCLASS +TYPE Wrapped + DECLARE Item : Required +ENDTYPE +DECLARE Missing : Required +DECLARE EmptyArgs : Required() +DECLARE Extra : Plain(1) +DECLARE PrivateObject : Hidden +DECLARE Items : ARRAY[1:2] OF Required +DECLARE Nested : Wrapped +DECLARE Scalar : INTEGER() |