diff options
Diffstat (limited to 'testsuite')
6 files changed, 44 insertions, 0 deletions
diff --git a/testsuite/fail_compilation/import_local_collision/helper.elna b/testsuite/fail_compilation/import_local_collision/helper.elna new file mode 100644 index 0000000..d6e3712 --- /dev/null +++ b/testsuite/fail_compilation/import_local_collision/helper.elna @@ -0,0 +1,6 @@ +var + X*: Int + +begin + X := 1 +end. diff --git a/testsuite/fail_compilation/import_local_collision/sut.elna b/testsuite/fail_compilation/import_local_collision/sut.elna new file mode 100644 index 0000000..a9de9c9 --- /dev/null +++ b/testsuite/fail_compilation/import_local_collision/sut.elna @@ -0,0 +1,7 @@ +import helper + +var + X: Int (* @Error Symbol 'X' has been already defined *) + +begin +end. diff --git a/testsuite/fail_compilation/record_duplicate_field.elna b/testsuite/fail_compilation/record_duplicate_field.elna new file mode 100644 index 0000000..b98f990 --- /dev/null +++ b/testsuite/fail_compilation/record_duplicate_field.elna @@ -0,0 +1,8 @@ +type + R = record + x: Int; + x: Int (* @Error Record already has a field named 'x' *) + end + +begin +end. diff --git a/testsuite/fail_compilation/record_duplicate_field_import_base/helper.elna b/testsuite/fail_compilation/record_duplicate_field_import_base/helper.elna new file mode 100644 index 0000000..0edb965 --- /dev/null +++ b/testsuite/fail_compilation/record_duplicate_field_import_base/helper.elna @@ -0,0 +1,7 @@ +type + Parent* = record + x: Int; + y: Int + end + +end. diff --git a/testsuite/fail_compilation/record_duplicate_field_import_base/sut.elna b/testsuite/fail_compilation/record_duplicate_field_import_base/sut.elna new file mode 100644 index 0000000..7530017 --- /dev/null +++ b/testsuite/fail_compilation/record_duplicate_field_import_base/sut.elna @@ -0,0 +1,10 @@ +import helper + +type + Child = record(Parent) + x: Int (* @Error Record already has a field named 'x' \(defined in base type 'Parent'\) *); + z: Int + end + +begin +end. diff --git a/testsuite/fail_compilation/redefined_variable.elna b/testsuite/fail_compilation/redefined_variable.elna new file mode 100644 index 0000000..9cf8c24 --- /dev/null +++ b/testsuite/fail_compilation/redefined_variable.elna @@ -0,0 +1,6 @@ +var + x: Int + x: Int (* @Error Symbol 'x' has been already defined *) + +begin +end. |