Example #1
0
        private string GetEmittedMethodName(Symbol methodSymbol)
        {
            string name;

            if (!_methodNameCache.TryGetValue(methodSymbol.Location, out name))
            {
                Method method = methodSymbol.Type as Method;
                if (method == null || _programName == null)
                {
                    // "method" will be null if the symbol is undefined.
                    // There should already be a compile error emitted for the undefined symbol.
                    // "m_programName" is null in some unit testing cases.
                    name = "_Unknown";
                }
                else if (methodSymbol.ImportInfo != null)
                {
                    ImportedMethod importedMethod = (ImportedMethod)methodSymbol.ImportInfo;
                    StringBuilder  nameBuilder    = new StringBuilder();
                    if (!importedMethod.IsStatic)
                    {
                        nameBuilder.Append("instance ");
                    }

                    nameBuilder.Append(IrisTypeToCilTypeName(importedMethod.ReturnType));
                    nameBuilder.Append(' ');
                    AppendImportedMemberName(nameBuilder, importedMethod);
                    AppendParameterList(nameBuilder, importedMethod.GetParameters());

                    name = nameBuilder.ToString();
                }
                else
                {
                    StringBuilder nameBuilder = new StringBuilder();
                    nameBuilder.Append(IrisTypeToCilTypeName(method.ReturnType));
                    nameBuilder.Append(' ');
                    nameBuilder.Append(_programName);
                    nameBuilder.Append("::");
                    nameBuilder.Append(methodSymbol.Name);
                    AppendParameterList(nameBuilder, method.GetParameters());

                    name = nameBuilder.ToString();
                }
                _methodNameCache.Add(methodSymbol.Location, name);
            }

            return(name);
        }
Example #2
0
        private static string TryGetFrameNameHelper(DkmInspectionContext inspectionContext, DkmStackWalkFrame frame, DkmVariableInfoFlags argumentFlags)
        {
            ImportedMethod currentMethod = TryGetCurrentMethod(inspectionContext, frame);

            if (currentMethod == null)
            {
                return(null);
            }

            string name = currentMethod.Name;

            if (argumentFlags == DkmVariableInfoFlags.None)
            {
                return(name);
            }

            var type = currentMethod.DeclaringType;

            if (type.IsStatic && type.Name == "Functions")
            {
                ; // No prefix for 'normal' functions
            }
            else
            {
                // static or instance method ?
                if (currentMethod.IsStatic)
                {
                    name = type.FullName + "." + name;
                }
                else
                {
                    name = type.FullName + ":" + name;
                }
            }

            Variable[] args = currentMethod.GetParameters();
            if (args.Length == 0)
            {
                return(name + "()");
            }

            StringBuilder nameBuilder = new StringBuilder();

            nameBuilder.Append(name);
            nameBuilder.Append('(');

            bool first     = true;
            bool showTypes = argumentFlags.HasFlag(DkmVariableInfoFlags.Types);
            bool showNames = argumentFlags.HasFlag(DkmVariableInfoFlags.Names);

            foreach (Variable arg in args)
            {
                if (first)
                {
                    first = false;
                }
                else
                {
                    nameBuilder.Append(", ");
                }

                XSharpType argType = arg.Type;
                if (showNames)
                {
                    nameBuilder.Append(arg.Name);
                }

                if (showNames && showTypes)
                {
                    if (arg.In && arg.Out)
                    {
                        nameBuilder.Append(" REF ");
                    }
                    else if (arg.Out)
                    {
                        nameBuilder.Append(" OUT ");
                    }
                    else
                    {
                        nameBuilder.Append(" AS ");
                    }
                }

                if (showTypes)
                {
                    nameBuilder.Append(argType.ToString());
                }
            }

            nameBuilder.Append(')');
            var result = nameBuilder.ToString();

            if (result.Contains(clArgs))
            {
                result = result.Replace(clArgs, "[ClipperArguments]");
            }
            return(result);
        }
        private static string TryGetFrameNameHelper(DkmInspectionContext inspectionContext, DkmStackWalkFrame frame, DkmVariableInfoFlags argumentFlags)
        {
            ImportedMethod currentMethod = TryGetCurrentMethod(inspectionContext, frame);

            if (currentMethod == null)
            {
                return(null);
            }

            string name = currentMethod.Name;

            if (string.Equals(name, "$.main", StringComparison.Ordinal))
            {
                return("<Main Block>");
            }

            if (argumentFlags == DkmVariableInfoFlags.None)
            {
                return(name);
            }

            Variable[] args = currentMethod.GetParameters();
            if (args.Length == 0)
            {
                return(name);
            }

            StringBuilder nameBuilder = new StringBuilder();

            nameBuilder.Append(name);
            nameBuilder.Append('(');

            bool first     = true;
            bool showTypes = argumentFlags.HasFlag(DkmVariableInfoFlags.Types);
            bool showNames = argumentFlags.HasFlag(DkmVariableInfoFlags.Names);

            foreach (Variable arg in args)
            {
                if (first)
                {
                    first = false;
                }
                else
                {
                    nameBuilder.Append("; ");
                }

                IrisType argType = arg.Type;
                if (argType.IsByRef)
                {
                    nameBuilder.Append("var ");
                    argType = argType.GetElementType();
                }

                if (showNames)
                {
                    nameBuilder.Append(arg.Name);
                }

                if (showNames && showTypes)
                {
                    nameBuilder.Append(" : ");
                }

                if (showTypes)
                {
                    nameBuilder.Append(argType);
                }
            }

            nameBuilder.Append(')');
            return(nameBuilder.ToString());
        }