示例#1
0
        public override AstNode Visit(SetAccessorDefinition node)
        {
            // Ignore pure declarations.
            if(node.GetChildren() == null)
                return node;

            // Update the scope.
            PushScope(node.GetScope());

            // Visit the children.
            VisitList(node.GetChildren());

            // Restore the scope.
            PopScope();

            return node;
        }
示例#2
0
 public virtual AstNode Visit(SetAccessorDefinition node)
 {
     throw new System.NotImplementedException();
 }
示例#3
0
        public override AstNode Visit(SetAccessorDefinition node)
        {
            // Begin the node.
            builder.BeginNode(node);

            // Get the function.
            Function function = node.GetFunction();

            // Ignore declarations.
            if(node.GetChildren() == null)
                return builder.EndNode();

            // Store the old function.
            Function oldFunction = currentFunction;
            currentFunction = function;

            // Get and update lexical scope.
            LexicalScope topScope = (LexicalScope)node.GetScope();
            PushScope(topScope);

            // Create the top basic block.
            BasicBlock topBlock = CreateBasicBlock();
            topBlock.SetName("top");
            builder.SetBlock(topBlock);

            // Prepare returning, required by exception handling.
            PrepareReturning(node, function, topScope);

            // Store the indices in local variables.
            int index = function.IsStatic() ? 0 : 1;
            foreach(LocalVariable indexLocal in node.GetIndexerVariables())
            {
                builder.CreateLoadArg((byte)index++);
                builder.CreateStoreLocal(indexLocal);
            }

            // Store the "value" argument in a local variable.
            LocalVariable valueLocal = node.GetValueLocal();
            builder.CreateLoadArg((byte)index++);
            builder.CreateStoreLocal(valueLocal);

            // Visit his children.
            VisitList(node.GetChildren());

            // Finish return.
            FinishReturn(node, function);

            // Restore the scope.
            PopScope();

            // Restore the current function.
            currentFunction = oldFunction;

            return builder.EndNode();
        }
示例#4
0
 public virtual AstNode Visit(SetAccessorDefinition node)
 {
     throw new System.NotImplementedException();
 }
示例#5
0
文件: Parser.cs 项目: ronsaldo/chela
void case_443()
#line 1445 "Parser.y"
{
                           string name = (string)((TokenValue)yyVals[-2+yyTop]).GetValue();
                           if(name == "get")
                               yyVal = new GetAccessorDefinition(((MemberFlags)yyVals[-3+yyTop]), null, ((TokenValue)yyVals[-2+yyTop]));
                           else if(name == "set")
                               yyVal = new SetAccessorDefinition(((MemberFlags)yyVals[-3+yyTop]), null, ((TokenValue)yyVals[-2+yyTop]));
                           else
                               Error(((TokenValue)yyVals[-2+yyTop]), "only get and set property accessors are supported.");
                         }
示例#6
0
        public override AstNode Visit(SetAccessorDefinition node)
        {
            PropertyVariable property = node.GetProperty();

            if(node.GetChildren() == null && property.SetAccessor != null)
                return node;

            if(node.GetChildren() != null && property.SetAccessor != null)
                Error(node, "multiples definitions of the set accessor.");

            // Build the property flags.
            MemberFlags flags = node.GetFlags();
            if(flags == MemberFlags.ImplicitVis)
            {
                flags = property.GetFlags();
            }
            else
            {
                // TODO: Check compatibility.
                flags |= property.GetFlags() & ~MemberFlags.VisibilityMask;
            }

            // Get the instance type.
            MemberFlags instanceFlags = MemberFlags.InstanceMask & flags;

            // Abstract properties cannot have a body.
            if((instanceFlags == MemberFlags.Abstract ||
               instanceFlags == MemberFlags.Contract) && node.GetChildren() != null)
                Error(node, "abstract properties cannot have a definition body.");

            // Create the set accesor.
            if(property.SetAccessor == null)
            {
                // Create the argument list.
                List<IChelaType> arguments = new List<IChelaType> ();

                // Add the this argument.
                IChelaType selfType = null;
                if(currentContainer.IsStructure() || currentContainer.IsClass() || currentContainer.IsInterface())
                {
                    Structure building = (Structure) currentContainer;
                    if(instanceFlags != MemberFlags.Static)
                    {
                        // Instance the building.
                        building = building.GetSelfInstance();

                        // Create the self parameter.
                        selfType = ReferenceType.Create(building);
                        arguments.Add(selfType);
                    }
                }

                // Append the indices.
                foreach(IChelaType indexType in property.Indices)
                    arguments.Add(indexType);

                // Add the value argument.
                arguments.Add(property.GetVariableType());

                // Create the function type.
                FunctionType functionType = FunctionType.Create(ChelaType.GetVoidType(), arguments, false);

                // Create the function.
                Function accessor;
                if(selfType != null)
                    accessor = new Method("set_" + property.GetName(), flags, currentContainer);
                else
                    accessor = new Function("set_" + property.GetName(), flags, currentContainer);

                // Set the arguments.
                accessor.SetFunctionType(functionType);

                // Set the function position.
                accessor.Position = node.GetPosition();

                // Store the function in the property.
                property.SetAccessor = accessor;

                // Store the function in his scope.
                if(currentContainer.IsStructure() || currentContainer.IsClass() || currentContainer.IsInterface())
                {
                    Structure building = (Structure)currentContainer;
                    building.AddFunction("set_" + property.GetName(), accessor);
                }
                else if(currentContainer.IsNamespace())
                {
                    Namespace space = (Namespace)currentContainer;
                    space.AddMember(accessor);
                }
                else
                {
                    Error(node, "a property cannot be declared here.");
                }

                // If there's a body, declare the "argument" variables.
                if(node.GetChildren() != null)
                {
                    LexicalScope scope = CreateLexicalScope(node, accessor);

                    // Add the "this" local.
                    if(selfType != null)
                        new ArgumentVariable(0, "this", scope, selfType);

                    // Add the "value" local
                    LocalVariable valueVar = new LocalVariable("value", scope, property.GetVariableType());
                    node.SetValueLocal(valueVar);

                    // Add the indices variables.
                    AstNode index = node.GetIndices();
                    List<LocalVariable> indexerVars = new List<LocalVariable> ();
                    while(index != null)
                    {
                        // Create the local
                        LocalVariable local = new LocalVariable(index.GetName(), scope, index.GetNodeType());
                        indexerVars.Add(local);

                        // Process the next.
                        index = index.GetNext();
                    }
                    node.SetIndexerVariables(indexerVars);
                    node.SetScope(scope);
                }
            }
            else
            {
                // Check for declaration compatibility.
                if(flags != property.SetAccessor.GetFlags())
                    Error(node, "incompatible set accessor declarations.");
            }

            // Set the node function to the accessor.
            node.SetFunction(property.SetAccessor);

            return node;
        }
示例#7
0
        public override AstNode Visit(SetAccessorDefinition node)
        {
            // Get the function.
            Function function = node.GetFunction();
            if(node.GetChildren() == null)
                return node;

            // Store the old function.
            Function oldFunction = currentFunction;
            currentFunction = function;

            // Update the scope.
            PushScope(node.GetScope());

            // Visit his children.
            VisitList(node.GetChildren());

            // Restore the scope.
            PopScope();

            // Restore the current function.
            currentFunction = oldFunction;

            return node;
        }