TYPE TipoExpresion = (Suma, Entero, Variable);
Expresion = POINTER TO NodoExpresion;
NodoExpresion = RECORD
CASE tipo : TipoExpresion OF
Suma : izq, der : Expresion |
Entero : valor : INTEGER |
Variable : nombre : CHAR |
END
Como traduzco específicamente el CASE ? Gracias.