Buenas, tengo un problemilla con una práctica de la uni. Pues bien tengo esta función :
function Examinar (L : Lista) return TElemento is
begin
if Fin_Lista (L) then
raise Constraint_Error;
else
return L.Actual;
end if;
end Examinar;
querría saber si esta bien o ay algun error, ya que tengo problemas para entregar la práctica ya que me dice que esta función esta mal.