fixed EvilBeaver#158 Не компилируется конструкция вызова процедуры через точку от глобальной функции

EvilBeaver · EvilBeaver · commit 166b580616fa · 2015-07-06T18:28:34.000+03:00
diff --git a/src/ScriptEngine/Compiler/Compiler.cs b/src/ScriptEngine/Compiler/Compiler.cs
@@ -922,7 +922,7 @@ private void BuildSimpleStatement()
                     BuildLoadVariable(identifier);
                     break;
                 case Token.OpenPar:
-                    BuildProcedureCall(identifier);
+                    ProcessCallOnLeftHand(identifier);
                     break;
                 case Token.Dot:
                 case Token.OpenBracket:
@@ -935,6 +935,21 @@ private void BuildSimpleStatement()
             }
         }
 
+        private void ProcessCallOnLeftHand(string identifier)
+        {
+            var args = PushMethodArgumentsBeforeCall();
+            if(IsContinuationToken(ref _lastExtractedLexem))
+            {
+                BuildMethodCall(identifier, args, true);
+                BuildAccessChainLeftHand();
+            }
+            else
+            {
+                BuildMethodCall(identifier, args, false);
+            }
+
+        }
+
         private void BuildAccessChainLeftHand()
         {
             string ident;
@@ -960,8 +975,8 @@ private void BuildAccessChainLeftHand()
                 cDef.Type = DataType.String;
                 cDef.Presentation = ident;
                 int lastIdentifierConst = GetConstNumber(ref cDef);
-                
-                if (_lastExtractedLexem.Token == Token.Dot || _lastExtractedLexem.Token == Token.OpenBracket)
+
+                if (IsContinuationToken(ref _lastExtractedLexem))
                 {
                     AddCommand(OperationCode.ResolveMethodFunc, lastIdentifierConst);
                     BuildAccessChainLeftHand();
@@ -974,6 +989,11 @@ private void BuildAccessChainLeftHand()
             }
         }
 
+        private bool IsContinuationToken(ref Lexem lex)
+        {
+            return lex.Token == Token.Dot || lex.Token == Token.OpenBracket;
+        }
+
         private void BuildExpression(Token stopToken)
         {
             BuildPrimaryNode();
@@ -1154,7 +1174,7 @@ private void ProcessPrimaryIdentifier()
         {
             var identifier = _lastExtractedLexem.Content;
             NextToken();
-            if (_lastExtractedLexem.Token == Token.Dot || _lastExtractedLexem.Token == Token.OpenBracket)
+            if (IsContinuationToken(ref _lastExtractedLexem))
             {
                 BuildPushVariable(identifier);
                 BuildContinuationRightHand();
diff --git a/tests/engine-behaviors.os b/tests/engine-behaviors.os
@@ -29,6 +29,7 @@
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьОператорВопросаПоЛожь");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьМаршаллингУникальныхИдентификаторовИПеречислений");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьВложенностьПробрасываемыхИсключений");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьКомпиляциюОбращенияКВозвращаемомуОбъектуЧерезТочку");
 	
 	Возврат ВсеТесты;
 	
@@ -103,6 +104,10 @@
 	
 КонецПроцедуры
 
+Функция ФункцияВозвращаетОбъект()
+	Возврат Новый Структура;
+КонецФункции
+
 Процедура ТестДолжен_ПроверитьРазыменованияВПравойЧастиВыражения() Экспорт
 
 	Объект = Новый Структура("Свойство1",
@@ -226,3 +231,12 @@
 	КонецПопытки;
 	
 КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьКомпиляциюОбращенияКВозвращаемомуОбъектуЧерезТочку() Экспорт
+	ФункцияВозвращаетОбъект().Вставить("Свойство");
+	Попытка
+		ФункцияВозвращаетОбъект().Свойство = "Привет";
+	Исключение // здесь проверяется возможность компиляции, если скрипт запустился, значит тест прошел.
+			   // поэтому исключение проглатывается
+	КонецПопытки;
+КонецПроцедуры
