более абстрактный тип для динамического поика методов

Author: Mr-Rm

src/OneScript.Core/Exceptions/IExceptionInfoFactory.cs

@@ -16,7 +16,7 @@ namespace OneScript.Exceptions
     /// </summary>
     public interface IExceptionInfoFactory
     {
-        BslObjectValue GetExceptionInfo(Exception exception);
+        BslValue GetExceptionInfo(Exception exception);
 
         string GetExceptionDescription(IRuntimeContextInstance exceptionInfo);
 

src/OneScript.Native/Compiler/MethodCompiler.cs

@@ -1363,7 +1363,9 @@ private Expression GetRuntimeExceptionDescription()
             var excVariable = _blocks.GetCurrentBlock().CurrentException;
             Expression factoryArgument;
             // нас вызвали вне попытки-исключения
-            factoryArgument = excVariable == null ? Expression.Constant(null, typeof(IRuntimeContextInstance)) : GetRuntimeExceptionObject();
+            //factoryArgument = excVariable == null ? Expression.Constant(null, typeof(IRuntimeContextInstance)) : GetRuntimeExceptionObject();
+            factoryArgument = excVariable == null ? Expression.Constant(null, typeof(IRuntimeContextInstance))
+                : ExpressionHelpers.ConvertToType(GetRuntimeExceptionObject(), typeof(IRuntimeContextInstance));
 
             var factory = Expression.Constant(ExceptionInfoFactory);
             return ExpressionHelpers.CallOfInstanceMethod(

src/OneScript.Native/Runtime/DynamicOperations.cs

@@ -134,7 +134,7 @@ public static T StrictConstructorCall<T>(ITypeManager typeManager, IServiceConta
             where T : BslValue
             => (T)ConstructorCall(typeManager, services, typeName, process, args);
 
-        public static BslObjectValue GetExceptionInfo(IExceptionInfoFactory factory, Exception e)
+        public static BslValue GetExceptionInfo(IExceptionInfoFactory factory, Exception e)
             => factory.GetExceptionInfo(e);
 
         public static BslTypeValue GetTypeByName(ITypeManager manager, string name)

src/ScriptEngine/Machine/ExceptionInfoFactory.cs

@@ -27,7 +27,7 @@ public ExceptionInfoFactory(IBslProcessFactory processFactory)
             _processFactory = processFactory;
         }
 
-        public BslObjectValue GetExceptionInfo(Exception exception)
+        public BslValue GetExceptionInfo(Exception exception)
         {
             if (exception == null)
             {