Exemple #1
0
        private void StandardTaggedObj(ushort tagId, Obj obj)
        {
            writer.Write(Cell.Runtime.SymbObj.IdxToStr(tagId));

            if (!obj.IsNeRecord() && (!obj.IsNeSeq() || obj.GetSize() == 1))
            {
                writer.Write('(');

                if (IsMultiline(obj))
                {
                    writer.IndentedNewLine();
                    obj.Visit(this);
                    writer.UnindentedNewLine();
                }
                else
                {
                    obj.Visit(this);
                }

                writer.Write(')');
            }
            else
            {
                obj.Visit(this);
            }
        }