From abd56ef20bc8061bbecec29edd1301d324c2cb34 Mon Sep 17 00:00:00 2001 From: _ov4 Date: Sat, 17 Oct 2026 08:34:42 +0000 Subject: feat(classes): destroy stack objects at scope exit Co-Authored-By: Claude Opus 5.5 --- tests/iii/class-destructor-private-error/case.json | 12 ++++++++++++ tests/iii/class-destructor-private-error/program.cps | 6 ++++++ 2 files changed, 18 insertions(+) create mode 100644 tests/iii/class-destructor-private-error/case.json create mode 100644 tests/iii/class-destructor-private-error/program.cps (limited to 'tests/iii') diff --git a/tests/iii/class-destructor-private-error/case.json b/tests/iii/class-destructor-private-error/case.json new file mode 100644 index 0000000..4753d68 --- /dev/null +++ b/tests/iii/class-destructor-private-error/case.json @@ -0,0 +1,12 @@ +{ + "errors": [ + { + "reason": "private", + "line": 5 + }, + { + "reason": "private", + "line": 6 + } + ] +} diff --git a/tests/iii/class-destructor-private-error/program.cps b/tests/iii/class-destructor-private-error/program.cps new file mode 100644 index 0000000..8bd122c --- /dev/null +++ b/tests/iii/class-destructor-private-error/program.cps @@ -0,0 +1,6 @@ +CLASS Secret +PRIVATE PROCEDURE DELETE() +ENDPROCEDURE +ENDCLASS +DECLARE Obj : Secret +DELETE Obj -- cgit v1.3.1-4-g156e