Mark all APIs that call Assembly.GetCallingAssembly with `[Requires…

…DynamicCode]`.

src/coreclr/nativeaot/System.Private.CoreLib/src/System/Reflection/Assembly.NativeAot.cs

@@ -17,7 +17,7 @@ public abstract partial class Assembly : ICustomAttributeProvider, ISerializable
 
         [System.Runtime.CompilerServices.Intrinsic]
         public static Assembly GetExecutingAssembly() { throw NotImplemented.ByDesign; } //Implemented by toolchain.
-        
+
         [RequiresDynamicCode("Assembly.GetCallingAssembly is not supported in AOT environments.")]
         public static Assembly GetCallingAssembly()
         {
@@ -56,5 +56,5 @@ public static Assembly LoadWithPartialName(string partialName)
                 return null;
             }
         }
-   }
+    }
 }

src/libraries/Microsoft.VisualBasic.Core/ref/Microsoft.VisualBasic.Core.cs

@@ -316,6 +316,7 @@ internal ErrObject() { }
         public string Source { get { throw null; } set { } }
         public void Clear() { }
         public System.Exception? GetException() { throw null; }
+        [System.Diagnostics.CodeAnalysis.RequiresDynamicCodeAttribute("ErrObject.Raise is not supported in AOT environments. Throw exceptions with the Throw keyword instead.")]
         public void Raise(int Number, object? Source = null, object? Description = null, object? HelpFile = null, object? HelpContext = null) { }
     }
     [System.FlagsAttribute]
@@ -329,6 +330,7 @@ public enum FileAttribute
         Directory = 16,
         Archive = 32,
     }
+    [System.Diagnostics.CodeAnalysis.RequiresDynamicCodeAttribute("The FileSystem module is not supported in AOT environments. Use members of the System.IO namespace instead.")]
     [Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]
     public sealed partial class FileSystem
     {
@@ -1146,6 +1148,7 @@ public sealed partial class ProjectData
         internal ProjectData() { }
         public static void ClearProjectError() { }
         public static System.Exception CreateProjectError(int hr) { throw null; }
+        [System.Diagnostics.CodeAnalysis.RequiresDynamicCodeAttribute("ProjectData.EndApp is not supported in AOT environments. Use System.Environment.Exit(0) instead.")]
         public static void EndApp() { }
         public static void SetProjectError(System.Exception? ex) { }
         public static void SetProjectError(System.Exception? ex, int lErl) { }

src/libraries/Microsoft.VisualBasic.Core/src/Microsoft/VisualBasic/CompilerServices/ProjectData.vb

@@ -2,6 +2,7 @@
 ' The .NET Foundation licenses this file to you under the MIT license.
 
 Imports System
+Imports System.Diagnostics.CodeAnalysis
 
 Namespace Global.Microsoft.VisualBasic.CompilerServices
 
@@ -177,6 +178,7 @@ Namespace Global.Microsoft.VisualBasic.CompilerServices
             Err.Clear()
         End Sub
 
+        <RequiresDynamicCode("ProjectData.EndApp is not supported in AOT environments. Use System.Environment.Exit(0) instead.")>
         Public Shared Sub EndApp()
             FileSystem.CloseAllFiles(System.Reflection.Assembly.GetCallingAssembly())
             System.Environment.Exit(0) 'System.Environment.Exit will cause finalizers to be run at shutdown

src/libraries/Microsoft.VisualBasic.Core/src/Microsoft/VisualBasic/ErrObject.vb

@@ -5,6 +5,7 @@ Imports Microsoft.VisualBasic.CompilerServices
 Imports Microsoft.VisualBasic.CompilerServices.Utils
 
 Imports System
+Imports System.Diagnostics.CodeAnalysis
 Imports System.Runtime.InteropServices
 
 Namespace Microsoft.VisualBasic
@@ -269,6 +270,7 @@ Namespace Microsoft.VisualBasic
         ''' <param name="Description">If not supplied, we try to look one up based on the error code being raised</param>
         ''' <param name="HelpFile"></param>
         ''' <param name="HelpContext"></param>
+        <RequiresDynamicCode("ErrObject.Raise is not supported in AOT environments. Throw exceptions with the Throw keyword instead.")>
         Public Sub Raise(ByVal Number As Integer,
                          Optional ByVal Source As Object = Nothing,
                          Optional ByVal Description As Object = Nothing,

src/libraries/Microsoft.VisualBasic.Core/src/Microsoft/VisualBasic/FileSystem.vb

@@ -16,6 +16,7 @@ Imports Microsoft.VisualBasic.CompilerServices.Utils
 
 Namespace Microsoft.VisualBasic
 
+    <RequiresDynamicCode("The FileSystem module is not supported in AOT environments. Use members of the System.IO namespace instead.")>
     Public Module FileSystem
 
         Private Const ERROR_FILE_NOT_FOUND As Integer = 2