src/Tests/OneScript.Dynamic.Tests/Compiler_Api_Tests.cs - develop - smwwiki/OneScript_fork

src/Tests/OneScript.Dynamic.Tests/Compiler_Api_Tests.cs
196 строк5 KB
EvilBeaver
Выделена отдельная папка для инфраструктуры исключений
24 июл 2023, 22:46
24 июл 2023, 22:46d1c2e94
/*----------------------------------------------------------
This Source Code Form is subject to the terms of the
Mozilla Public License, v.2.0. If a copy of the MPL
was not distributed with this file, You can obtain one
at http://mozilla.org/MPL/2.0/.
----------------------------------------------------------*/

using System.Collections.Generic;
using FluentAssertions;
using OneScript.Language;
using OneScript.Language.SyntaxAnalysis;
using Xunit;

namespace OneScript.Dynamic.Tests
{
    public class Compiler_Api_Tests : CompilerTestBase
    {
        [Fact]
        public void CanCompile_Empty_Module()
        {
            var module = CreateModule("");
            Assert.Empty(module.Fields);
            Assert.Empty(module.Methods);
            module.ModuleBody.Should().BeNull();
        }

        [Fact]
        public void CanCompile_ModuleBody()
        {
            var module = CreateModule("А = 1");
            module.Methods.Should().HaveCount(1);
        }

        [Fact]
        public void CanCompile_Module_With_SeveralMethods()
        {
            var module = CreateModule(
                @"Процедура А()
                    Б = 1;
                КонецПроцедуры

                Процедура Б()
                    Б = 1;
                КонецПроцедуры

                В = 4;
                ");

            module.Methods.Should().HaveCount(3);
            module.ModuleBody.Should().NotBeNull();
        }
        
        [Fact]
        public void CanCompile_Module_With_AllSections()
        {
            var module = CreateModule(
                @"Перем Ы;

                Процедура А()
                    Б = 1;
                КонецПроцедуры

                Процедура Б()
                    Б = 1;
                КонецПроцедуры

                В = 4;
                ");
            
            module.Methods.Should().HaveCount(3);
            module.ModuleBody.Should().NotBeNull();
            module.Fields.Should().HaveCount(1);
        }
        
        [Fact]
        public void Detects_DuplicateVars_InModule()
        {
            List<CodeError> errors = new List<CodeError>();
            CreateModule(
                @"Перем Ы;
                Перем О;
                Перем Ы;
                ", errors);

            errors.Should().HaveCount(1);
            errors[0].ErrorId.Should().Be(nameof(LocalizedErrors.DuplicateVarDefinition));
        }
        
        [Fact]
        public void Detects_DuplicateMethods_InModule()
        {
            List<CodeError> errors = new List<CodeError>();
            CreateModule(
                @"Процедура А()
                    Б = 1;
                КонецПроцедуры

                Процедура А()
                    Б = 1;
                КонецПроцедуры
                ", errors);

            errors.Should().HaveCount(1);
            errors[0].ErrorId.Should().Be(nameof(LocalizedErrors.DuplicateMethodDefinition));
        }
        
        [Fact]
        public void Test_Variant_Conversions()
        {
            var code =
            @"Перем Стр;
            Перем Индекс;

            Стр = ""1"";
            Если Стр = ""2"" Тогда
            КонецЕсли;

            Индекс = 1;
            Символ = Сред(""АБВ"", Индекс, 1);";

            var errors = new List<CodeError>();
            CreateModule(code, errors);

            errors.Should().BeEmpty();
        }

        [Fact]
        public void Test_Min_Max_Functions()
        {
            var code = "Рез = Мин(0, 1); Рез = Макс(0, 1, 2, 3);";
            var errors = new List<CodeError>();
            CreateModule(code, errors);
            
            errors.Should().BeEmpty();
        }
        
        [Fact]
        public void CanCompile_Func()
        {
            var code = @"
            Функция Тест()
                Возврат 123;
            КонецФункции

            а = Тест();";
            
            var errors = new List<CodeError>();
            CreateModule(code, errors);
            
            errors.Should().BeEmpty();
        }

        [Fact]
        public void CanCompile_Proc_With_Return()
        {
            var code = @"
            Процедура Тест()
                Возврат;
            КонецПроцедуры

            Тест();";
            
            var errors = new List<CodeError>();
            CreateModule(code, errors);
            
            errors.Should().BeEmpty();
        }
        
        [Fact]
        public void Detects_Proc_As_Func_Invoke()
        {
            var code = @"
            Процедура Тест()
                
            КонецПроцедуры

            a = Тест();";
            
            var errors = new List<CodeError>();
            CreateModule(code, errors);
            
            errors.Should().HaveCount(1);
            errors[0].ErrorId.Should().Be(nameof(LocalizedErrors.UseProcAsFunction));
        }
        
        [Fact]
        public void Test_Conversion_To_Boolean_For_Decimals_In_BooleanExpressions()
        {
            var code = @"
            Номер = 0;
            Операнд = 2=2 И Номер+1;";

            CreateModule(code);
        }
    }
}