ptype_eval (exp) struct expression *exp;
ptype_eval (struct expression *exp)
ptype_eval (exp)     struct expression *exp;{  if (exp->elts[0].opcode == OP_TYPE)    {      return (exp->elts[1].type);    }  else    {      return (NULL);    }}