Compiladores: PASCALjr - WWW2 - Udesc

SubRot → IdentSR AbrePar ListaArg FechaPar{ Gerar código para ListaArg; Geracod(EXEC IdentSR.Endereco) }ListaArg → ListaExpr{ Gerar código para ListaExpr }ListaArg → ε{}Expr → TermoLog Expr’ Ternario{ Gerar código para TermoLog; Gerar código para Expr’Gerar código para Ternario }Ternario → Interrog Expr 1 DoisPt Expr 2{ Quad1 = ProxQ; Geracod(DSVF); Gerar código para Expr 1Quad2 = ProxQ; Geracod(DSVI); Backpatching(Quad1, ProxQ)Gerar código para Expr 2 ; Backpatching(Quad2, ProxQ) }Ternario → ε{}Expr’ → OpLogAnd TermoLog Expr’{ Gerar código para TermoLog; Geracod(CONJ)Gerar código para Expr’ }Expr’ → OpLogOr TermoLog Expr’{ Gerar código para TermoLog; Geracod(DISJ)Gerar código para Expr’ }Expr’ → OpLogXor TermoLog Expr’{ Gerar código para TermoLog; Geracod(DISX)Gerar código para Expr’ }Expr’ → ε {}TermoLog → FatorLog TermoLog’{ Gerar código para FatorLog; Gerar código para TermoLog’; }TermoLog’ → OpRelacMaior FatorLog{ Gerar código para FatorLog; Geracod(CMAI); }TermoLog’ → OpRelacMenor FatorLog{ Gerar código para FatorLog; Geracod(CPME); }TermoLog’ → OpRelacMenorIgual FatorLog{ Gerar código para FatorLog; Geracod(CPMI); }82