C#

Quote:

Does this GOLD CC allow for multiple token lookahead or is it strictly LALR(1)?

public class If : Statement
{
    private readonly Expression _test;
    private readonly Statement _falseStatement;
    private readonly Statement _trueStatement;

    [Rule(@"<Stm> ::= ~if ~'(' <Expr> ~')' <Stm>")]
    public If(Expression _test, Statement trueStatement)
        : this(_test, trueStatement, null)
    {
    }

    [Rule(@"<Stm> ::= ~if ~'(' <Expr> ~')' <Then Stm> ~else <Stm>")]
    [Rule(@"<Then Stm> ::= ~if ~'(' <Expr> ~')' <Then Stm> ~else <Then Stm>")]
    public If(Expression test, Statement trueStatement, Statement falseStatement)
    {
        _test = test;
        _trueStatement = trueStatement;
        _falseStatement = falseStatement;
    }

    protected override void DoExecute(IExecutionContext ctx)
    {
        if (Convert.ToBoolean(_test.GetValue(ctx)))
            _trueStatement.Execute(ctx);
        else if (_falseStatement != null)
            _falseStatement.Execute(ctx);
    }
}

Gold.org:

Versions 2.4 and later of the GOLD Parser Builder automatically fixes Shift-Reduce Conflicts by not "reducing" when it would cause a conflict. This is the same behavior of the YACC compiler-compiler. It is best to closely check these states to determine if the "shift" is the action wanted.

Manfred R. Bihy wrote:

P.S.: I totally forgot how much fun this is, makes me want to uses this tool for some fun project.

Manfred R. Bihy wrote:

but I still have an ace up my sleeve

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Apostash_Simeiwn
{
    class Simeio
    {
        private double x;
        private double y;


        public Simeio(double x, double y)
        {
            this.x = x;
            this.y = y;

        }
    }
}

{
    public partial class Form1 : Form
    {


        public Form1()
        {
            InitializeComponent();
        }

        private void bttApostash_Click(object sender, EventArgs e)
        {
            txtApostash.Text += Environment.NewLine + Convert.ToString(GetDistance(double.Parse(txtXa.Text),double.Parse(txtXb.Text),double.Parse(txtYa.Text),double.Parse(txtYb.Text)));
        }
        public static double GetDistance(double txtXa, double txtYa, double txtXb, double txtYb)
        {
            double a = txtXa - txtXb;
            double b = txtYa - txtYb;
            double distance;
            return  distance = Math.Sqrt(a * a + b * b);

        }

        private void bttOO_Click(object sender, EventArgs e)
        {
            if (Math.Sqrt(Math.Pow(double.Parse(txtXa.Text), 2) + Math.Pow(double.Parse(txtYa.Text), 2)) < Math.Sqrt(Math.Pow(double.Parse(txtXb.Text), 2) + Math.Pow(double.Parse(txtYb.Text), 2)))
            {
                txtOO.Text += Environment.NewLine + "Το σημείο Α";
            }
            else
            {
                txtOO.Text += Environment.NewLine + "Το σημείο Β";

            }
        }

        private void bttTermatismos_Click(object sender, EventArgs e)
        {
            Environment.Exit(0);
        }

        private void bttSineuthiaka_Click(object sender, EventArgs e)
        {
            double l1 = (double.Parse(txtYb.Text) - double.Parse(txtYa.Text)) / (double.Parse(txtXb.Text) - double.Parse(txtXa.Text));
            double l2 = (double.Parse(txtYc.Text) - double.Parse(txtYb.Text)) / (double.Parse(txtXc.Text) - double.Parse(txtXb.Text));

            if (l1 == l2)
            {
                txtSineuthiaka.Text += Environment.NewLine + "Τα σημεία είναι συνευθειακά ";
            }
            else
            {
                MessageBox.Show("Δεν είναι συνευθειακά.Εισάγετε νέα");
            }
        }


    }
}