aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/class-destructor-duplicate-error
diff options
context:
space:
mode:
Diffstat (limited to 'tests/iii/class-destructor-duplicate-error')
-rw-r--r--tests/iii/class-destructor-duplicate-error/case.json8
-rw-r--r--tests/iii/class-destructor-duplicate-error/program.cps6
2 files changed, 14 insertions, 0 deletions
diff --git a/tests/iii/class-destructor-duplicate-error/case.json b/tests/iii/class-destructor-duplicate-error/case.json
new file mode 100644
index 0000000..3ffc750
--- /dev/null
+++ b/tests/iii/class-destructor-duplicate-error/case.json
@@ -0,0 +1,8 @@
+{
+ "errors": [
+ {
+ "reason": "Duplicate member delete in class Box",
+ "line": 4
+ }
+ ]
+}
diff --git a/tests/iii/class-destructor-duplicate-error/program.cps b/tests/iii/class-destructor-duplicate-error/program.cps
new file mode 100644
index 0000000..661a9c2
--- /dev/null
+++ b/tests/iii/class-destructor-duplicate-error/program.cps
@@ -0,0 +1,6 @@
+CLASS Box
+PROCEDURE DELETE()
+ENDPROCEDURE
+PROCEDURE delete()
+ENDPROCEDURE
+ENDCLASS