Пример #1
0
 private static void Op_un()
 {
     if (Lexico.NextTokenIs('+') || Lexico.NextTokenIs('-'))
     {
         CurrentToken = Lexico.NextToken();
     }
 }
Пример #2
0
 private static void Pfalsa()
 {
     if (Lexico.NextTokenIs("else"))
     {
         Comandos();
     }
 }
Пример #3
0
        private static void Lista_arg(Simbolo pEsq)
        {
            var parametros = TabelaDeSimbolos.BuscaParametros(pEsq);

            if (Lexico.NextTokenIs('('))
            {
                CurrentToken = Lexico.NextToken();
                Argumentos();
                if (parametros.Count() != FilaSimbolos.Count())
                {
                    pEsq.SetMsgErro(MsgErrosSemanticos.PARAMETROS_INCORRETOS, parametros.Count(), FilaSimbolos.Count());
                    Error(pEsq);
                }
                while (FilaSimbolos.Any())
                {
                    var sim   = FilaSimbolos.Dequeue();
                    var param = parametros.Dequeue();
                    if (sim.Tipo != param.Tipo)
                    {
                        pEsq.SetMsgErro(MsgErrosSemanticos.PARAMETRO_ERRADO, sim, param);
                        Error(pEsq);
                    }
                }
                CurrentTokenIs(')');
            }
            if (parametros.Count() != 0)
            {
                pEsq.SetMsgErro(MsgErrosSemanticos.PARAMETROS_INCORRETOS, parametros.Count(), 0);
                Error(pEsq);
            }
        }
Пример #4
0
 private static void Mais_comandos()
 {
     if (Lexico.NextTokenIs(';'))
     {
         CurrentToken = Lexico.NextToken();
         Comandos();
     }
 }
Пример #5
0
 private static void Mais_var()
 {
     if (Lexico.NextTokenIs(','))
     {
         CurrentToken = Lexico.NextToken();
         Variaveis();
     }
 }
Пример #6
0
 private static void Mais_dc()
 {
     if (Lexico.NextTokenIs(';'))
     {
         CurrentToken = Lexico.NextToken();
         Dc();
     }
 }
Пример #7
0
 private static void Mais_par()
 {
     if (Lexico.NextTokenIs(';'))
     {
         CurrentToken = Lexico.NextToken();
         Lista_par();
     }
 }
Пример #8
0
 private static void Dc_loc()
 {
     if (Lexico.NextTokenIs("var"))
     {
         Dc_v();
         Mais_dcloc();
     }
 }
Пример #9
0
 private static void Mais_ident()
 {
     if (Lexico.NextTokenIs(';'))
     {
         CurrentToken = Lexico.NextToken();
         Argumentos();
     }
 }
Пример #10
0
 private static void Parametros()
 {
     if (Lexico.NextTokenIs('('))
     {
         CurrentToken = Lexico.NextToken();
         Categoria    = "param";
         Lista_par();
         CurrentTokenIs(')');
     }
 }
Пример #11
0
 private static Simbolo Outros_termos(Simbolo pEsq)
 {
     if (Lexico.NextTokenIs('+') || Lexico.NextTokenIs('-'))
     {
         Op_ad();
         var tDir = Termo(pEsq);
         var oDir = Outros_termos(tDir);
         return(oDir);
     }
     return(pEsq);
 }
Пример #12
0
 private static Simbolo Mais_fatores(Simbolo pEsq)
 {
     if (Lexico.NextTokenIs('*') || Lexico.NextTokenIs('/'))
     {
         Op_mul();
         var fDir = Fator(pEsq);
         var mDir = Mais_fatores(fDir);
         return(mDir);
     }
     return(pEsq);
 }
Пример #13
0
 private static void RestoIdent(Simbolo pEsq)
 {
     if (Lexico.NextTokenIs(":="))
     {
         CurrentToken = Lexico.NextToken();
         Expressao(pEsq);
     }
     else
     {
         Lista_arg(pEsq);
     }
 }
Пример #14
0
 private static void Dc()
 {
     Escopo = "";
     if (Lexico.NextTokenIs("var"))
     {
         Dc_v();
         Mais_dc();
     }
     else if (Lexico.NextTokenIs("procedure"))
     {
         Dc_p();
         Mais_dc();
     }
 }