Allow WarningEmitted handlers to throw exceptions

Author: Quahu

src/Laylua.Tests/Tests/Library/LuaTests.cs

@@ -428,4 +428,29 @@ public void Warn_CustomControlMessage_TriggersWarningEventWithIsControlTrue()
         // Assert
         Assert.That(actualWarnings, Is.EqualTo(expectedWarnings));
     }
+
+    [Test]
+    public void Warn_ThrowingExceptionEventHandler_Errors()
+    {
+        // Arrange
+        const string ExceptionMessage = "Warning event handler exception.";
+
+        Lua.OpenLibrary(LuaLibraries.Standard.Base);
+        Lua.WarningEmitted += static (_, _) => throw new Exception(ExceptionMessage);
+
+        // Act & Assert
+        Assert.That(() => Lua.Execute("warn('')"), Throws.TypeOf<LuaException>().With.InnerException.Not.Null.And.InnerException.Message.EqualTo(ExceptionMessage));
+    }
+
+    [Test]
+    public void EmitWarning_ThrowingExceptionEventHandler_Throws()
+    {
+        // Arrange
+        const string ExceptionMessage = "Warning event handler exception.";
+
+        Lua.WarningEmitted += static (_, _) => throw new Exception(ExceptionMessage);
+
+        // Act & Assert
+        Assert.That(() => Lua.EmitWarning(""), Throws.TypeOf<LuaPanicException>().With.InnerException.Not.Null.And.InnerException.Message.EqualTo(ExceptionMessage));
+    }
 }

src/Laylua/Library/Lua.Warnings.cs

@@ -28,9 +28,6 @@ public sealed unsafe partial class Lua
     ///     See <a href="https://www.lua.org/manual/5.4/manual.html#2.3">Error Handling (Lua manual)</a> and
     ///     <a href="https://www.lua.org/manual/5.4/manual.html#pdf-warn"><c>warn (msg1, ···) (Lua Manual)</c></a> for more information about warnings.
     /// </summary>
-    /// <remarks>
-    ///     Subscribed event handlers must not throw any exceptions.
-    /// </remarks>
     public event LuaWarningEventHandler? WarningEmitted;
 
     private MemoryStream? _warningBuffer;
@@ -99,7 +96,14 @@ static void InvokeWarningEmitted(Lua lua, ReadOnlySpan<byte> msgSpan)
 
             using (message)
             {
-                lua.WarningEmitted?.Invoke(lua, new LuaWarningEmittedEventArgs(message));
+                try
+                {
+                    lua.WarningEmitted?.Invoke(lua, new LuaWarningEmittedEventArgs(message));
+                }
+                catch (Exception ex)
+                {
+                    LuaException.RaiseErrorInfo(lua.GetStatePointer(), "An exception occurred while invoking the warning event.", ex);
+                }
             }
         }