**** Merged from MCS ****
[mono-project.git] / mcs / class / Microsoft.JScript / Microsoft.JScript / ArrayLiteral.cs
blobd51f15388b3075bd241e93a106d6a08012c0f396
1 //
2 // ArrayLiteral.cs:
3 //
4 // Author:
5 // Cesar Octavio Lopez Nataren
6 //
7 // (C) 2003, Cesar Octavio Lopez Nataren, <cesar@ciencias.unam.mx>
8 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 //
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 //
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
31 using System;
32 using System.Collections;
33 using System.Reflection;
34 using System.Reflection.Emit;
36 namespace Microsoft.JScript {
38 public class ArrayLiteral : AST {
40 internal ASTList elems;
41 int skip_count;
43 public ArrayLiteral (Context context, ASTList elems, int skip_count)
45 this.elems = elems;
46 this.skip_count = skip_count;
49 internal ArrayLiteral (AST parent)
51 this.parent = parent;
52 elems = new ASTList ();
55 internal override bool Resolve (IdentificationTable context)
57 bool r = true;
58 foreach (AST ast in elems.elems)
59 if (ast != null)
60 r &= ast.Resolve (context);
61 return r;
64 internal override void Emit (EmitContext ec)
66 int i = 0;
67 ILGenerator ig = ec.ig;
68 ArrayList exps = elems.elems;
69 FieldInfo missing = null;
70 if (skip_count != 0)
71 missing = typeof (Missing).GetField ("Value");
72 ig.Emit (OpCodes.Ldc_I4, elems.Size);
73 ig.Emit (OpCodes.Newarr, typeof (object));
74 foreach (AST ast in exps) {
75 ig.Emit (OpCodes.Dup);
76 ig.Emit (OpCodes.Ldc_I4, i);
77 if (ast != null)
78 ast.Emit (ec);
79 else
80 ig.Emit (OpCodes.Ldsfld, missing);
81 ig.Emit (OpCodes.Stelem_Ref);
82 i++;
84 ig.Emit (OpCodes.Call, typeof (Globals).GetMethod ("ConstructArrayLiteral"));