Ejemplo n.º 1
0
        /// <summary>
        /// Reading text with text template
        /// Lines starting with ## are comments
        /// Lines starting with # are program
        /// Other lines are printed to output
        /// </summary>
        /// <param name="text"></param>
        public void readTextTemplate(String text)
        {
            Parts.Clear();
            Parent = this;

            StringReader sr          = new StringReader(text);
            String       line        = null;
            GSList       currentList = this;

            while ((line = sr.ReadLine()) != null)
            {
                if (line.StartsWith("#"))
                {
                    readTextListLine(line.Substring(1), ref currentList);
                }
                else
                {
                    GSList list = currentList.createAndAddSublist();
                    list.Add(new GSToken()
                    {
                        Token = "println"
                    });
                    list.Add(new GSString()
                    {
                        Value = line
                    });
                }
            }
        }
Ejemplo n.º 2
0
        /// <summary>
        /// reading one line
        /// </summary>
        /// <param name="line"></param>
        /// <param name="currentList"></param>
        public void readTextListLine(string line, ref GSList currentList)
        {
            // if line starts with #, then
            if (line.TrimStart().StartsWith("#"))
            {
                return;
            }

            int           mode = 0;
            StringBuilder part = new StringBuilder();

            foreach (char C in line)
            {
                if (mode == 0)
                {
                    if (char.IsWhiteSpace(C))
                    {
                    }
                    else if (C == '\'')
                    {
                        mode = 1;
                    }
                    else if (C == '\"')
                    {
                        mode = 3;
                    }
                    else if (C == '(')
                    {
                        currentList = currentList.createAndAddSublist();
                    }
                    else if (C == ')')
                    {
                        currentList = currentList.Parent;
                    }
                    else
                    {
                        part.Append(C);
                        mode = 2;
                    }
                }
                else if (mode == 1)
                {
                    if (char.IsWhiteSpace(C) || C == ')')
                    {
                        currentList.Add(new GSString()
                        {
                            Value = part.ToString()
                        });
                        part.Clear();
                        mode = 0;
                        if (C == ')')
                        {
                            currentList = currentList.Parent;
                        }
                    }
                    else
                    {
                        part.Append(C);
                    }
                }
                else if (mode == 2)
                {
                    if (char.IsWhiteSpace(C) || C == ')')
                    {
                        double d;
                        int    i;
                        string value = part.ToString();
                        if (double.TryParse(value, out d))
                        {
                            currentList.Add(new GSDouble()
                            {
                                DoubleValue = d
                            });
                        }
                        else if (int.TryParse(value, out i))
                        {
                            currentList.Add(new GSInt64()
                            {
                                Int64Value = i
                            });
                        }
                        else
                        {
                            currentList.Add(new GSToken()
                            {
                                Token = part.ToString()
                            });
                        }
                        part.Clear();
                        mode = 0;
                        if (C == ')')
                        {
                            currentList = currentList.Parent;
                        }
                    }
                    else
                    {
                        part.Append(C);
                    }
                }
                else if (mode == 3)
                {
                    if (C == '\"')
                    {
                        currentList.Add(new GSString(part.ToString()));
                        part.Clear();
                        mode = 0;
                    }
                    else if (C == '\\')
                    {
                        mode = 4;
                    }
                    else
                    {
                        part.Append(C);
                    }
                }
                else if (mode == 4)
                {
                    part.Append(C);
                    mode = 3;
                }
            }

            if (part.Length > 0)
            {
                if (mode == 1)
                {
                    currentList.Add(new GSString()
                    {
                        Value = part.ToString()
                    });
                }
                else
                {
                    double d;
                    int    i;
                    string value = part.ToString();
                    if (double.TryParse(value, out d))
                    {
                        currentList.Add(new GSDouble()
                        {
                            DoubleValue = d
                        });
                    }
                    else if (int.TryParse(value, out i))
                    {
                        currentList.Add(new GSInt64()
                        {
                            Int64Value = i
                        });
                    }
                    else
                    {
                        currentList.Add(new GSToken()
                        {
                            Token = part.ToString()
                        });
                    }
                }
            }
        }