From 8a8ab9a2722021337d37cd122f43a48780078d2e Mon Sep 17 00:00:00 2001 From: Ivan Bondarev Date: Sun, 18 Apr 2021 10:16:42 +0200 Subject: [PATCH] #2475 --- TestSuite/params13.pas | 4 ++++ TreeConverter/TreeConversion/syntax_tree_visitor.cs | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) create mode 100644 TestSuite/params13.pas diff --git a/TestSuite/params13.pas b/TestSuite/params13.pas new file mode 100644 index 000000000..e83112229 --- /dev/null +++ b/TestSuite/params13.pas @@ -0,0 +1,4 @@ +begin + var s := 'asd fas dfa'.Split[^1]; + assert(s = 'dfa'); +end. \ No newline at end of file diff --git a/TreeConverter/TreeConversion/syntax_tree_visitor.cs b/TreeConverter/TreeConversion/syntax_tree_visitor.cs index be741d3d9..ba1cfd8db 100644 --- a/TreeConverter/TreeConversion/syntax_tree_visitor.cs +++ b/TreeConverter/TreeConversion/syntax_tree_visitor.cs @@ -16344,7 +16344,7 @@ namespace PascalABCCompiler.TreeConverter indexer_as_property_indexes(nspr, _indexer.indexes, mot, lloc11); return; } - expression_node en2 = expression_value_reciving(id, sil, ex, false); + expression_node en2 = convert_strong(_indexer.dereferencing_value);//expression_value_reciving(id, sil, ex, false); indexer_as_expression_index(en2, _indexer.indexes, mot, get_location(id)); return; }