Настройка GPS (IDE для Ады), (разделено) Опции

[-TarasBer-]

Скачал я себе ГНАТ (Gnat GPL(без исходников, поленился все ссылки тыкать) и Win32Ada.
Скопировал я для начала в редактор кода текст из Википедии:

with Ada.Text_IO;

procedure Hello is
  use Ada.Text_IO;
begin
  Put_Line("Hello, world!");
end Hello.

Нажимаю "проверка синтаксиса".

[2011-01-18 21:32:02] Could not determine the project for file: C:\ADA\projects\Test\test.gpr
[2011-01-18 21:32:02] Invalid context, cannot build

В общем, я так понял, я пока с какими-то настройками не разобрался, что делать?
Заметил, что можно копировать сообщения об ошибках в буфер обмена.
Ещё, что функцию можно свернуть. После каждого сворачивания/разворачивания в конец добавляется пустая строчка (баг, есть таблетка?).
В настройках цвета не нашёл отдельного цвета для символов. Мне нравится, когда скобочки и запятые коричневые, а не чёрные.

[volvo]

Надежность ни разу не страдает. Скорее наоборот. Помнишь, я в начале той темы приводил пример с перепутанными временем и расстоянием? Как вариант решения проблемы приводилось решение:

procedure Check_Speed(T : Time; D : Distance) is
	S : Speed := Speed(Integer(D) / Integer(T)); -- явное приведение типов !!!
begin
	if S < SAFETY_SPEED then
		Increase_Speed(S); -- Ok
	end if
end Check_Speed;

Для иллюстрации - пойдет. Но в реальном проекте с ума сойдешь, постоянно приводя типы "на месте". Проще в отдельном пакете перегрузить все возможные варианты использования операторов, и использовать их:

   function "/" (Left : Distance; Right : Time) return Speed is
   begin
      return Speed(Integer(Left) / Integer(Right));
   end "/";
   
procedure Check_Speed(T : Time; D : Distance) is
	S : Speed := D / T;
begin
	if S < SAFETY_SPEED then
		Increase_Speed(S); -- Ok
	end if;
end Check_Speed;

Что, здесь безопасность пострадала? Нет, код стал читабельнее... Но совершить ошибку все равно не даст.