COMPORT – Compilador Portugol - Nilo Menezes

}
}
else
Mark ("IDENTIFICADOR?");
//NILO: Aqui vem o tipo da variável
// if (sym == DOIS_PONTOS)
// Get (sym);
// else
// Mark (":?");
}
}
void
fType (Type & type)
{
Object obj, first;
Item x;
Type tp;
ComPort – Compilador Portugol
if (sym != IDENTIFICADOR && sym != MATRIZ && sym != REGISTRO &&
sym != NUMERICO && sym !=LITERAL && sym !=LOGICO)
{
Mark ("Tipo ?");
do
{
Get (sym);
}
while (sym != IDENTIFICADOR && sym !=NOVALINHA);
}
switch (sym) {
case LITERAL:
type = litType;
Get(sym);
break;
case NUMERICO:
type = intType;
Get(sym);
break;
case LOGICO:
type = boolType;
Get(sym);
break;
case IDENTIFICADOR: // Tipo definido pelo usuário
find (obj);
Get (sym);
if (obj->Class == Typ)
type = obj->type;
else
Mark ("Tipo ?");
break;
case MATRIZ:
Get (sym);
expression (x);
if (x.mode != Const || x.a < 0)
Mark ("Índice inválido");
// if (sym == of)
// Get (sym);
// else
// Mark ("OF?");
tp = new TypeDesc;
type->form = MATRIZ;
75