Exemplo n.º 1
0
        public Delegate SymbolFunction(Symbol id)
        {
            ILocation <Delegate> binding;

            if (functions.TryGetValue(id, out binding))
            {
                return(binding.Value);
            }
            if (id.NamesDotnetMethod())
            {
                Delegate gf = (Delegate)CL.EnsureGenericFunction(id, KW.GenericFunctionClass, CLOS.DotnetGenericFunction,
                                                                 KW.Environment, this,
                                                                 KW.StudlyName, id.Name);
                binding = new ValueCell <Delegate> (gf);
                return(binding.Value);
            }
            else
            {
                throw new NotImplementedException();
            }
        }