Author: rolf
Date: 2007-05-30 12:08:07 -0400 (Wed, 30 May 2007)
New Revision: 78231
Modified:
trunk/mono-basic/vbnc/vbnc/source/ChangeLog
trunk/mono-basic/vbnc/vbnc/source/Emit/Emitter.vb
Log:
* Emit/Emitter.vb: Small crasher fix.
Modified: trunk/mono-basic/vbnc/vbnc/source/ChangeLog
===================================================================
--- trunk/mono-basic/vbnc/vbnc/source/ChangeLog 2007-05-30 15:47:18 UTC (rev
78230)
+++ trunk/mono-basic/vbnc/vbnc/source/ChangeLog 2007-05-30 16:08:07 UTC (rev
78231)
@@ -1,5 +1,9 @@
2007-05-30 Rolf Bjarne Kvinge <[EMAIL PROTECTED]>
+ * Emit/Emitter.vb: Small crasher fix.
+
+2007-05-30 Rolf Bjarne Kvinge <[EMAIL PROTECTED]>
+
* Descriptors/ParameterDescriptor.vb: Implement RawDefaultValue.
* General/Helper.vb: Only use Missing.Value for missing optional
default value if the default value is actually missing
Modified: trunk/mono-basic/vbnc/vbnc/source/Emit/Emitter.vb
===================================================================
--- trunk/mono-basic/vbnc/vbnc/source/Emit/Emitter.vb 2007-05-30 15:47:18 UTC
(rev 78230)
+++ trunk/mono-basic/vbnc/vbnc/source/Emit/Emitter.vb 2007-05-30 16:08:07 UTC
(rev 78231)
@@ -1629,7 +1629,7 @@
Shared Sub EmitLoadValueAddress(ByVal Info As EmitInfo, ByVal Value As
Object)
Helper.Assert(Info.DesiredType.IsByRef)
EmitLoadValue(Info.Clone(Info.DesiredType.GetElementType), Value)
- Dim local As LocalBuilder =
Info.ILGen.DeclareLocal(Info.DesiredType.GetElementType)
+ Dim local As LocalBuilder =
Info.ILGen.DeclareLocal(Helper.GetTypeOrTypeBuilder(Info.DesiredType.GetElementType))
EmitStoreVariable(Info, local)
EmitLoadVariableLocation(Info, local)
End Sub
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
