5 // Cesar Octavio Lopez Nataren
7 // (C) 2003, Cesar Octavio Lopez Nataren, <cesar@ciencias.unam.mx>
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:
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
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.
33 using System.Reflection;
34 using System.Collections;
36 namespace Microsoft.JScript {
38 public class FunctionObject : ScriptFunction, ICanModifyContext {
40 internal string type_annot;
43 internal Location location;
45 internal FunctionObject (string name)
47 this._prototype = ObjectConstructor.Ctr.ConstructObject ();
51 internal FunctionObject (MethodInfo info)
53 this._prototype = ObjectConstructor.Ctr.ConstructObject ();
55 this.name = info.Name;
56 this.attr = info.Attributes;
57 this.return_type = info.ReturnType;
60 internal FunctionObject (string name, FormalParameterList p, string ret_type, Block body, Location location)
62 this._prototype = ObjectConstructor.Ctr.ConstructObject ();
65 // 1) Must collect the attributes given.
66 // 2) Check if they are semantically correct.
67 // 3) Assign those values to 'attr'.
69 this.attr = MethodAttributes.Public | MethodAttributes.Static;
74 this.type_annot = ret_type;
76 // FIXME: Must check that return_type it's a valid type,
77 // and assign that to 'return_type' field.
79 this.return_type = typeof (void);
82 this.location = location;
85 public override int length {
87 if (this.parameters != null)
88 return this.parameters.ids.Count;
92 set { base.length = value; }
95 internal FunctionObject ()
97 this.parameters = new FormalParameterList (location);
100 internal Type [] params_types ()
102 if (parameters == null)
104 new Type [] {typeof (Object), typeof (Microsoft.JScript.Vsa.VsaEngine)};
107 ArrayList p = parameters.ids;
111 Type [] types = new Type [size];
113 types [0] = typeof (Object);
114 types [1] = typeof (Microsoft.JScript.Vsa.VsaEngine);
116 for (i = 2; i < size; i++)
117 types [i] = ((FormalParam) p [i - 2]).type;
123 void ICanModifyContext.PopulateContext (Environment env, string ns)
125 ((ICanModifyContext) body).PopulateContext (env, ns);
128 void ICanModifyContext.EmitDecls (EmitContext ec)
130 ((ICanModifyContext) body).EmitDecls (ec);