2 // Copyright (c) 2003, 2004, 2005 Rodrigo B. de Oliveira (rbo@acm.org)
3 // All rights reserved.
5 // Redistribution and use in source and binary forms, with or without modification,
6 // are permitted provided that the following conditions are met:
8 // * Redistributions of source code must retain the above copyright notice,
9 // this list of conditions and the following disclaimer.
10 // * Redistributions in binary form must reproduce the above copyright notice,
11 // this list of conditions and the following disclaimer in the documentation
12 // and/or other materials provided with the distribution.
13 // * Neither the name of Rodrigo B. de Oliveira nor the names of its
14 // contributors may be used to endorse or promote products derived from this
15 // software without specific prior written permission.
17 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
18 // ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19 // WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
20 // DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
21 // FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
23 // SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
24 // CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
25 // OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 using System
.Reflection
;
32 using System
.Reflection
.Emit
;
34 namespace Boo
.Lang
.Runtime
36 class SetFieldEmitter
: DispatcherEmitter
38 private readonly FieldInfo _field
;
39 private Type _argumentType
;
41 public SetFieldEmitter(FieldInfo field
, Type argumentType
)
42 : base(field
.DeclaringType
, field
.Name
+ "=")
45 _argumentType
= argumentType
;
48 protected override void EmitMethodBody()
50 LocalBuilder
value = DeclareLocal(_field
.FieldType
);
57 _il
.Emit(OpCodes
.Stsfld
, _field
);
61 EmitLoadTargetObject(_field
.DeclaringType
);
63 _il
.Emit(OpCodes
.Stfld
, _field
);
67 EmitReturn(_field
.FieldType
);
70 private void EmitLoadValue()
72 EmitArgArrayElement(0);
73 EmitCoercion(_argumentType
, _field
.FieldType
, CandidateMethod
.CalculateArgumentScore(_field
.FieldType
, _argumentType
));