diff options
Diffstat (limited to 'tests/iii/class-destructor-parameters-error')
| -rw-r--r-- | tests/iii/class-destructor-parameters-error/case.json | 8 | ||||
| -rw-r--r-- | tests/iii/class-destructor-parameters-error/program.cps | 4 |
2 files changed, 12 insertions, 0 deletions
diff --git a/tests/iii/class-destructor-parameters-error/case.json b/tests/iii/class-destructor-parameters-error/case.json new file mode 100644 index 0000000..6b2f839 --- /dev/null +++ b/tests/iii/class-destructor-parameters-error/case.json @@ -0,0 +1,8 @@ +{ + "errors": [ + { + "reason": "destructor DELETE must have no parameters", + "line": 2 + } + ] +} diff --git a/tests/iii/class-destructor-parameters-error/program.cps b/tests/iii/class-destructor-parameters-error/program.cps new file mode 100644 index 0000000..a3d9fd7 --- /dev/null +++ b/tests/iii/class-destructor-parameters-error/program.cps @@ -0,0 +1,4 @@ +CLASS Box +PROCEDURE DELETE(x : INTEGER) +ENDPROCEDURE +ENDCLASS |