Beispiel #1
0
        public SimpleRecResult GenerateName(CompilerState State, Identifier Id, ref string Out)
        {
            if (Id is TypeOfFunction)
            {
                var FuncType = Id as TypeOfFunction;
                var FuncCh   = FuncType.Children;
                var Rec      = State.Language.Root.GetObject <CallingConventionRecognizer>();
                var Mod      = Rec.GetCallingConventionName(FuncType.CallConv);

                Out = Mod + " " + FuncCh[0].Name.ToString() + "(";
                for (var i = 1; i < FuncCh.Length; i++)
                {
                    Out += State.GenerateName(FuncCh[i].TypeOfSelf);
                    if (i < FuncCh.Length - 1)
                    {
                        Out += ", ";
                    }
                }

                Out += ")";
                return(SimpleRecResult.Succeeded);
            }

            return(SimpleRecResult.Unknown);
        }
Beispiel #2
0
        public SimpleRecResult GenerateName(CompilerState State, Identifier Id, ref string Out)
        {
            if (Id is ReferenceType)
            {
                var RefType   = Id as ReferenceType;
                var ChildName = " " + State.GenerateName(RefType.Children[0]);
                if (RefType.Mode == ReferenceMode.Unsafe)
                {
                    Out = Operators[0] + ChildName;
                }
                else if (RefType.Mode == ReferenceMode.IdMustBeAssigned)
                {
                    Out = Operators[1] + ChildName;
                }
                else if (RefType.Mode == ReferenceMode.IdGetsAssigned)
                {
                    Out = Operators[2] + ChildName;
                }
                else
                {
                    throw new ApplicationException();
                }
                return(SimpleRecResult.Succeeded);
            }

            return(SimpleRecResult.Unknown);
        }
Beispiel #3
0
        public string GetFuncTypeName(CompilerState State, TypeOfFunction FuncType)
        {
            var FuncCh = FuncType.Children;
            var Rec    = State.Language.Root.GetObject <CallingConventionRecognizer>();
            var Mod    = Rec.GetCallingConventionName(FuncType.CallConv);

            var Out = Mod + " ";

            if (FuncCh.Length == 1)
            {
                Out += "void";
            }
            else
            {
                for (var i = 1; i < FuncCh.Length; i++)
                {
                    Out += State.GenerateName(FuncCh[i].TypeOfSelf);
                    if (i < FuncCh.Length - 1)
                    {
                        Out += ", ";
                    }
                }
            }

            Out += " -> ";
            var RetType = FuncCh[0];

            if (RetType.RealId is TupleType)
            {
                var Tuple   = RetType.RealId as TupleType;
                var Members = Tuple.StructuredScope.IdentifierList;
                for (var i = 0; i < Members.Count; i++)
                {
                    Out += State.GenerateName(Members[i].TypeOfSelf);
                    if (i < Members.Count - 1)
                    {
                        Out += ", ";
                    }
                }
            }
            else
            {
                Out += State.GenerateName(RetType);
            }

            return(Out);
        }
Beispiel #4
0
        public SimpleRecResult GenerateName(CompilerState State, Identifier Id, ref string Out)
        {
            if (Id is PointerType)
            {
                var PointerType = Id as PointerType;
                Out = State.GenerateName(PointerType.Children[0]) + "*";
                return(SimpleRecResult.Succeeded);
            }

            return(SimpleRecResult.Unknown);
        }
Beispiel #5
0
        public SimpleRecResult GenerateName(CompilerState State, Identifier Id, ref string Out)
        {
            if (Id is PointerAndLength)
            {
                var PAndL = Id as PointerAndLength;
                Out = State.GenerateName(PAndL.Child) + "[*]";
                return(SimpleRecResult.Succeeded);
            }
            else if (Id is NonrefArrayType)
            {
                var Arr = Id as NonrefArrayType;
                Out = State.GenerateName(Arr.TypeOfValues) + "[";
                if (Arr.Lengths == null)
                {
                    Out += "?";
                }
                else
                {
                    Out += string.Join(", ", Arr.Lengths);
                }

                Out += "]";
                return(SimpleRecResult.Succeeded);
            }
            else if (Id is RefArrayType)
            {
                var Arr = Id as RefArrayType;
                Out = State.GenerateName(Arr.TypeOfValues) + "[";
                for (var i = 1; i < Arr.Dimensions; i++)
                {
                    Out += ",";
                }

                Out += "]";
                return(SimpleRecResult.Succeeded);
            }

            return(SimpleRecResult.Unknown);
        }
Beispiel #6
0
        public SimpleRecResult GenerateName(CompilerState State, Identifier Id, ref string Out)
        {
            if (Id is TupleType)
            {
                var TupleType = Id as TupleType;
                var Members   = TupleType.StructuredScope.IdentifierList;

                Out = "(";
                for (var i = 0; i < Members.Count; i++)
                {
                    var Member = Members[i] as MemberVariable;
                    if (TupleType.Named)
                    {
                        if (i == 0 || !(Members[i - 1] as MemberVariable).TypeOfSelf.IsEquivalent(Member.TypeOfSelf))
                        {
                            Out += State.GenerateName(Member.TypeOfSelf) + " ";
                        }

                        Out += Member.Name.ToString();
                    }
                    else
                    {
                        Out += State.GenerateName(Member.TypeOfSelf);
                    }

                    if (i < Members.Count - 1)
                    {
                        Out += ", ";
                    }
                }

                Out += ")";
                return(SimpleRecResult.Succeeded);
            }

            return(SimpleRecResult.Unknown);
        }