Cleanup some unused code and signature (#112905)

* EventArgs and EventHandler

* StringObject::CaseInsensitiveCompHelper

* AllocateCharArray

---------

Co-authored-by: Manish Godse <[email protected]>
Co-authored-by: Jan Kotas <[email protected]>

Author: 3 people

src/coreclr/vm/corelib.h

@@ -307,10 +307,6 @@ DEFINE_METHOD(ENVIRONMENT,       INITIALIZE_COMMAND_LINE_ARGS, InitializeCommand
 
 DEFINE_CLASS(EVENT,                 Reflection,             RuntimeEventInfo)
 
-DEFINE_CLASS(EVENT_ARGS,            System,                 EventArgs)
-
-DEFINE_CLASS(EVENT_HANDLERGENERIC,  System,                 EventHandler`1)
-
 DEFINE_CLASS(EVENT_INFO,            Reflection,             EventInfo)
 
 DEFINE_CLASS_U(System,                 Exception,      ExceptionObject)

src/coreclr/vm/metasig.h

@@ -449,7 +449,6 @@ DEFINE_METASIG(IM(Int_RetBool, i, F))
 DEFINE_METASIG(IM(Int_Int_RetVoid, i i, v))
 DEFINE_METASIG(IM(Int_Int_Int_RetVoid, i i i, v))
 DEFINE_METASIG(IM(Int_Int_Int_Int_RetVoid, i i i i, v))
-DEFINE_METASIG_T(IM(Obj_EventArgs_RetVoid, j C(EVENT_ARGS), v))
 
 DEFINE_METASIG_T(IM(Exception_RetVoid, C(EXCEPTION), v))
 

src/coreclr/vm/object.cpp

@@ -301,18 +301,6 @@ STRINGREF AllocateString(SString sstr)
     return strObj;
 }
 
-CHARARRAYREF AllocateCharArray(DWORD dwArrayLength)
-{
-    CONTRACTL
-    {
-        THROWS;
-        GC_TRIGGERS;
-        MODE_COOPERATIVE;
-    }
-    CONTRACTL_END;
-    return (CHARARRAYREF)AllocatePrimitiveArray(ELEMENT_TYPE_CHAR, dwArrayLength);
-}
-
 void Object::ValidateHeap(BOOL bDeep)
 {
     STATIC_CONTRACT_NOTHROW;
@@ -899,71 +887,6 @@ STRINGREF* StringObject::InitEmptyStringRefPtr() {
     return EmptyStringRefPtr;
 }
 
-// strAChars must be null-terminated, with an appropriate aLength
-// strBChars must be null-terminated, with an appropriate bLength OR bLength == -1
-// If bLength == -1, we stop on the first null character in strBChars
-BOOL StringObject::CaseInsensitiveCompHelper(_In_reads_(aLength) WCHAR *strAChars, _In_z_ INT8 *strBChars, INT32 aLength, INT32 bLength, INT32 *result) {
-    CONTRACTL {
-        NOTHROW;
-        GC_NOTRIGGER;
-        MODE_ANY;
-        PRECONDITION(CheckPointer(strAChars));
-        PRECONDITION(CheckPointer(strBChars));
-        PRECONDITION(CheckPointer(result));
-    } CONTRACTL_END;
-
-    WCHAR *strAStart = strAChars;
-    INT8  *strBStart = strBChars;
-    unsigned charA;
-    unsigned charB;
-
-    while (true)
-    {
-        charA = *strAChars;
-        charB = (unsigned) *strBChars;
-
-        //Case-insensitive comparison on chars greater than 0x7F
-        //requires a locale-aware casing operation and we're not going there.
-        if ((charA|charB)>0x7F) {
-            *result = 0;
-            return FALSE;
-        }
-
-        // uppercase both chars.
-        if (charA>='a' && charA<='z') {
-            charA ^= 0x20;
-        }
-        if (charB>='a' && charB<='z') {
-            charB ^= 0x20;
-        }
-
-        //Return the (case-insensitive) difference between them.
-        if (charA!=charB) {
-            *result = (int)(charA-charB);
-            return TRUE;
-        }
-
-
-        if (charA==0)   // both strings have null character
-        {
-            if (bLength == -1)
-            {
-                *result = aLength - static_cast<INT32>(strAChars - strAStart);
-                return TRUE;
-            }
-            if (strAChars==strAStart + aLength || strBChars==strBStart + bLength)
-            {
-                *result = aLength - bLength;
-                return TRUE;
-            }
-            // else both embedded zeros
-        }
-
-        // Next char
-        strAChars++; strBChars++;
-    }
-}
-
 /*============================InternalTrailByteCheck============================
 **Action: Many years ago, VB didn't have the concept of a byte array, so enterprising
 **        users created one by allocating a BSTR with an odd length and using it to

src/coreclr/vm/object.h

@@ -921,7 +921,6 @@ class StringObject : public Object
     BOOL HasTrailByte();
     BOOL GetTrailByte(BYTE *bTrailByte);
     BOOL SetTrailByte(BYTE bTrailByte);
-    static BOOL CaseInsensitiveCompHelper(_In_reads_(aLength) WCHAR * strA, _In_z_ INT8 * strB, int aLength, int bLength, int *result);
 
     /*=================RefInterpretGetStringValuesDangerousForGC======================
     **N.B.: This performs no range checking and relies on the caller to have done this.
@@ -1580,7 +1579,6 @@ typedef PTR_AssemblyNameBaseObject ASSEMBLYNAMEREF;
 #define ArgSlotToBool(s)  ((BOOL)(s))
 
 STRINGREF AllocateString(SString sstr);
-CHARARRAYREF AllocateCharArray(DWORD dwArrayLength);
 
 #ifdef FEATURE_COMINTEROP