1'
2' Visual Basic.Net Compiler
3' Copyright (C) 2004 - 2010 Rolf Bjarne Kvinge, RKvinge@novell.com
4'
5' This library is free software; you can redistribute it and/or
6' modify it under the terms of the GNU Lesser General Public
7' License as published by the Free Software Foundation; either
8' version 2.1 of the License, or (at your option) any later version.
9'
10' This library is distributed in the hope that it will be useful,
11' but WITHOUT ANY WARRANTY; without even the implied warranty of
12' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13' Lesser General Public License for more details.
14'
15' You should have received a copy of the GNU Lesser General Public
16' License along with this library; if not, write to the Free Software
17' Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
18'
19
20Public MustInherit Class TypeCacheBase
21    Private m_Compiler As Compiler
22
23    Sub New(ByVal Compiler As Compiler)
24        m_Compiler = Compiler
25    End Sub
26
27    ReadOnly Property Compiler() As Compiler
28        Get
29            Return m_Compiler
30        End Get
31    End Property
32
33#If DEBUG Then
34    'This method will generate the other partial TypeCache class.
35    Shared Sub Generate()
36        Dim path As String = "..\source\General\"
37        Dim file As String = path & "TypeCache.in"
38        Dim filename As String = IO.Path.GetFullPath(file)
39        Dim content As String = IO.File.ReadAllText(filename)
40        Dim lines As String() = content.Split(New String() {VB.vbCr, VB.vbLf, VB.vbCrLf}, StringSplitOptions.RemoveEmptyEntries)
41
42        Dim cecil As New System.Text.StringBuilder
43        Dim all As New System.Text.StringBuilder
44
45        all.AppendLine(VB.Join(content.Substring(0, content.IndexOf("''") - 1).Split(New String() {VB.vbCr, VB.vbLf, VB.vbCrLf}, StringSplitOptions.RemoveEmptyEntries), Environment.NewLine))
46
47        cecil.AppendLine("Public Partial Class CecilTypeCache")
48        cecil.AppendLine(Generate(lines))
49        cecil.AppendLine("End Class")
50
51        all.AppendLine(cecil.ToString)
52
53        IO.File.WriteAllText(path & "TypeCache.Generated.vb", all.ToString)
54
55        IO.File.Copy(IO.Path.Combine(path, "TypeCache.vb"), IO.Path.Combine(path, "TypeCache.vb.old"), True)
56
57        Dim oldContents As String = IO.File.ReadAllText(IO.Path.Combine(path, "TypeCache.vb"))
58        Dim iStart As Integer = oldContents.IndexOf("'START" & " SRE") + ("'START " & "SRE").Length + 2
59        Dim iEnd As Integer = oldContents.IndexOf("'END SRE", iStart) - 2
60        oldContents = oldContents.Remove(iStart, iEnd - iStart)
61        oldContents = oldContents.Insert(iStart, all.ToString())
62        IO.File.WriteAllText(IO.Path.Combine(path, "TypeCache.vb"), oldContents)
63        System.Diagnostics.Debug.WriteLine("Written TypeCache.vb, saved to TypeCache.vb.old")
64    End Sub
65
66    Shared Function Generate(ByVal Lines As String()) As String
67        Dim variables As New System.Text.StringBuilder
68        Dim getters As New System.Text.StringBuilder
69        Dim vbtypes As New System.Text.StringBuilder
70        Dim vbmembers As New System.Text.StringBuilder
71
72        'Turns out using public fields instead of private fields with property getters is about 10% faster during bootstrapping.
73        'Quite possibly because there's quite more code to compile with the properties
74        Dim publicfields As Boolean = True
75
76        If publicfields Then
77            getters.AppendLine("    Protected Overrides Sub InitInternal ()")
78        End If
79
80        vbtypes.AppendLine("    Public Overrides Sub InitInternalVB()")
81        vbmembers.AppendLine("    Public Overrides Sub InitInternalVBMembers()")
82
83        For Each line As String In Lines
84            If line.StartsWith("'") Then Continue For
85            If line.Trim = "" Then Continue For
86
87            Dim splitted() As String = line.Split(New Char() {" "c}, StringSplitOptions.RemoveEmptyEntries)
88            Dim name, type, find, parameters As String
89            Dim param As Integer = Integer.MaxValue
90            Dim noparaminname As Boolean = False
91            Dim isVB As Boolean = False
92            Dim isVBMember As Boolean = False
93
94            parameters = Nothing
95
96            Select Case splitted(0)
97                Case "vbtype"
98                    name = splitted(1)
99                    name = name.Replace("Microsoft.VisualBasic.CompilerServices.", "MS_VB_CS_")
100                    name = name.Replace("Microsoft.VisualBasic.", "MS_VB_")
101                    name = name.Replace("""", "").Replace(".", "_").Replace("`", "").Replace("+", "_")
102                    type = "Mono.Cecil.TypeDefinition"
103                    find = "GetVBType"
104                    parameters = splitted(1)
105                    isVB = True
106                Case "type"
107                    name = splitted(2).Replace("""", "").Replace(".", "_").Replace("`", "").Replace("+", "_")
108                    type = "Mono.Cecil.TypeDefinition"
109                    find = "[GetType]"
110                    parameters = splitted(1) & ", " & splitted(2)
111
112                    If splitted(2).IndexOf("+"c) > 0 Then
113                        Dim declaringtype As String = splitted(2).Substring(0, splitted(2).LastIndexOf("+"c)).Replace(".", "_").Replace("""", "")
114                        Dim nestedtype As String = """" & splitted(2).Substring(splitted(2).LastIndexOf("+"c) + 1)
115                        parameters = declaringtype & ", " & nestedtype
116                    End If
117
118                Case "array"
119                    name = splitted(1).Replace("""", "").Replace(".", "_").Replace("`", "") & "_Array"
120                    type = "Mono.Cecil.TypeReference"
121                    find = "GetArrayType"
122                    parameters = splitted(1)
123                Case "byref"
124                    name = splitted(1).Replace("""", "").Replace(".", "_").Replace("`", "") & "_ByRef"
125                    type = "Mono.Cecil.TypeReference"
126                    find = "GetByRefType"
127                    parameters = splitted(1)
128                Case "method", "method2"
129                    name = splitted(1) & "__" & splitted(2).Replace("""", "").Replace(".", "_").Replace("`", "")
130                    type = "Mono.Cecil.MethodDefinition"
131                    If splitted(0) <> "method" Then noparaminname = True
132                    param = 3
133                    find = "GetMethod"
134                    parameters = splitted(1) & ", " & splitted(2)
135                    isVBMember = splitted(1).StartsWith("MS_")
136                Case "property"
137                    name = splitted(1) & "__" & splitted(2).Replace("""", "").Replace(".", "_").Replace("`", "")
138                    type = "Mono.Cecil.PropertyDefinition"
139                    param = 3
140                    find = "GetProperty"
141                    parameters = splitted(1) & ", " & splitted(2)
142                    isVBMember = splitted(1).StartsWith("MS_")
143                Case "field"
144                    name = splitted(1) & "__" & splitted(2).Replace("""", "").Replace(".", "_").Replace("`", "")
145                    type = "Mono.Cecil.FieldDefinition"
146                    find = "GetField"
147                    parameters = splitted(1) & ", " & splitted(2)
148                    isVBMember = splitted(1).StartsWith("MS_")
149                Case "ctor"
150                    name = splitted(1) & "__ctor"
151                    type = "Mono.Cecil.MethodDefinition"
152                    param = 2
153                    find = "GetConstructor"
154                    parameters = splitted(1)
155                    isVBMember = splitted(1).StartsWith("MS_")
156                Case Else
157                    Helper.Stop()
158                    Throw New NotImplementedException(splitted(0))
159            End Select
160
161            For i As Integer = param To splitted.GetUpperBound(0)
162                If noparaminname = False Then
163                    Dim lastUScore As Integer
164                    Dim p As String = splitted(i)
165                    p = splitted(i)
166                    p = p.Replace("_ByRef", "")
167                    lastUScore = p.LastIndexOf("_"c) + 1
168                    name &= "_" & p.Substring(lastUScore)
169                End If
170                If parameters IsNot Nothing Then parameters &= ", "
171                parameters &= splitted(i)
172            Next
173
174            If publicfields Then
175                variables.AppendLine(String.Format("    Public {0} As {1}", name, type))
176            Else
177                variables.AppendLine(String.Format("    Private m_{0} As {1}", name, type))
178            End If
179
180            Dim text As String
181            If publicfields Then
182                text = String.Format("        {0} = {1}({2})", name, find, parameters)
183                If isVB Then
184                    vbtypes.AppendLine(text)
185                ElseIf isVBMember Then
186                    vbmembers.AppendLine(text)
187                Else
188                    getters.AppendLine(text)
189                End If
190            Else
191                getters.AppendLine(String.Format("    Public ReadOnly Property {0} As {1}", name, type))
192                getters.AppendLine(String.Format("        Get"))
193                getters.AppendLine(String.Format("            If m_{0} Is Nothing Then", name))
194                getters.AppendLine(String.Format("                m_{0} = {1}({2})", name, find, parameters))
195                getters.AppendLine(String.Format("            End If"))
196                getters.AppendLine(String.Format("            Return m_{0}", name))
197                getters.AppendLine(String.Format("        End Get"))
198                getters.AppendLine(String.Format("    End Property"))
199            End If
200        Next
201
202        If publicfields Then
203            getters.AppendLine("    End Sub")
204        End If
205
206        vbtypes.AppendLine("    End Sub")
207        vbmembers.AppendLine("    End Sub")
208
209        Return variables.ToString & Environment.NewLine & getters.ToString & Environment.NewLine & vbtypes.ToString & Environment.NewLine & vbmembers.ToString
210    End Function
211#End If
212
213    Protected Overloads Function [GetType](ByVal Assembly As Mono.Cecil.AssemblyDefinition, ByVal FullName As String) As Mono.Cecil.TypeDefinition
214        If Assembly Is Nothing Then Return Nothing
215        Dim result As Mono.Cecil.TypeDefinition = Nothing
216        Dim split As String() = FullName.Split("+"c)
217        For i As Integer = 0 To split.Length - 1
218            If result Is Nothing Then
219                result = Assembly.MainModule.GetType(split(i))
220            Else
221                result = Me.GetType(result, split(i))
222            End If
223        Next
224        If result Is Nothing Then Compiler.Report.WriteLine(String.Format("Could not load the type '{0}' from the assembly '{1}'", FullName, Assembly.Name.FullName))
225        Return result
226    End Function
227
228    Protected Overloads Function [GetType](ByVal Type As Mono.Cecil.TypeDefinition, ByVal Name As String) As Mono.Cecil.TypeDefinition
229        If Type Is Nothing Then Return Nothing
230        Dim result As Mono.Cecil.TypeDefinition = Nothing
231        For Each item As Mono.Cecil.TypeDefinition In Type.NestedTypes
232            If Helper.CompareNameOrdinal(item.Name, Name) Then
233                result = item
234                Exit For
235            End If
236        Next
237        If result Is Nothing Then Compiler.Report.WriteLine(String.Format("Could not load the nested type '{0}' from the type '{1}'", Name, Type.FullName))
238        Return result
239    End Function
240
241    Protected Function GetByRefType(ByVal Type As Mono.Cecil.TypeDefinition) As Mono.Cecil.TypeReference
242        Return New ByReferenceType(Type)
243    End Function
244
245    Protected Function GetArrayType(ByVal Type As Mono.Cecil.TypeDefinition) As Mono.Cecil.TypeReference
246        Return New Mono.Cecil.ArrayType(Type)
247    End Function
248
249    Protected Function GetProperty(ByVal Type As Mono.Cecil.TypeDefinition, ByVal Name As String, ByVal ParamArray Types() As Mono.Cecil.TypeReference) As Mono.Cecil.PropertyDefinition
250        If Type Is Nothing Then Return Nothing
251        Dim properties As Mono.Collections.Generic.Collection(Of PropertyDefinition)
252        properties = CecilHelper.FindProperties(Type.Properties, Name)
253        For i As Integer = 0 To properties.Count - 1
254            Dim prop As Mono.Cecil.PropertyDefinition = properties(i)
255            Dim params As Mono.Collections.Generic.Collection(Of ParameterDefinition) = prop.Parameters
256
257            If IsMatch(Types, params) Then Return prop
258        Next
259
260        Return Nothing
261    End Function
262
263    Private Function IsMatch(ByVal Types As Mono.Cecil.TypeReference(), ByVal Parameters As Mono.Collections.Generic.Collection(Of ParameterDefinition)) As Boolean
264        If Parameters.Count = 0 AndAlso (Types Is Nothing OrElse Types.Length = 0) Then Return True
265        If Parameters.Count <> Types.Length Then Return False
266        For j As Integer = 0 To Parameters.Count - 1
267            If Helper.CompareType(Parameters(j).ParameterType, Types(j)) = False Then Return False
268        Next
269        Return True
270    End Function
271
272    Protected Function GetConstructor(ByVal Type As Mono.Cecil.TypeDefinition, ByVal ParamArray Types() As Mono.Cecil.TypeReference) As Mono.Cecil.MethodDefinition
273        Return GetMethod(Type, ".ctor", Types)
274    End Function
275
276    Protected Function GetMethod(ByVal Type As Mono.Cecil.TypeDefinition, ByVal Name As String, ByVal ParamArray Types() As Mono.Cecil.TypeReference) As Mono.Cecil.MethodDefinition
277        Dim result As Mono.Cecil.MethodDefinition = Nothing
278        If Type Is Nothing Then
279#If DEBUG Then
280            Compiler.Report.WriteLine("Could not load the method '" & Name & "', the specified type was Nothing.")
281#End If
282            Return Nothing
283        End If
284
285        For i As Integer = 0 To Type.Methods.Count - 1
286            Dim md As MethodDefinition = Type.Methods(i)
287            If Helper.CompareNameOrdinal(md.Name, Name) = False Then Continue For
288            If Helper.CompareTypes(Helper.GetTypes(md.Parameters), Types) = False Then Continue For
289            result = md
290            Exit For
291        Next
292#If DEBUG Then
293        If result Is Nothing Then
294            Compiler.Report.WriteLine(Report.ReportLevels.Debug, "Could not find the method '" & Name & "' on the type '" & Type.FullName)
295        End If
296#End If
297
298        Return result
299    End Function
300
301    Protected Function GetField(ByVal Type As Mono.Cecil.TypeDefinition, ByVal Name As String) As Mono.Cecil.FieldDefinition
302        If Type Is Nothing Then Return Nothing
303        Return CecilHelper.FindField(Type.Fields, Name)
304    End Function
305
306    Sub Init()
307        InitOptimizations()
308        InitAssemblies()
309        InitInternal()
310        InitVBNCTypes()
311    End Sub
312
313    Protected MustOverride Sub InitInternal()
314
315    Protected MustOverride Sub InitOptimizations()
316
317    Protected MustOverride Sub InitAssemblies()
318
319    Protected MustOverride Sub InitVBNCTypes()
320
321    Public MustOverride Sub InitInternalVB()
322
323    Public Overridable Sub InitInternalVBMembers()
324
325    End Sub
326
327End Class
328
329Public Class CecilTypeCache
330    Inherits TypeCacheBase
331
332    Public vbruntime As Mono.Cecil.AssemblyDefinition
333    Public mscorlib As Mono.Cecil.AssemblyDefinition
334    Public winforms As Mono.Cecil.AssemblyDefinition
335
336    'Special vbnc types
337    Public [Nothing] As Mono.Cecil.TypeDefinition
338    Public DelegateUnresolvedType As Mono.Cecil.TypeDefinition
339
340    'Stupid MS type system with some optimizations requires this
341    Public System_MonoType As Mono.Cecil.TypeDefinition
342    Public System_RuntimeType As Mono.Cecil.TypeDefinition
343    Public System_Reflection_Emit_TypeBuilder As Mono.Cecil.TypeDefinition
344    Public System_Reflection_Emit_TypeBuilderInstantiation As Mono.Cecil.TypeDefinition
345    Public System_Reflection_Emit_SymbolType As Mono.Cecil.TypeDefinition
346
347    Sub New(ByVal Compiler As Compiler)
348        MyBase.New(Compiler)
349    End Sub
350
351    Protected Function GetVBType(ByVal Name As String) As Mono.Cecil.TypeDefinition
352        Dim result As Mono.Cecil.TypeDefinition = Nothing
353
354        If String.IsNullOrEmpty(Compiler.CommandLine.VBRuntime) AndAlso vbruntime Is Nothing Then
355            Dim tps As Generic.List(Of Mono.Cecil.TypeReference)
356            tps = Compiler.TypeManager.GetType(Name, True)
357
358            If tps.Count = 1 Then
359                result = CecilHelper.FindDefinition(tps(0))
360#If DEBUG Then
361            ElseIf tps.Count > 1 Then
362                Compiler.Report.WriteLine("Found " & tps.Count & " types with the name " & Name)
363#End If
364            End If
365        Else
366            result = [GetType](vbruntime, Name)
367        End If
368
369#If DEBUG Then
370        If result Is Nothing Then
371            Compiler.Report.WriteLine("Could not load VB Type: " & Name)
372        End If
373#End If
374
375        Return result
376    End Function
377
378    Protected Overrides Sub InitAssemblies()
379        For Each a As Mono.Cecil.AssemblyDefinition In Compiler.TypeManager.CecilAssemblies
380            If a.Name.Name = "Microsoft.VisualBasic" Then
381                vbruntime = a : Continue For
382            ElseIf a.Name.Name = "mscorlib" Then
383                mscorlib = a : Continue For
384            ElseIf a.Name.Name = "System.Windows.Forms" Then
385                winforms = a : Continue For
386            End If
387        Next
388    End Sub
389
390    Protected Overrides Sub InitOptimizations()
391        If Helper.IsOnMono Then
392            System_MonoType = Me.GetType(mscorlib, "System.MonoType")
393        Else
394            System_RuntimeType = Me.GetType(mscorlib, "System.RuntimeType")
395            System_Reflection_Emit_TypeBuilderInstantiation = Me.GetType(mscorlib, "System.Reflection.Emit.TypeBuilderInstantiation")
396            System_Reflection_Emit_SymbolType = Me.GetType(mscorlib, "System.Reflection.Emit.SymbolType")
397        End If
398        System_Reflection_Emit_TypeBuilder = Me.GetType(mscorlib, "System.Reflection.Emit.TypeBuilder")
399
400    End Sub
401
402    Protected Overrides Sub InitVBNCTypes()
403        [Nothing] = New Mono.Cecil.TypeDefinition("Nothing", "vbnc", Mono.Cecil.TypeAttributes.Public Or Mono.Cecil.TypeAttributes.Class, Me.System_Object)
404        DelegateUnresolvedType = New Mono.Cecil.TypeDefinition("DelegateUnresolvedType", "vbnc", Mono.Cecil.TypeAttributes.Public Or Mono.Cecil.TypeAttributes.Class, Me.System_Object)
405    End Sub
406
407End Class
408
409'START SRE
410''
411' Visual Basic.Net Compiler
412' Copyright (C) 2004 - 2010 Rolf Bjarne Kvinge, RKvinge@novell.com
413'
414' This library is free software; you can redistribute it and/or
415' modify it under the terms of the GNU Lesser General Public
416' License as published by the Free Software Foundation; either
417' version 2.1 of the License, or (at your option) any later version.
418'
419' This library is distributed in the hope that it will be useful,
420' but WITHOUT ANY WARRANTY; without even the implied warranty of
421' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
422' Lesser General Public License for more details.
423'
424' You should have received a copy of the GNU Lesser General Public
425' License along with this library; if not, write to the Free Software
426' Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
427'
428Public Partial Class CecilTypeCache
429    Public System_Boolean As Mono.Cecil.TypeDefinition
430    Public System_Boolean_Array As Mono.Cecil.TypeReference
431    Public System_Byte As Mono.Cecil.TypeDefinition
432    Public System_Byte_Array As Mono.Cecil.TypeReference
433    Public System_Char As Mono.Cecil.TypeDefinition
434    Public System_Char_Array As Mono.Cecil.TypeReference
435    Public System_DateTime As Mono.Cecil.TypeDefinition
436    Public System_Decimal As Mono.Cecil.TypeDefinition
437    Public System_Double As Mono.Cecil.TypeDefinition
438    Public System_Int32 As Mono.Cecil.TypeDefinition
439    Public System_Int64 As Mono.Cecil.TypeDefinition
440    Public System_Object As Mono.Cecil.TypeDefinition
441    Public System_Object_Array As Mono.Cecil.TypeReference
442    Public System_Object_ByRef As Mono.Cecil.TypeReference
443    Public System_Int16 As Mono.Cecil.TypeDefinition
444    Public System_Single As Mono.Cecil.TypeDefinition
445    Public System_String As Mono.Cecil.TypeDefinition
446    Public System_String_ByRef As Mono.Cecil.TypeReference
447    Public System_String_Array As Mono.Cecil.TypeReference
448    Public System_String__ctor_Array As Mono.Cecil.MethodDefinition
449    Public System_SByte As Mono.Cecil.TypeDefinition
450    Public System_UInt16 As Mono.Cecil.TypeDefinition
451    Public System_UInt32 As Mono.Cecil.TypeDefinition
452    Public System_UInt64 As Mono.Cecil.TypeDefinition
453    Public System_Int32_Array As Mono.Cecil.TypeReference
454    Public System_Enum As Mono.Cecil.TypeDefinition
455    Public System_ValueType As Mono.Cecil.TypeDefinition
456    Public System_Delegate As Mono.Cecil.TypeDefinition
457    Public System_MulticastDelegate As Mono.Cecil.TypeDefinition
458    Public System_AsyncCallback As Mono.Cecil.TypeDefinition
459    Public System_IAsyncResult As Mono.Cecil.TypeDefinition
460    Public System_Collections_IEnumerator As Mono.Cecil.TypeDefinition
461    Public System_Collections_IEnumerator__get_Current As Mono.Cecil.MethodDefinition
462    Public System_Collections_IEnumerator__MoveNext As Mono.Cecil.MethodDefinition
463    Public System_Collections_IEnumerable As Mono.Cecil.TypeDefinition
464    Public System_Collections_IEnumerable__GetEnumerator As Mono.Cecil.MethodDefinition
465    Public System_IDisposable As Mono.Cecil.TypeDefinition
466    Public System_IDisposable__Dispose As Mono.Cecil.MethodDefinition
467    Public System_RuntimeTypeHandle As Mono.Cecil.TypeDefinition
468    Public System_Type As Mono.Cecil.TypeDefinition
469    Public System_Type_Array As Mono.Cecil.TypeReference
470    Public System_Type__GetTypeFromHandle_RuntimeTypeHandle As Mono.Cecil.MethodDefinition
471    Public System_Void As Mono.Cecil.TypeDefinition
472    Public System_Exception As Mono.Cecil.TypeDefinition
473    Public System_Array As Mono.Cecil.TypeDefinition
474    Public System_DBNull As Mono.Cecil.TypeDefinition
475    Public System_SerializableAttribute As Mono.Cecil.TypeDefinition
476    Public System_Array__SetValue As Mono.Cecil.MethodDefinition
477    Public System_Array__GetValue As Mono.Cecil.MethodDefinition
478    Public System_Array__CreateInstance As Mono.Cecil.MethodDefinition
479    Public System_Activator As Mono.Cecil.TypeDefinition
480    Public System_Activator__CreateInstance As Mono.Cecil.MethodDefinition
481    Public System_ArgumentException As Mono.Cecil.TypeDefinition
482    Public System_Collections_Generic_IList1 As Mono.Cecil.TypeDefinition
483    Public System_Collections_Generic_ICollection1 As Mono.Cecil.TypeDefinition
484    Public System_Collections_Generic_IEnumerable1 As Mono.Cecil.TypeDefinition
485    Public System_Reflection_AssemblyVersionAttribute As Mono.Cecil.TypeDefinition
486    Public System_Reflection_AssemblyProductAttribute As Mono.Cecil.TypeDefinition
487    Public System_Reflection_AssemblyCompanyAttribute As Mono.Cecil.TypeDefinition
488    Public System_Reflection_AssemblyCopyrightAttribute As Mono.Cecil.TypeDefinition
489    Public System_Reflection_AssemblyTrademarkAttribute As Mono.Cecil.TypeDefinition
490    Public System_Reflection_AssemblyKeyNameAttribute As Mono.Cecil.TypeDefinition
491    Public System_Reflection_AssemblyKeyFileAttribute As Mono.Cecil.TypeDefinition
492    Public System_Reflection_AssemblyDelaySignAttribute As Mono.Cecil.TypeDefinition
493    Public System_Diagnostics_ConditionalAttribute As Mono.Cecil.TypeDefinition
494    Public System_Diagnostics_DebuggableAttribute As Mono.Cecil.TypeDefinition
495    Public System_Diagnostics_DebuggableAttribute_DebuggingModes As Mono.Cecil.TypeDefinition
496    Public System_Diagnostics_DebuggableAttribute__ctor_DebuggingModes As Mono.Cecil.MethodDefinition
497    Public System_ParamArrayAttribute As Mono.Cecil.TypeDefinition
498    Public System_ParamArrayAttribute__ctor As Mono.Cecil.MethodDefinition
499    Public System_Nullable1 As Mono.Cecil.TypeDefinition
500    Public System_Nullable1__get_HasValue As Mono.Cecil.MethodDefinition
501    Public System_Nullable1__GetValueOrDefault As Mono.Cecil.MethodDefinition
502    Public System_Runtime_CompilerServices_RuntimeHelpers As Mono.Cecil.TypeDefinition
503    Public System_STAThreadAttribute As Mono.Cecil.TypeDefinition
504    Public System_STAThreadAttribute__ctor As Mono.Cecil.MethodDefinition
505    Public System_IntPtr As Mono.Cecil.TypeDefinition
506    Public System_Runtime_CompilerServices_DateTimeConstantAttribute As Mono.Cecil.TypeDefinition
507    Public System_Runtime_CompilerServices_DateTimeConstantAttribute__ctor_Int64 As Mono.Cecil.MethodDefinition
508    Public System_DateTime__ctor_Int64 As Mono.Cecil.MethodDefinition
509    Public System_Decimal__ctor_Int32 As Mono.Cecil.MethodDefinition
510    Public System_Decimal__ctor_Int64 As Mono.Cecil.MethodDefinition
511    Public System_Decimal__ctor_Double As Mono.Cecil.MethodDefinition
512    Public System_Decimal__ctor_Single As Mono.Cecil.MethodDefinition
513    Public System_Decimal__ctor_UInt64 As Mono.Cecil.MethodDefinition
514    Public System_Decimal__ctor_Int32_Int32_Int32_Boolean_Byte As Mono.Cecil.MethodDefinition
515    Public System_Decimal__Zero As Mono.Cecil.FieldDefinition
516    Public System_Decimal__One As Mono.Cecil.FieldDefinition
517    Public System_Decimal__MinusOne As Mono.Cecil.FieldDefinition
518    Public System_Runtime_CompilerServices_DecimalConstantAttribute As Mono.Cecil.TypeDefinition
519    Public System_Runtime_CompilerServices_DecimalConstantAttribute__ctor_Byte_Byte_UInt32_UInt32_UInt32 As Mono.Cecil.MethodDefinition
520    Public System_Runtime_CompilerServices_DecimalConstantAttribute__ctor_Byte_Byte_Int32_Int32_Int32 As Mono.Cecil.MethodDefinition
521    Public System_Runtime_CompilerServices_AccessedThroughPropertyAttribute As Mono.Cecil.TypeDefinition
522    Public System_Runtime_CompilerServices_AccessedThroughPropertyAttribute__ctor_String As Mono.Cecil.MethodDefinition
523    Public System_Decimal__Compare_Decimal_Decimal As Mono.Cecil.MethodDefinition
524    Public System_DateTime__Compare_DateTime_DateTime As Mono.Cecil.MethodDefinition
525    Public System_Decimal__Add_Decimal_Decimal As Mono.Cecil.MethodDefinition
526    Public System_Decimal__Subtract_Decimal_Decimal As Mono.Cecil.MethodDefinition
527    Public System_Decimal__Divide_Decimal_Decimal As Mono.Cecil.MethodDefinition
528    Public System_Decimal__Multiply_Decimal_Decimal As Mono.Cecil.MethodDefinition
529    Public System_Decimal__Remainder_Decimal_Decimal As Mono.Cecil.MethodDefinition
530    Public System_Decimal__Negate_Decimal As Mono.Cecil.MethodDefinition
531    Public System_Reflection_DefaultMemberAttribute As Mono.Cecil.TypeDefinition
532    Public System_Reflection_DefaultMemberAttribute__ctor_String As Mono.Cecil.MethodDefinition
533    Public System_Convert As Mono.Cecil.TypeDefinition
534    Public System_Convert__ToSingle_Decimal As Mono.Cecil.MethodDefinition
535    Public System_Convert__ToDouble_Decimal As Mono.Cecil.MethodDefinition
536    Public System_Convert__ToBoolean_Decimal As Mono.Cecil.MethodDefinition
537    Public System_Convert__ToByte_Decimal As Mono.Cecil.MethodDefinition
538    Public System_Convert__ToSByte_Decimal As Mono.Cecil.MethodDefinition
539    Public System_Convert__ToInt16_Decimal As Mono.Cecil.MethodDefinition
540    Public System_Convert__ToUInt16_Decimal As Mono.Cecil.MethodDefinition
541    Public System_Convert__ToInt32_Decimal As Mono.Cecil.MethodDefinition
542    Public System_Convert__ToUInt32_Decimal As Mono.Cecil.MethodDefinition
543    Public System_Convert__ToInt64_Decimal As Mono.Cecil.MethodDefinition
544    Public System_Convert__ToUInt64_Decimal As Mono.Cecil.MethodDefinition
545    Public System_String__Concat_String_String As Mono.Cecil.MethodDefinition
546    Public System_Diagnostics_Debugger As Mono.Cecil.TypeDefinition
547    Public System_Diagnostics_Debugger__Break As Mono.Cecil.MethodDefinition
548    Public System_Reflection_Missing As Mono.Cecil.TypeDefinition
549    Public System_Reflection_Missing__Value As Mono.Cecil.FieldDefinition
550    Public System_Threading_Monitor As Mono.Cecil.TypeDefinition
551    Public System_Threading_Monitor__Enter_Object As Mono.Cecil.MethodDefinition
552    Public System_Threading_Monitor__Exit_Object As Mono.Cecil.MethodDefinition
553    Public System_Runtime_CompilerServices_RuntimeHelpers__GetObjectValue_Object As Mono.Cecil.MethodDefinition
554    Public System_Math As Mono.Cecil.TypeDefinition
555    Public System_Math__Round_Double As Mono.Cecil.MethodDefinition
556    Public System_Math__Pow_Double_Double As Mono.Cecil.MethodDefinition
557    Public System_Runtime_InteropServices_DllImportAttribute As Mono.Cecil.TypeDefinition
558    Public System_Runtime_InteropServices_MarshalAsAttribute As Mono.Cecil.TypeDefinition
559    Public System_Runtime_InteropServices_StructLayoutAttribute As Mono.Cecil.TypeDefinition
560    Public System_Runtime_InteropServices_FieldOffsetAttribute As Mono.Cecil.TypeDefinition
561    Public System_Runtime_InteropServices_CoClassAttribute As Mono.Cecil.TypeDefinition
562    Public System_Runtime_InteropServices_OutAttribute As Mono.Cecil.TypeDefinition
563    Public System_Security_Permissions_SecurityAttribute As Mono.Cecil.TypeDefinition
564    Public System_Windows_Forms_Form As Mono.Cecil.TypeDefinition
565    Public System_Windows_Forms_Application As Mono.Cecil.TypeDefinition
566    Public System_Windows_Forms_Application__Run As Mono.Cecil.MethodDefinition
567    Public System_Delegate__Combine As Mono.Cecil.MethodDefinition
568    Public System_Delegate__Remove As Mono.Cecil.MethodDefinition
569    Public MS_VB_CompareMethod As Mono.Cecil.TypeDefinition
570    Public MS_VB_CS_Conversions As Mono.Cecil.TypeDefinition
571    Public MS_VB_CS_ProjectData As Mono.Cecil.TypeDefinition
572    Public MS_VB_CS_LikeOperator As Mono.Cecil.TypeDefinition
573    Public MS_VB_Strings As Mono.Cecil.TypeDefinition
574    Public MS_VB_CS_StringType As Mono.Cecil.TypeDefinition
575    Public MS_VB_MyGroupCollectionAttribute As Mono.Cecil.TypeDefinition
576    Public MS_VB_CallType As Mono.Cecil.TypeDefinition
577    Public MS_VB_Information As Mono.Cecil.TypeDefinition
578    Public MS_VB_Information__IsNumeric As Mono.Cecil.MethodDefinition
579    Public MS_VB_Information__SystemTypeName As Mono.Cecil.MethodDefinition
580    Public MS_VB_Information__TypeName As Mono.Cecil.MethodDefinition
581    Public MS_VB_Information__VbTypeName As Mono.Cecil.MethodDefinition
582    Public MS_VB_Interaction As Mono.Cecil.TypeDefinition
583    Public MS_VB_Interaction__CallByName As Mono.Cecil.MethodDefinition
584    Public MS_VB_CS_Versioned As Mono.Cecil.TypeDefinition
585    Public MS_VB_CS_Versioned__IsNumeric As Mono.Cecil.MethodDefinition
586    Public MS_VB_CS_Versioned__SystemTypeName As Mono.Cecil.MethodDefinition
587    Public MS_VB_CS_Versioned__TypeName As Mono.Cecil.MethodDefinition
588    Public MS_VB_CS_Versioned__VbTypeName As Mono.Cecil.MethodDefinition
589    Public MS_VB_CS_Versioned__CallByName As Mono.Cecil.MethodDefinition
590    Public MS_VB_CS_StandardModuleAttribute As Mono.Cecil.TypeDefinition
591    Public MS_VB_CS_Operators As Mono.Cecil.TypeDefinition
592    Public MS_VB_CS_ObjectFlowControl As Mono.Cecil.TypeDefinition
593    Public MS_VB_CS_ObjectFlowControl_ForLoopControl As Mono.Cecil.TypeDefinition
594    Public MS_VB_CS_Utils As Mono.Cecil.TypeDefinition
595    Public MS_VB_CS_OptionCompareAttribute As Mono.Cecil.TypeDefinition
596    Public MS_VB_CS_OptionTextAttribute As Mono.Cecil.TypeDefinition
597    Public MS_VB_CS_StaticLocalInitFlag As Mono.Cecil.TypeDefinition
598    Public MS_VB_CS_StaticLocalInitFlag__State As Mono.Cecil.FieldDefinition
599    Public MS_VB_CS_StaticLocalInitFlag__ctor As Mono.Cecil.MethodDefinition
600    Public MS_VB_CS_DesignerGeneratedAttribute As Mono.Cecil.TypeDefinition
601    Public MS_VB_CS_IncompleteInitialization As Mono.Cecil.TypeDefinition
602    Public MS_VB_CS_NewLateBinding As Mono.Cecil.TypeDefinition
603    Public MS_VB_CS_LateBinding As Mono.Cecil.TypeDefinition
604    Public MS_VB_CS_IncompleteInitialization__ctor As Mono.Cecil.MethodDefinition
605    Public MS_VB_CS_NewLateBinding__LateGet_Object_Type_String_Array_Array_Array_Array As Mono.Cecil.MethodDefinition
606    Public MS_VB_CS_NewLateBinding__LateSet_Object_Type_String_Array_Array_Array As Mono.Cecil.MethodDefinition
607    Public MS_VB_CS_NewLateBinding__LateIndexGet_Object_Array_Array As Mono.Cecil.MethodDefinition
608    Public MS_VB_CS_NewLateBinding__LateIndexSet_Object_Array_Array As Mono.Cecil.MethodDefinition
609    Public MS_VB_CS_NewLateBinding__LateCall_Object_Type_String_Array_Array_Array_Array_Boolean As Mono.Cecil.MethodDefinition
610    Public MS_VB_CS_ProjectData__EndApp As Mono.Cecil.MethodDefinition
611    Public MS_VB_CS_ProjectData__CreateProjectError_Int32 As Mono.Cecil.MethodDefinition
612    Public MS_VB_CS_ProjectData__ClearProjectError As Mono.Cecil.MethodDefinition
613    Public MS_VB_CS_ProjectData__SetProjectError_Exception As Mono.Cecil.MethodDefinition
614    Public MS_VB_CS_ProjectData__SetProjectError_Exception_Int32 As Mono.Cecil.MethodDefinition
615    Public MS_VB_CS_Conversions__ToBoolean_Object As Mono.Cecil.MethodDefinition
616    Public MS_VB_CS_Conversions__ToChar_Object As Mono.Cecil.MethodDefinition
617    Public MS_VB_CS_Conversions__ToDate_Object As Mono.Cecil.MethodDefinition
618    Public MS_VB_CS_Conversions__ToByte_Object As Mono.Cecil.MethodDefinition
619    Public MS_VB_CS_Conversions__ToSByte_Object As Mono.Cecil.MethodDefinition
620    Public MS_VB_CS_Conversions__ToShort_Object As Mono.Cecil.MethodDefinition
621    Public MS_VB_CS_Conversions__ToUShort_Object As Mono.Cecil.MethodDefinition
622    Public MS_VB_CS_Conversions__ToInteger_Object As Mono.Cecil.MethodDefinition
623    Public MS_VB_CS_Conversions__ToUInteger_Object As Mono.Cecil.MethodDefinition
624    Public MS_VB_CS_Conversions__ToLong_Object As Mono.Cecil.MethodDefinition
625    Public MS_VB_CS_Conversions__ToULong_Object As Mono.Cecil.MethodDefinition
626    Public MS_VB_CS_Conversions__ToSingle_Object As Mono.Cecil.MethodDefinition
627    Public MS_VB_CS_Conversions__ToDouble_Object As Mono.Cecil.MethodDefinition
628    Public MS_VB_CS_Conversions__ToDecimal_Object As Mono.Cecil.MethodDefinition
629    Public MS_VB_CS_Conversions__ToBoolean_String As Mono.Cecil.MethodDefinition
630    Public MS_VB_CS_Conversions__ToChar_String As Mono.Cecil.MethodDefinition
631    Public MS_VB_CS_Conversions__ToDate_String As Mono.Cecil.MethodDefinition
632    Public MS_VB_CS_Conversions__ToByte_String As Mono.Cecil.MethodDefinition
633    Public MS_VB_CS_Conversions__ToSByte_String As Mono.Cecil.MethodDefinition
634    Public MS_VB_CS_Conversions__ToShort_String As Mono.Cecil.MethodDefinition
635    Public MS_VB_CS_Conversions__ToUShort_String As Mono.Cecil.MethodDefinition
636    Public MS_VB_CS_Conversions__ToInteger_String As Mono.Cecil.MethodDefinition
637    Public MS_VB_CS_Conversions__ToUInteger_String As Mono.Cecil.MethodDefinition
638    Public MS_VB_CS_Conversions__ToLong_String As Mono.Cecil.MethodDefinition
639    Public MS_VB_CS_Conversions__ToULong_String As Mono.Cecil.MethodDefinition
640    Public MS_VB_CS_Conversions__ToSingle_String As Mono.Cecil.MethodDefinition
641    Public MS_VB_CS_Conversions__ToDouble_String As Mono.Cecil.MethodDefinition
642    Public MS_VB_CS_Conversions__ToDecimal_String As Mono.Cecil.MethodDefinition
643    Public MS_VB_CS_Conversions__ToDecimal_Boolean As Mono.Cecil.MethodDefinition
644    Public MS_VB_CS_Conversions__ToString_Decimal As Mono.Cecil.MethodDefinition
645    Public MS_VB_CS_Conversions__ToString_Boolean As Mono.Cecil.MethodDefinition
646    Public MS_VB_CS_Conversions__ToString_Char As Mono.Cecil.MethodDefinition
647    Public MS_VB_CS_Conversions__ToString_DateTime As Mono.Cecil.MethodDefinition
648    Public MS_VB_CS_Conversions__ToString_Byte As Mono.Cecil.MethodDefinition
649    Public MS_VB_CS_Conversions__ToString_Int32 As Mono.Cecil.MethodDefinition
650    Public MS_VB_CS_Conversions__ToString_UInt32 As Mono.Cecil.MethodDefinition
651    Public MS_VB_CS_Conversions__ToString_Int64 As Mono.Cecil.MethodDefinition
652    Public MS_VB_CS_Conversions__ToString_UInt64 As Mono.Cecil.MethodDefinition
653    Public MS_VB_CS_Conversions__ToString_Single As Mono.Cecil.MethodDefinition
654    Public MS_VB_CS_Conversions__ToString_Double As Mono.Cecil.MethodDefinition
655    Public MS_VB_CS_Conversions__ToString_Object As Mono.Cecil.MethodDefinition
656    Public MS_VB_CS_Conversions__ToGenericParameter_Object As Mono.Cecil.MethodDefinition
657    Public MS_VB_CS_Conversions__ChangeType_Object_Type As Mono.Cecil.MethodDefinition
658    Public MS_VB_CS_Conversions__ToCharArrayRankOne_String As Mono.Cecil.MethodDefinition
659    Public MS_VB_CS_LikeOperator__LikeString_String_String_CompareMethod As Mono.Cecil.MethodDefinition
660    Public MS_VB_CS_LikeOperator__LikeObject_Object_Object_CompareMethod As Mono.Cecil.MethodDefinition
661    Public MS_VB_CS_StringType__MidStmtStr_String_Int32_Int32_String As Mono.Cecil.MethodDefinition
662    Public MS_VB_CS_ObjectFlowControl__CheckForSyncLockOnValueType_Object As Mono.Cecil.MethodDefinition
663    Public MS_VB_CS_ObjectFlowControl_ForLoopControl__ForLoopInitObj_Object_Object_Object_Object_Object_Object As Mono.Cecil.MethodDefinition
664    Public MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckDec_Decimal_Decimal_Decimal As Mono.Cecil.MethodDefinition
665    Public MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckObj_Object_Object_Object As Mono.Cecil.MethodDefinition
666    Public MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckR4_Single_Single_Single As Mono.Cecil.MethodDefinition
667    Public MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckR8_Double_Double_Double As Mono.Cecil.MethodDefinition
668    Public MS_VB_CS_Utils__CopyArray_Array_Array As Mono.Cecil.MethodDefinition
669    Public MS_VB_CS_Operators__ConditionalCompareObjectEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
670    Public MS_VB_CS_Operators__ConditionalCompareObjectNotEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
671    Public MS_VB_CS_Operators__ConditionalCompareObjectGreater_Object_Object_Boolean As Mono.Cecil.MethodDefinition
672    Public MS_VB_CS_Operators__ConditionalCompareObjectGreaterEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
673    Public MS_VB_CS_Operators__ConditionalCompareObjectLess_Object_Object_Boolean As Mono.Cecil.MethodDefinition
674    Public MS_VB_CS_Operators__ConditionalCompareObjectLessEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
675    Public MS_VB_CS_Operators__CompareString_String_String_Boolean As Mono.Cecil.MethodDefinition
676    Public MS_VB_CS_Operators__ConcatenateObject_Object_Object As Mono.Cecil.MethodDefinition
677    Public MS_VB_CS_Operators__AddObject_Object_Object As Mono.Cecil.MethodDefinition
678    Public MS_VB_CS_Operators__AndObject_Object_Object As Mono.Cecil.MethodDefinition
679    Public MS_VB_CS_Operators__DivideObject_Object_Object As Mono.Cecil.MethodDefinition
680    Public MS_VB_CS_Operators__ExponentObject_Object_Object As Mono.Cecil.MethodDefinition
681    Public MS_VB_CS_Operators__IntDivideObject_Object_Object As Mono.Cecil.MethodDefinition
682    Public MS_VB_CS_Operators__LeftShiftObject_Object_Object As Mono.Cecil.MethodDefinition
683    Public MS_VB_CS_Operators__ModObject_Object_Object As Mono.Cecil.MethodDefinition
684    Public MS_VB_CS_Operators__MultiplyObject_Object_Object As Mono.Cecil.MethodDefinition
685    Public MS_VB_CS_Operators__NegateObject_Object As Mono.Cecil.MethodDefinition
686    Public MS_VB_CS_Operators__NotObject_Object As Mono.Cecil.MethodDefinition
687    Public MS_VB_CS_Operators__OrObject_Object_Object As Mono.Cecil.MethodDefinition
688    Public MS_VB_CS_Operators__PlusObject_Object As Mono.Cecil.MethodDefinition
689    Public MS_VB_CS_Operators__RightShiftObject_Object_Object As Mono.Cecil.MethodDefinition
690    Public MS_VB_CS_Operators__SubtractObject_Object_Object As Mono.Cecil.MethodDefinition
691    Public MS_VB_CS_Operators__XorObject_Object_Object As Mono.Cecil.MethodDefinition
692    Public MS_VB_CS_Operators__LikeObject_Object_Object_CompareMethod As Mono.Cecil.MethodDefinition
693    Public MS_VB_CS_Operators__LikeString_String_String_CompareMethod As Mono.Cecil.MethodDefinition
694    Public MS_VB_CS_Operators__CompareObjectEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
695    Public MS_VB_CS_Operators__CompareObjectNotEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
696    Public MS_VB_CS_Operators__CompareObjectGreater_Object_Object_Boolean As Mono.Cecil.MethodDefinition
697    Public MS_VB_CS_Operators__CompareObjectGreaterEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
698    Public MS_VB_CS_Operators__CompareObjectLess_Object_Object_Boolean As Mono.Cecil.MethodDefinition
699    Public MS_VB_CS_Operators__CompareObjectLessEqual_Object_Object_Boolean As Mono.Cecil.MethodDefinition
700
701    Protected Overrides Sub InitInternal ()
702        System_Boolean = [GetType](mscorlib, "System.Boolean")
703        System_Boolean_Array = GetArrayType(System_Boolean)
704        System_Byte = [GetType](mscorlib, "System.Byte")
705        System_Byte_Array = GetArrayType(System_Byte)
706        System_Char = [GetType](mscorlib, "System.Char")
707        System_Char_Array = GetArrayType(System_Char)
708        System_DateTime = [GetType](mscorlib, "System.DateTime")
709        System_Decimal = [GetType](mscorlib, "System.Decimal")
710        System_Double = [GetType](mscorlib, "System.Double")
711        System_Int32 = [GetType](mscorlib, "System.Int32")
712        System_Int64 = [GetType](mscorlib, "System.Int64")
713        System_Object = [GetType](mscorlib, "System.Object")
714        System_Object_Array = GetArrayType(System_Object)
715        System_Object_ByRef = GetByRefType(System_Object)
716        System_Int16 = [GetType](mscorlib, "System.Int16")
717        System_Single = [GetType](mscorlib, "System.Single")
718        System_String = [GetType](mscorlib, "System.String")
719        System_String_ByRef = GetByRefType(System_String)
720        System_String_Array = GetArrayType(System_String)
721        System_String__ctor_Array = GetConstructor(System_String, System_Char_Array)
722        System_SByte = [GetType](mscorlib, "System.SByte")
723        System_UInt16 = [GetType](mscorlib, "System.UInt16")
724        System_UInt32 = [GetType](mscorlib, "System.UInt32")
725        System_UInt64 = [GetType](mscorlib, "System.UInt64")
726        System_Int32_Array = GetArrayType(System_Int32)
727        System_Enum = [GetType](mscorlib, "System.Enum")
728        System_ValueType = [GetType](mscorlib, "System.ValueType")
729        System_Delegate = [GetType](mscorlib, "System.Delegate")
730        System_MulticastDelegate = [GetType](mscorlib, "System.MulticastDelegate")
731        System_AsyncCallback = [GetType](mscorlib, "System.AsyncCallback")
732        System_IAsyncResult = [GetType](mscorlib, "System.IAsyncResult")
733        System_Collections_IEnumerator = [GetType](mscorlib, "System.Collections.IEnumerator")
734        System_Collections_IEnumerator__get_Current = GetMethod(System_Collections_IEnumerator, "get_Current")
735        System_Collections_IEnumerator__MoveNext = GetMethod(System_Collections_IEnumerator, "MoveNext")
736        System_Collections_IEnumerable = [GetType](mscorlib, "System.Collections.IEnumerable")
737        System_Collections_IEnumerable__GetEnumerator = GetMethod(System_Collections_IEnumerable, "GetEnumerator")
738        System_IDisposable = [GetType](mscorlib, "System.IDisposable")
739        System_IDisposable__Dispose = GetMethod(System_IDisposable, "Dispose")
740        System_RuntimeTypeHandle = [GetType](mscorlib, "System.RuntimeTypeHandle")
741        System_Type = [GetType](mscorlib, "System.Type")
742        System_Type_Array = GetArrayType(System_Type)
743        System_Type__GetTypeFromHandle_RuntimeTypeHandle = GetMethod(System_Type, "GetTypeFromHandle", System_RuntimeTypeHandle)
744        System_Void = [GetType](mscorlib, "System.Void")
745        System_Exception = [GetType](mscorlib, "System.Exception")
746        System_Array = [GetType](mscorlib, "System.Array")
747        System_DBNull = [GetType](mscorlib, "System.DBNull")
748        System_SerializableAttribute = [GetType](mscorlib, "System.SerializableAttribute")
749        System_Array__SetValue = GetMethod(System_Array, "SetValue", System_Object, System_Int32_Array)
750        System_Array__GetValue = GetMethod(System_Array, "GetValue", System_Int32_Array)
751        System_Array__CreateInstance = GetMethod(System_Array, "CreateInstance", System_Type, System_Int32_Array)
752        System_Activator = [GetType](mscorlib, "System.Activator")
753        System_Activator__CreateInstance = GetMethod(System_Activator, "CreateInstance")
754        System_ArgumentException = [GetType](mscorlib, "System.ArgumentException")
755        System_Collections_Generic_IList1 = [GetType](mscorlib, "System.Collections.Generic.IList`1")
756        System_Collections_Generic_ICollection1 = [GetType](mscorlib, "System.Collections.Generic.ICollection`1")
757        System_Collections_Generic_IEnumerable1 = [GetType](mscorlib, "System.Collections.Generic.IEnumerable`1")
758        System_Reflection_AssemblyVersionAttribute = [GetType](mscorlib, "System.Reflection.AssemblyVersionAttribute")
759        System_Reflection_AssemblyProductAttribute = [GetType](mscorlib, "System.Reflection.AssemblyProductAttribute")
760        System_Reflection_AssemblyCompanyAttribute = [GetType](mscorlib, "System.Reflection.AssemblyCompanyAttribute")
761        System_Reflection_AssemblyCopyrightAttribute = [GetType](mscorlib, "System.Reflection.AssemblyCopyrightAttribute")
762        System_Reflection_AssemblyTrademarkAttribute = [GetType](mscorlib, "System.Reflection.AssemblyTrademarkAttribute")
763        System_Reflection_AssemblyKeyNameAttribute = [GetType](mscorlib, "System.Reflection.AssemblyKeyNameAttribute")
764        System_Reflection_AssemblyKeyFileAttribute = [GetType](mscorlib, "System.Reflection.AssemblyKeyFileAttribute")
765        System_Reflection_AssemblyDelaySignAttribute = [GetType](mscorlib, "System.Reflection.AssemblyDelaySignAttribute")
766        System_Diagnostics_ConditionalAttribute = [GetType](mscorlib, "System.Diagnostics.ConditionalAttribute")
767        System_Diagnostics_DebuggableAttribute = [GetType](mscorlib, "System.Diagnostics.DebuggableAttribute")
768        System_Diagnostics_DebuggableAttribute_DebuggingModes = [GetType](System_Diagnostics_DebuggableAttribute, "DebuggingModes")
769        System_Diagnostics_DebuggableAttribute__ctor_DebuggingModes = GetConstructor(System_Diagnostics_DebuggableAttribute, System_Diagnostics_DebuggableAttribute_DebuggingModes)
770        System_ParamArrayAttribute = [GetType](mscorlib, "System.ParamArrayAttribute")
771        System_ParamArrayAttribute__ctor = GetConstructor(System_ParamArrayAttribute)
772        System_Nullable1 = [GetType](mscorlib, "System.Nullable`1")
773        System_Nullable1__get_HasValue = GetMethod(System_Nullable1, "get_HasValue")
774        System_Nullable1__GetValueOrDefault = GetMethod(System_Nullable1, "GetValueOrDefault")
775        System_Runtime_CompilerServices_RuntimeHelpers = [GetType](mscorlib, "System.Runtime.CompilerServices.RuntimeHelpers")
776        System_STAThreadAttribute = [GetType](mscorlib, "System.STAThreadAttribute")
777        System_STAThreadAttribute__ctor = GetConstructor(System_STAThreadAttribute)
778        System_IntPtr = [GetType](mscorlib, "System.IntPtr")
779        System_Runtime_CompilerServices_DateTimeConstantAttribute = [GetType](mscorlib, "System.Runtime.CompilerServices.DateTimeConstantAttribute")
780        System_Runtime_CompilerServices_DateTimeConstantAttribute__ctor_Int64 = GetConstructor(System_Runtime_CompilerServices_DateTimeConstantAttribute, System_Int64)
781        System_DateTime__ctor_Int64 = GetConstructor(System_DateTime, System_Int64)
782        System_Decimal__ctor_Int32 = GetConstructor(System_Decimal, System_Int32)
783        System_Decimal__ctor_Int64 = GetConstructor(System_Decimal, System_Int64)
784        System_Decimal__ctor_Double = GetConstructor(System_Decimal, System_Double)
785        System_Decimal__ctor_Single = GetConstructor(System_Decimal, System_Single)
786        System_Decimal__ctor_UInt64 = GetConstructor(System_Decimal, System_UInt64)
787        System_Decimal__ctor_Int32_Int32_Int32_Boolean_Byte = GetConstructor(System_Decimal, System_Int32, System_Int32, System_Int32, System_Boolean, System_Byte)
788        System_Decimal__Zero = GetField(System_Decimal, "Zero")
789        System_Decimal__One = GetField(System_Decimal, "One")
790        System_Decimal__MinusOne = GetField(System_Decimal, "MinusOne")
791        System_Runtime_CompilerServices_DecimalConstantAttribute = [GetType](mscorlib, "System.Runtime.CompilerServices.DecimalConstantAttribute")
792        System_Runtime_CompilerServices_DecimalConstantAttribute__ctor_Byte_Byte_UInt32_UInt32_UInt32 = GetConstructor(System_Runtime_CompilerServices_DecimalConstantAttribute, System_Byte, System_Byte, System_UInt32, System_UInt32, System_UInt32)
793        System_Runtime_CompilerServices_DecimalConstantAttribute__ctor_Byte_Byte_Int32_Int32_Int32 = GetConstructor(System_Runtime_CompilerServices_DecimalConstantAttribute, System_Byte, System_Byte, System_Int32, System_Int32, System_Int32)
794        System_Runtime_CompilerServices_AccessedThroughPropertyAttribute = [GetType](mscorlib, "System.Runtime.CompilerServices.AccessedThroughPropertyAttribute")
795        System_Runtime_CompilerServices_AccessedThroughPropertyAttribute__ctor_String = GetConstructor(System_Runtime_CompilerServices_AccessedThroughPropertyAttribute, System_String)
796        System_Decimal__Compare_Decimal_Decimal = GetMethod(System_Decimal, "Compare", System_Decimal, System_Decimal)
797        System_DateTime__Compare_DateTime_DateTime = GetMethod(System_DateTime, "Compare", System_DateTime, System_DateTime)
798        System_Decimal__Add_Decimal_Decimal = GetMethod(System_Decimal, "Add", System_Decimal, System_Decimal)
799        System_Decimal__Subtract_Decimal_Decimal = GetMethod(System_Decimal, "Subtract", System_Decimal, System_Decimal)
800        System_Decimal__Divide_Decimal_Decimal = GetMethod(System_Decimal, "Divide", System_Decimal, System_Decimal)
801        System_Decimal__Multiply_Decimal_Decimal = GetMethod(System_Decimal, "Multiply", System_Decimal, System_Decimal)
802        System_Decimal__Remainder_Decimal_Decimal = GetMethod(System_Decimal, "Remainder", System_Decimal, System_Decimal)
803        System_Decimal__Negate_Decimal = GetMethod(System_Decimal, "Negate", System_Decimal)
804        System_Reflection_DefaultMemberAttribute = [GetType](mscorlib, "System.Reflection.DefaultMemberAttribute")
805        System_Reflection_DefaultMemberAttribute__ctor_String = GetConstructor(System_Reflection_DefaultMemberAttribute, System_String)
806        System_Convert = [GetType](mscorlib, "System.Convert")
807        System_Convert__ToSingle_Decimal = GetMethod(System_Convert, "ToSingle", System_Decimal)
808        System_Convert__ToDouble_Decimal = GetMethod(System_Convert, "ToDouble", System_Decimal)
809        System_Convert__ToBoolean_Decimal = GetMethod(System_Convert, "ToBoolean", System_Decimal)
810        System_Convert__ToByte_Decimal = GetMethod(System_Convert, "ToByte", System_Decimal)
811        System_Convert__ToSByte_Decimal = GetMethod(System_Convert, "ToSByte", System_Decimal)
812        System_Convert__ToInt16_Decimal = GetMethod(System_Convert, "ToInt16", System_Decimal)
813        System_Convert__ToUInt16_Decimal = GetMethod(System_Convert, "ToUInt16", System_Decimal)
814        System_Convert__ToInt32_Decimal = GetMethod(System_Convert, "ToInt32", System_Decimal)
815        System_Convert__ToUInt32_Decimal = GetMethod(System_Convert, "ToUInt32", System_Decimal)
816        System_Convert__ToInt64_Decimal = GetMethod(System_Convert, "ToInt64", System_Decimal)
817        System_Convert__ToUInt64_Decimal = GetMethod(System_Convert, "ToUInt64", System_Decimal)
818        System_String__Concat_String_String = GetMethod(System_String, "Concat", System_String, System_String)
819        System_Diagnostics_Debugger = [GetType](mscorlib, "System.Diagnostics.Debugger")
820        System_Diagnostics_Debugger__Break = GetMethod(System_Diagnostics_Debugger, "Break")
821        System_Reflection_Missing = [GetType](mscorlib, "System.Reflection.Missing")
822        System_Reflection_Missing__Value = GetField(System_Reflection_Missing, "Value")
823        System_Threading_Monitor = [GetType](mscorlib, "System.Threading.Monitor")
824        System_Threading_Monitor__Enter_Object = GetMethod(System_Threading_Monitor, "Enter", System_Object)
825        System_Threading_Monitor__Exit_Object = GetMethod(System_Threading_Monitor, "Exit", System_Object)
826        System_Runtime_CompilerServices_RuntimeHelpers__GetObjectValue_Object = GetMethod(System_Runtime_CompilerServices_RuntimeHelpers, "GetObjectValue", System_Object)
827        System_Math = [GetType](mscorlib, "System.Math")
828        System_Math__Round_Double = GetMethod(System_Math, "Round", System_Double)
829        System_Math__Pow_Double_Double = GetMethod(System_Math, "Pow", System_Double, System_Double)
830        System_Runtime_InteropServices_DllImportAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.DllImportAttribute")
831        System_Runtime_InteropServices_MarshalAsAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.MarshalAsAttribute")
832        System_Runtime_InteropServices_StructLayoutAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.StructLayoutAttribute")
833        System_Runtime_InteropServices_FieldOffsetAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.FieldOffsetAttribute")
834        System_Runtime_InteropServices_CoClassAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.CoClassAttribute")
835        System_Runtime_InteropServices_OutAttribute = [GetType](mscorlib, "System.Runtime.InteropServices.OutAttribute")
836        System_Security_Permissions_SecurityAttribute = [GetType](mscorlib, "System.Security.Permissions.SecurityAttribute")
837        System_Windows_Forms_Form = [GetType](winforms, "System.Windows.Forms.Form")
838        System_Windows_Forms_Application = [GetType](winforms, "System.Windows.Forms.Application")
839        System_Windows_Forms_Application__Run = GetMethod(System_Windows_Forms_Application, "Run", System_Windows_Forms_Form)
840        System_Delegate__Combine = GetMethod(System_Delegate, "Combine", System_Delegate, System_Delegate)
841        System_Delegate__Remove = GetMethod(System_Delegate, "Remove", System_Delegate, System_Delegate)
842    End Sub
843
844    Public Overrides Sub InitInternalVB()
845        MS_VB_CompareMethod = GetVBType("Microsoft.VisualBasic.CompareMethod")
846        MS_VB_CS_Conversions = GetVBType("Microsoft.VisualBasic.CompilerServices.Conversions")
847        MS_VB_CS_ProjectData = GetVBType("Microsoft.VisualBasic.CompilerServices.ProjectData")
848        MS_VB_CS_LikeOperator = GetVBType("Microsoft.VisualBasic.CompilerServices.LikeOperator")
849        MS_VB_Strings = GetVBType("Microsoft.VisualBasic.Strings")
850        MS_VB_CS_StringType = GetVBType("Microsoft.VisualBasic.CompilerServices.StringType")
851        MS_VB_MyGroupCollectionAttribute = GetVBType("Microsoft.VisualBasic.MyGroupCollectionAttribute")
852        MS_VB_CallType = GetVBType("Microsoft.VisualBasic.CallType")
853        MS_VB_Information = GetVBType("Microsoft.VisualBasic.Information")
854        MS_VB_Interaction = GetVBType("Microsoft.VisualBasic.Interaction")
855        MS_VB_CS_Versioned = GetVBType("Microsoft.VisualBasic.CompilerServices.Versioned")
856        MS_VB_CS_StandardModuleAttribute = GetVBType("Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute")
857        MS_VB_CS_Operators = GetVBType("Microsoft.VisualBasic.CompilerServices.Operators")
858        MS_VB_CS_ObjectFlowControl = GetVBType("Microsoft.VisualBasic.CompilerServices.ObjectFlowControl")
859        If MS_VB_CS_ObjectFlowControl IsNot Nothing Then
860            For i As Integer = 0 To MS_VB_CS_ObjectFlowControl.NestedTypes.Count - 1
861                If MS_VB_CS_ObjectFlowControl.NestedTypes(i).Name = "ForLoopControl" Then
862                    MS_VB_CS_ObjectFlowControl_ForLoopControl = MS_VB_CS_ObjectFlowControl.NestedTypes(i)
863                    Exit For
864                End If
865            Next
866        End If
867        MS_VB_CS_Utils = GetVBType("Microsoft.VisualBasic.CompilerServices.Utils")
868        MS_VB_CS_OptionCompareAttribute = GetVBType("Microsoft.VisualBasic.CompilerServices.OptionCompareAttribute")
869        MS_VB_CS_OptionTextAttribute = GetVBType("Microsoft.VisualBasic.CompilerServices.OptionTextAttribute")
870        MS_VB_CS_StaticLocalInitFlag = GetVBType("Microsoft.VisualBasic.CompilerServices.StaticLocalInitFlag")
871        MS_VB_CS_DesignerGeneratedAttribute = GetVBType("Microsoft.VisualBasic.CompilerServices.DesignerGeneratedAttribute")
872        MS_VB_CS_IncompleteInitialization = GetVBType("Microsoft.VisualBasic.CompilerServices.IncompleteInitialization")
873        MS_VB_CS_NewLateBinding = GetVBType("Microsoft.VisualBasic.CompilerServices.NewLateBinding")
874        MS_VB_CS_LateBinding = GetVBType("Microsoft.VisualBasic.CompilerServices.LateBinding")
875    End Sub
876
877    Public Overrides Sub InitInternalVBMembers()
878        MS_VB_Information__IsNumeric = GetMethod(MS_VB_Information, "IsNumeric", System_Object)
879        MS_VB_Information__SystemTypeName = GetMethod(MS_VB_Information, "SystemTypeName", System_String)
880        MS_VB_Information__TypeName = GetMethod(MS_VB_Information, "TypeName", System_Object)
881        MS_VB_Information__VbTypeName = GetMethod(MS_VB_Information, "VbTypeName", System_String)
882        MS_VB_Interaction__CallByName = GetMethod(MS_VB_Interaction, "CallByName", System_Object, System_String, MS_VB_CallType, System_Object_Array)
883        MS_VB_CS_Versioned__IsNumeric = GetMethod(MS_VB_CS_Versioned, "IsNumeric", System_Object)
884        MS_VB_CS_Versioned__SystemTypeName = GetMethod(MS_VB_CS_Versioned, "SystemTypeName", System_String)
885        MS_VB_CS_Versioned__TypeName = GetMethod(MS_VB_CS_Versioned, "TypeName", System_Object)
886        MS_VB_CS_Versioned__VbTypeName = GetMethod(MS_VB_CS_Versioned, "VbTypeName", System_String)
887        MS_VB_CS_Versioned__CallByName = GetMethod(MS_VB_CS_Versioned, "CallByName", System_Object, System_String, MS_VB_CallType, System_Object_Array)
888        MS_VB_CS_StaticLocalInitFlag__State = GetField(MS_VB_CS_StaticLocalInitFlag, "State")
889        MS_VB_CS_StaticLocalInitFlag__ctor = GetConstructor(MS_VB_CS_StaticLocalInitFlag)
890        MS_VB_CS_IncompleteInitialization__ctor = GetConstructor(MS_VB_CS_IncompleteInitialization)
891        MS_VB_CS_NewLateBinding__LateGet_Object_Type_String_Array_Array_Array_Array = GetMethod(MS_VB_CS_NewLateBinding, "LateGet", System_Object, System_Type, System_String, System_Object_Array, System_String_Array, System_Type_Array, System_Boolean_Array)
892        MS_VB_CS_NewLateBinding__LateSet_Object_Type_String_Array_Array_Array = GetMethod(MS_VB_CS_NewLateBinding, "LateSet", System_Object, System_Type, System_String, System_Object_Array, System_String_Array, System_Type_Array)
893        MS_VB_CS_NewLateBinding__LateIndexGet_Object_Array_Array = GetMethod(MS_VB_CS_NewLateBinding, "LateIndexGet", System_Object, System_Object_Array, System_String_Array)
894        MS_VB_CS_NewLateBinding__LateIndexSet_Object_Array_Array = GetMethod(MS_VB_CS_NewLateBinding, "LateIndexSet", System_Object, System_Object_Array, System_String_Array)
895        MS_VB_CS_NewLateBinding__LateCall_Object_Type_String_Array_Array_Array_Array_Boolean = GetMethod(MS_VB_CS_NewLateBinding, "LateCall", System_Object, System_Type, System_String, System_Object_Array, System_String_Array, System_Type_Array, System_Boolean_Array, System_Boolean)
896        MS_VB_CS_ProjectData__EndApp = GetMethod(MS_VB_CS_ProjectData, "EndApp")
897        MS_VB_CS_ProjectData__CreateProjectError_Int32 = GetMethod(MS_VB_CS_ProjectData, "CreateProjectError", System_Int32)
898        MS_VB_CS_ProjectData__ClearProjectError = GetMethod(MS_VB_CS_ProjectData, "ClearProjectError")
899        MS_VB_CS_ProjectData__SetProjectError_Exception = GetMethod(MS_VB_CS_ProjectData, "SetProjectError", System_Exception)
900        MS_VB_CS_ProjectData__SetProjectError_Exception_Int32 = GetMethod(MS_VB_CS_ProjectData, "SetProjectError", System_Exception, System_Int32)
901        MS_VB_CS_Conversions__ToBoolean_Object = GetMethod(MS_VB_CS_Conversions, "ToBoolean", System_Object)
902        MS_VB_CS_Conversions__ToChar_Object = GetMethod(MS_VB_CS_Conversions, "ToChar", System_Object)
903        MS_VB_CS_Conversions__ToDate_Object = GetMethod(MS_VB_CS_Conversions, "ToDate", System_Object)
904        MS_VB_CS_Conversions__ToByte_Object = GetMethod(MS_VB_CS_Conversions, "ToByte", System_Object)
905        MS_VB_CS_Conversions__ToSByte_Object = GetMethod(MS_VB_CS_Conversions, "ToSByte", System_Object)
906        MS_VB_CS_Conversions__ToShort_Object = GetMethod(MS_VB_CS_Conversions, "ToShort", System_Object)
907        MS_VB_CS_Conversions__ToUShort_Object = GetMethod(MS_VB_CS_Conversions, "ToUShort", System_Object)
908        MS_VB_CS_Conversions__ToInteger_Object = GetMethod(MS_VB_CS_Conversions, "ToInteger", System_Object)
909        MS_VB_CS_Conversions__ToUInteger_Object = GetMethod(MS_VB_CS_Conversions, "ToUInteger", System_Object)
910        MS_VB_CS_Conversions__ToLong_Object = GetMethod(MS_VB_CS_Conversions, "ToLong", System_Object)
911        MS_VB_CS_Conversions__ToULong_Object = GetMethod(MS_VB_CS_Conversions, "ToULong", System_Object)
912        MS_VB_CS_Conversions__ToSingle_Object = GetMethod(MS_VB_CS_Conversions, "ToSingle", System_Object)
913        MS_VB_CS_Conversions__ToDouble_Object = GetMethod(MS_VB_CS_Conversions, "ToDouble", System_Object)
914        MS_VB_CS_Conversions__ToDecimal_Object = GetMethod(MS_VB_CS_Conversions, "ToDecimal", System_Object)
915        MS_VB_CS_Conversions__ToBoolean_String = GetMethod(MS_VB_CS_Conversions, "ToBoolean", System_String)
916        MS_VB_CS_Conversions__ToChar_String = GetMethod(MS_VB_CS_Conversions, "ToChar", System_String)
917        MS_VB_CS_Conversions__ToDate_String = GetMethod(MS_VB_CS_Conversions, "ToDate", System_String)
918        MS_VB_CS_Conversions__ToByte_String = GetMethod(MS_VB_CS_Conversions, "ToByte", System_String)
919        MS_VB_CS_Conversions__ToSByte_String = GetMethod(MS_VB_CS_Conversions, "ToSByte", System_String)
920        MS_VB_CS_Conversions__ToShort_String = GetMethod(MS_VB_CS_Conversions, "ToShort", System_String)
921        MS_VB_CS_Conversions__ToUShort_String = GetMethod(MS_VB_CS_Conversions, "ToUShort", System_String)
922        MS_VB_CS_Conversions__ToInteger_String = GetMethod(MS_VB_CS_Conversions, "ToInteger", System_String)
923        MS_VB_CS_Conversions__ToUInteger_String = GetMethod(MS_VB_CS_Conversions, "ToUInteger", System_String)
924        MS_VB_CS_Conversions__ToLong_String = GetMethod(MS_VB_CS_Conversions, "ToLong", System_String)
925        MS_VB_CS_Conversions__ToULong_String = GetMethod(MS_VB_CS_Conversions, "ToULong", System_String)
926        MS_VB_CS_Conversions__ToSingle_String = GetMethod(MS_VB_CS_Conversions, "ToSingle", System_String)
927        MS_VB_CS_Conversions__ToDouble_String = GetMethod(MS_VB_CS_Conversions, "ToDouble", System_String)
928        MS_VB_CS_Conversions__ToDecimal_String = GetMethod(MS_VB_CS_Conversions, "ToDecimal", System_String)
929        MS_VB_CS_Conversions__ToDecimal_Boolean = GetMethod(MS_VB_CS_Conversions, "ToDecimal", System_Boolean)
930        MS_VB_CS_Conversions__ToString_Decimal = GetMethod(MS_VB_CS_Conversions, "ToString", System_Decimal)
931        MS_VB_CS_Conversions__ToString_Boolean = GetMethod(MS_VB_CS_Conversions, "ToString", System_Boolean)
932        MS_VB_CS_Conversions__ToString_Char = GetMethod(MS_VB_CS_Conversions, "ToString", System_Char)
933        MS_VB_CS_Conversions__ToString_DateTime = GetMethod(MS_VB_CS_Conversions, "ToString", System_DateTime)
934        MS_VB_CS_Conversions__ToString_Byte = GetMethod(MS_VB_CS_Conversions, "ToString", System_Byte)
935        MS_VB_CS_Conversions__ToString_Int32 = GetMethod(MS_VB_CS_Conversions, "ToString", System_Int32)
936        MS_VB_CS_Conversions__ToString_UInt32 = GetMethod(MS_VB_CS_Conversions, "ToString", System_UInt32)
937        MS_VB_CS_Conversions__ToString_Int64 = GetMethod(MS_VB_CS_Conversions, "ToString", System_Int64)
938        MS_VB_CS_Conversions__ToString_UInt64 = GetMethod(MS_VB_CS_Conversions, "ToString", System_UInt64)
939        MS_VB_CS_Conversions__ToString_Single = GetMethod(MS_VB_CS_Conversions, "ToString", System_Single)
940        MS_VB_CS_Conversions__ToString_Double = GetMethod(MS_VB_CS_Conversions, "ToString", System_Double)
941        MS_VB_CS_Conversions__ToString_Object = GetMethod(MS_VB_CS_Conversions, "ToString", System_Object)
942        MS_VB_CS_Conversions__ToGenericParameter_Object = GetMethod(MS_VB_CS_Conversions, "ToGenericParameter", System_Object)
943        MS_VB_CS_Conversions__ChangeType_Object_Type = GetMethod(MS_VB_CS_Conversions, "ChangeType", System_Object, System_Type)
944        MS_VB_CS_Conversions__ToCharArrayRankOne_String = GetMethod(MS_VB_CS_Conversions, "ToCharArrayRankOne", System_String)
945        MS_VB_CS_LikeOperator__LikeString_String_String_CompareMethod = GetMethod(MS_VB_CS_LikeOperator, "LikeString", System_String, System_String, MS_VB_CompareMethod)
946        MS_VB_CS_LikeOperator__LikeObject_Object_Object_CompareMethod = GetMethod(MS_VB_CS_LikeOperator, "LikeObject", System_Object, System_Object, MS_VB_CompareMethod)
947        MS_VB_CS_StringType__MidStmtStr_String_Int32_Int32_String = GetMethod(MS_VB_CS_StringType, "MidStmtStr", System_String_ByRef, System_Int32, System_Int32, System_String)
948        MS_VB_CS_ObjectFlowControl__CheckForSyncLockOnValueType_Object = GetMethod(MS_VB_CS_ObjectFlowControl, "CheckForSyncLockOnValueType", System_Object)
949        MS_VB_CS_ObjectFlowControl_ForLoopControl__ForLoopInitObj_Object_Object_Object_Object_Object_Object = GetMethod(MS_VB_CS_ObjectFlowControl_ForLoopControl, "ForLoopInitObj", System_Object, System_Object, System_Object, System_Object, System_Object_ByRef, System_Object_ByRef)
950        MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckDec_Decimal_Decimal_Decimal = GetMethod(MS_VB_CS_ObjectFlowControl_ForLoopControl, "ForNextCheckDec", System_Decimal, System_Decimal, System_Decimal)
951        MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckObj_Object_Object_Object = GetMethod(MS_VB_CS_ObjectFlowControl_ForLoopControl, "ForNextCheckObj", System_Object, System_Object, System_Object_ByRef)
952        MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckR4_Single_Single_Single = GetMethod(MS_VB_CS_ObjectFlowControl_ForLoopControl, "ForNextCheckR4", System_Single, System_Single, System_Single)
953        MS_VB_CS_ObjectFlowControl_ForLoopControl__ForNextCheckR8_Double_Double_Double = GetMethod(MS_VB_CS_ObjectFlowControl_ForLoopControl, "ForNextCheckR8", System_Double, System_Double, System_Double)
954        MS_VB_CS_Utils__CopyArray_Array_Array = GetMethod(MS_VB_CS_Utils, "CopyArray", System_Array, System_Array)
955        MS_VB_CS_Operators__ConditionalCompareObjectEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectEqual", System_Object, System_Object, System_Boolean)
956        MS_VB_CS_Operators__ConditionalCompareObjectNotEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectNotEqual", System_Object, System_Object, System_Boolean)
957        MS_VB_CS_Operators__ConditionalCompareObjectGreater_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectGreater", System_Object, System_Object, System_Boolean)
958        MS_VB_CS_Operators__ConditionalCompareObjectGreaterEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectGreaterEqual", System_Object, System_Object, System_Boolean)
959        MS_VB_CS_Operators__ConditionalCompareObjectLess_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectLess", System_Object, System_Object, System_Boolean)
960        MS_VB_CS_Operators__ConditionalCompareObjectLessEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "ConditionalCompareObjectLessEqual", System_Object, System_Object, System_Boolean)
961        MS_VB_CS_Operators__CompareString_String_String_Boolean = GetMethod(MS_VB_CS_Operators, "CompareString", System_String, System_String, System_Boolean)
962        MS_VB_CS_Operators__ConcatenateObject_Object_Object = GetMethod(MS_VB_CS_Operators, "ConcatenateObject", System_Object, System_Object)
963        MS_VB_CS_Operators__AddObject_Object_Object = GetMethod(MS_VB_CS_Operators, "AddObject", System_Object, System_Object)
964        MS_VB_CS_Operators__AndObject_Object_Object = GetMethod(MS_VB_CS_Operators, "AndObject", System_Object, System_Object)
965        MS_VB_CS_Operators__DivideObject_Object_Object = GetMethod(MS_VB_CS_Operators, "DivideObject", System_Object, System_Object)
966        MS_VB_CS_Operators__ExponentObject_Object_Object = GetMethod(MS_VB_CS_Operators, "ExponentObject", System_Object, System_Object)
967        MS_VB_CS_Operators__IntDivideObject_Object_Object = GetMethod(MS_VB_CS_Operators, "IntDivideObject", System_Object, System_Object)
968        MS_VB_CS_Operators__LeftShiftObject_Object_Object = GetMethod(MS_VB_CS_Operators, "LeftShiftObject", System_Object, System_Object)
969        MS_VB_CS_Operators__ModObject_Object_Object = GetMethod(MS_VB_CS_Operators, "ModObject", System_Object, System_Object)
970        MS_VB_CS_Operators__MultiplyObject_Object_Object = GetMethod(MS_VB_CS_Operators, "MultiplyObject", System_Object, System_Object)
971        MS_VB_CS_Operators__NegateObject_Object = GetMethod(MS_VB_CS_Operators, "NegateObject", System_Object)
972        MS_VB_CS_Operators__NotObject_Object = GetMethod(MS_VB_CS_Operators, "NotObject", System_Object)
973        MS_VB_CS_Operators__OrObject_Object_Object = GetMethod(MS_VB_CS_Operators, "OrObject", System_Object, System_Object)
974        MS_VB_CS_Operators__PlusObject_Object = GetMethod(MS_VB_CS_Operators, "PlusObject", System_Object)
975        MS_VB_CS_Operators__RightShiftObject_Object_Object = GetMethod(MS_VB_CS_Operators, "RightShiftObject", System_Object, System_Object)
976        MS_VB_CS_Operators__SubtractObject_Object_Object = GetMethod(MS_VB_CS_Operators, "SubtractObject", System_Object, System_Object)
977        MS_VB_CS_Operators__XorObject_Object_Object = GetMethod(MS_VB_CS_Operators, "XorObject", System_Object, System_Object)
978        MS_VB_CS_Operators__LikeObject_Object_Object_CompareMethod = GetMethod(MS_VB_CS_Operators, "LikeObject", System_Object, System_Object, MS_VB_CompareMethod)
979        MS_VB_CS_Operators__LikeString_String_String_CompareMethod = GetMethod(MS_VB_CS_Operators, "LikeString", System_String, System_String, MS_VB_CompareMethod)
980        MS_VB_CS_Operators__CompareObjectEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectEqual", System_Object, System_Object, System_Boolean)
981        MS_VB_CS_Operators__CompareObjectNotEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectNotEqual", System_Object, System_Object, System_Boolean)
982        MS_VB_CS_Operators__CompareObjectGreater_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectGreater", System_Object, System_Object, System_Boolean)
983        MS_VB_CS_Operators__CompareObjectGreaterEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectGreaterEqual", System_Object, System_Object, System_Boolean)
984        MS_VB_CS_Operators__CompareObjectLess_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectLess", System_Object, System_Object, System_Boolean)
985        MS_VB_CS_Operators__CompareObjectLessEqual_Object_Object_Boolean = GetMethod(MS_VB_CS_Operators, "CompareObjectLessEqual", System_Object, System_Object, System_Boolean)
986    End Sub
987
988End Class
989
990
991
992'END SRE
993
994