Ayuda con un error

[DragonLee]

Hola tengo un codigo en Ada, y compilo hace una parte, y luego se deteine y sale el seguiente error:
aised CONSTRAINT_ERROR : barcos.adb:74 range check failed, segun tengo entendido es que esta fuera de rango en esa linea pero no se como slucionarlo porque si pongo un Skip_line el error se baja a la siguiente linea, si pongo Skip_line(nombre del fichero) sale otro error tipo ADA.EXCEPTIONS....
Necesito ayuda por favor, un saludo gracias