Почему язык ада так называется. Хочу всё знать

Язык программирования Ада родился в середине 1970-х, когда министерство обороны США и министерство обороны Британии решили заменить сотни специализированных языков программирования для встроенных вычислительных систем, всё чаще использовавшихся в военных проектах. Язык Ада разрабатывали так, чтобы это был единственный язык, способный работать на всех этих встроенных системах, и при этом обеспечивавший надёжность и быстродействие уровнем не хуже специализированных.

После обновления от 1995 года язык приспособили для систем общего назначения, добавив объектно-ориентированное программирование, не теряя из вида ключевые ценности – надёжность, простоту поддержки и эффективность. Сегодня написанное на Ада ПО формирует основу не только военного оборудования, но и коммерческих проектов в сфере авионики и систем управления воздушным трафиком. Код на Ада управляет такими ракетами, как Ариан-4 и 5, многими спутниками, и бесчисленным количеством других систем, в которых небольшие сбои могут иметь серьёзные последствия.

Возможно, Ада подойдёт и для использования в вашем следующем встроенном проекте.

Планирование военного качества

Чтобы выбрать новый язык программирования, минобороны собрала «рабочую группу языков высшего порядка» [High Order Language Working Group (HOLWG)], состоявшую из военных и учёных экспертов, в задачи которой входило составление списка запросов и выбор языков-кандидатов. В итоге были составлены т.н. "запросы Стилмана ":

Главными пунктами запросов были:

Гибкая схема работы общего назначения, адаптирующаяся к нуждам встроенных вычислительных приложений.
Надёжность. Язык должен способствовать проектированию и разработке надёжных программ.
Лёгкость поддержки. Код должен быть читаемым, а программные решения - ясными.
Лёгкость производства эффективного кода. Должна быть возможность легко определять неэффективные конструкции.
Отсутствие ненужной сложности. Семантическая структура должна быть последовательной, и минимизировать количество концепций.
Независимость от машины. Язык не должен быть привязан к каким-то деталям ОС или оборудования.
Полное определение. Все части языка должны быть полностью и недвусмысленно определены.

Завершался отчёт мнением, что первая линия обороны от проблем с ПО заключается в том, чтобы не давать программистам совершать ошибок. Устраняя возможности сделать малозаметную ошибку, к примеру, через неявные преобразования типов или другие опасные конструкции, мы автоматически делаем код безопаснее и облегчаем его поддержку.

Группа заключила, что хотя среди существовавших на тот момент языков ни один не подходил для нужд минобороны, было вполне реально создать новый язык, подходящий под все указанные вопросы. Четырём проектировщикам получили это сделать. Промежуточный процесс выбора подобрал два наиболее подходящих метода работы, и в итоге лишь один язык победил в конкурсе и получил название "Ада ".

Встроенная по умолчанию защита

Система типов в Аде не просто строгая – её иногда называют сверхстрогой, поскольку она не позволяет никакого неявного приведения типов. Возьмём, к примеру, этот отрывок кода на С:

Typedef uint32_t myInt; myInt foo = 42; uint32_t bar = foo;
Это допустимый код; он откомпилируется, запустится и выдаст очевидный результат, обозначающий ответ на главный вопрос жизни, вселенной и всего такого. В Аде так не получится:

Type MyInt is Integer; foo: MyInt; bar: Integer; foo:= 42; bar:= foo;
Компилятор выдаст ошибку, поскольку Integer и MyInt – это не одно и то же. Главное преимущество такого подхода в том, что если программист потом изменит определение типа, тысячи неявных приведений типа по всей базе кода не взорвут программу. Вместо этого нужно явно приводить типы – это пропагандирует хороший код, предотвращая смешение типов, которые «достаточно схожи».

Любой программист, вязнувший в болоте из смеси стандартных определений типов C, Linux и Win32, может оценить по достоинству отсутствие необходимости рыться в бесчисленных страницах документации и плохо отформатированного кода, чтобы понять в каком из typedef или макросе содержится реальное определение чего-то, что только что помешало компиляции или вылезло при отладке.

Ада добавляет дополнительные слои защиты в проверках на этапах компиляции и запуска. В Аде программист должен явно указывать закрывающие операторы для блоков и границы, в которые должно укладываться значение переменной. Ада не определяет стандартные типы вроде int или float, а требует, чтобы программист с самого начала создал типы с определённым диапазоном. Это верно и для строк – за исключением неограниченных строк, у всех строк длина фиксирована.

На этапе работы можно проверить ошибки типа неверного доступа к памяти, переполнения буфера, выхода за установленные пределы, ошибки ±1, доступа к массиву. Затем их можно безопасно обработать, вместо того, чтобы ронять всё приложение.

Ада реализует модель ссылочных типов вместо низкоуровневых указателей. Каждый ссылочный тип обрабатывается пулом памяти, либо заданным по умолчанию, либо определённым программистом при необходимости работы с более экзотическими реализациями памяти типа NUMA. Программисту никогда не приходится обращаться к памяти напрямую, он должен использовать обработчик пула памяти.

Наконец, компилятор или программа во время исполнения решает, как передавать данные в функцию или из неё. И хотя направление передачи каждого параметра указывать нужно (‘in‘, ‘out‘, или ‘in out‘), но итоговое решение о том, передаются ли данные через регистры, кучу или по ссылке, принимает компилятор или программа во время выполнения, но не программист. Это предотвращает проблемы с переполнением стека.

Ravenscar profile и диалект SPARK являются подмножествами Ады, причём последний концентрируется на контрактах. Со временем особенности этих подмножеств перенесли в спецификацию основного языка.

Программирование на языке Ада сегодня

ANSI установила спецификацию Ada 83 в 1983. Тогда только-только вышел Intel 80286, а процессору Motorola 68000 было всего четыре года. Это была заря домашних компьютеров, а также неуклюжий переход из 1970-х в 80-е, когда популярность микроконтроллеров начала расти. Представьте себе микроконтроллер Intel 8051 и его потрясающие 4 кБ EPROM и 128 Б оперативной памяти.

Популярные сегодня микроконтроллеры во много раз более мощные по сравнению с теми, что были в 1983. Можно взять любой ARM, AVR, RISC-V, и т.п. (или Lego Mindstorms NXT kit) и начать под него разработку при помощи одинаковых инструментальных средств на базе С. Неудивительно, что популярный компилятор GNAT Ada основан на GCC. Также в разработке в рамках проекта DragonEgg находятся инструментальные средства на базе LLVM.

Существуют две версии инструментальных средств Ады на основе GCC. Вариант AdaCore поддерживается коммерчески, однако имеет свои особенности. Вариант от Free Software Foundation, естественно, свободен, и по функциональности сравним с AdaCore.

Для лёгкого старта используйте либо GNAT Programming Studio IDE (GPS), идущее в комплекте с AdaCore (копия на Github), или пишите код в текстовом редакторе и компилируйте его вручную, или при помощи Makefiles. Инструментарий тут немного посложнее, чем у С или С++, однако разработку облегчает утилита gnatmake, включающая в себя все инструменты, и работающая примерно как GCC.

Пример небольшого , но нетривиального проекта на Аде, написанного вашей покорной слугой в виде парсера аргументов командной строки. Там вы найдёте Makefile, находящийся в папке проекта ada/, где определяются папки, в которых можно найти файлы спецификации пакетов (.ads) и сами пакеты (.adb).

Эти файлы примерно соответствуют файлам с заголовками и кодом от С и С++, однако имеют и важные отличия. В отличие от С, у Ады нет препроцессора, и она не объединяет код и заголовки для создания компилируемых файлов. Вместо этого идёт ссылка на название пакета, указанное в спецификации. Название файла.ads тоже не обязано совпадать с названием пакета. Это даёт большую гибкость и предотвращает распространённые в С проблемы с циклической зависимостью или необходимостью линковки заголовков в определённом порядке.

Куда двигаться далее

Скачав инструментарий GNAT, запустив GPS или Vim/Emacs, и некоторое время посмотрев на мигающий курсор на пустой странице, вы можете задуматься над тем, с чего начать. К счастью, мы недавно освещали проект на основе Ады с использованием ядра PicoRV32 RISC-V. Он использует распространённый ICE40LP8K CPLD, который поддерживают инструментарии FPGA с открытым кодом, например, Yosys.

В плане документации есть вводные статьи для начинающих , рассчитанные на разработчиков Java и С++, справочник по AdaCore , справочник на WikiBooks , и, конечно же, документация Programming in Ada 2012 . Это, возможно, наиболее полные справочники, за исключением документации Ada 2012 Language Reference Manual (LRM) на 945 страниц.

Язык Ада, пусть и довольно редкий для любителей программирования, является полностью открытым языком с надёжными средствами разработки с коммерческой поддержкой, и используется для создания ПО для всего, от межконтинентальных баллистических ракет и F-15 до прошивок медицинских устройств. Хотя это довольно сложный язык, если выходить за базовые пределы, он должен определённо входить в список языков, которые вы когда-либо использовали в своих проектах – пусть даже и для того, чтобы ваше резюме выглядело покруче.

Если спросить отечественного ИТ-специалиста: «Что такое Ада?», большинство лишь удивленно пожмет плечами, а кто-то даже скажет, что это мертвый язык, когда-то придуманный Пентагоном, а ныне практически не используемый. На самом же деле Ада и сегодня - вполне благополучный и активно применяемый в различных областях язык программирования. Правда, большинство российских программистов знают о нем мало.

Наверное, каждый, кому приходилось пользоваться четырнадцатой линией парижского метрополитена, удивлялся, впервые увидев поезд, в котором нет кабины машиниста. Движение поездов на этой линии полностью управляется Ада-программой.

Несмотря ни на что, в отдельных областях техники Россия все еще «впереди планеты всей». И одна из них - конструирование и производство самолетов-амфибий. Всемирно признанным лидером в этой области является ТАНТК им. Г.М. Бериева. Недавно это предприятие приобрело средства разработки бортового программного обеспечения на базе языка Ада для использования при модернизации своей последней модели Бе-200.

Между тем, большинство отечественных ИТ-специалистов в лучшем случае ничего не знают о языке Ада, в худшем же - имеют совершенно неверное представление об Аде как о языке-монстре, некогда придуманном Пентагоном для разработки военных систем, а ныне окончательно забытом.

Немного истории

Официальным днем рождения языка программирования Ада можно считать 17 февраля 1983 года - дату утверждения стандарта ANSI/MIL-STD-1815-A-1983.

Технические и административные меры, предпринятые Минобороны как часть проекта по созданию и внедрению Ады, полностью предотвратили появление и распространение диалектов языка. С 1983 года и по настоящее время все индустриальные реализации поддерживают действующий стандарт Ады. Когда же речь заходит о подмножествах Ады, то эти подмножества определяются не реализацией, а стандартами разработки конкретного класса систем.

В 1987 году стандарт ANSI без единого изменения был утвержден в качестве стандарта ISO (ISO/IEC 8652), а когда в начале 90-х годов назрела необходимость пересмотра стандарта, работа по пересмотру также была проведена под управлением и на средства Министерства обороны США. Стартовал новый международный проект, который завершился утверждением в конце 1994-го и публикацией в начале 1995 года новой версии стандарта ISO/IEC 8652. Именно этот документ и служит сегодня определением языка программирования Ада.

В СССР в начале 80-х годов была образована Рабочая группа по языку программирования Ада при Государственном комитете по науке и технике. Тщательно собиралась и анализировалась вся открытая информация о проекте, а усилиями специальных служб добывалась и закрытая информация. Были организованы проекты по реализации Ады для практически всех использовавшихся тогда архитектур ЭВМ, и некоторые из них оказались весьма успешными. Распад СССР положил конец этой деятельности. Сегодня Ада используется в России и СНГ отдельными энтузиастами.

Что такое Ада

Все современные индустриальные языки предоставляют по сути один и тот же базовый набор возможностей, различаясь не тем, что они позволяют делать, а тем, как именно они позволяют это делать. Однако Ада, по крайней мере, в двух аспектах расширяет стандартный для современных языков набор возможностей. Во-первых, Ада предоставляет высокоуровневые средства программирования асинхронных процессов. Во-вторых, является единственным языком, который без всяких оговорок можно назвать модульным.

Пример такой просто необходим для того, чтобы опровергнуть достаточно распространенный миф о том, что Ада - большой, сложный и «тяжелый» язык, пригодный лишь для написания сверхбольших и сверхсложных систем. На самом же деле, Ада может применяться для разработки небольших и средних программ с тем же успехом, как и современные клоны Си, Паскаля, Бейсика и Java. Так, классический пример программы «Hello, World!» выглядит на Аде следующим образом:

Легко видеть, что код на Аде похож на код на Паскале, который был выбран в качестве его прототипа. Первая строка описывает связь данного компилируемого модуля с другими модулями - указывается, что подпрограмма Hello_World должна компилироваться совместно с модулем Ada.Text_IO, который является компонентом предопределенной библиотеки.

Следующая программа определяет два асинхронных процесса :

В разделе локальных объявлений процедуры Tasking_Example описывается задача Outputter (строка 6, строки с 8 по 17 содержат тело этой задачи). Когда управление в процессе, соответствующем процедуре Tasking_Example, доходит до строки 20, перед тем, как выполнить этот первый оператор, запускается процесс, соответствующий задаче Outputter, после чего два этих процесса живут и асинхронно выполняются независимо друг от друга. Выполнение оператора задержки (строки 14 и 20) состоит в приостановке соответствующего процесса на указанное количество секунд. Таким образом, процесс Tasking_Example приостанавливается на 20 секунд, а в это время процесс Outputter начинает печатать значения увеличивающегося на единицу счетчика, приостанавливаясь на одну секунду после вывода каждого значения. По истечении 20 секунд процесс Tasking_Example устанавливает флаг Finished в положение «истина», в результате завершается цикл в процессе Outputter. Спецификация переменной Finished как атомарного объекта данных (строка 4) делает невозможным одновременное чтение и изменение значения этой переменной.

Далее представлен шаблон функции, позволяющей покомпонентно складывать два одномерных массива. Этот шаблон может быть настроен на произвольный тип, являющийся одномерным массивом, для компонентов которого определены операции присваивания и сложения («сложение» не обязано быть арифметическим сложением).

Строки 1-6 содержат объявление настраиваемой функции, а строки 8-20 - ее тело. Содержательно, параметром настройки является произвольный одномерный регулярный тип с неуточненным индексным диапазоном (строка 4), про которого известно только, что тип компонента у него произвольный, однако для компонентов определена операция присваивания (строка 2), тип индекса - произвольный дискретный (строка 4). Поскольку нам предстоит покомпонентно складывать два массива, надо знать, что такое операция сложения для типа компонентов. Так как это произвольный тип, мы вынуждены передавать сложение для типа компонента как формальный параметр настройки (строка 5).

В теле функции мы первым делом проверяем, совпадают ли длины операндов (строка 12), иначе покомпонентное сложение не имеет смысла. Совпадение длин операндов не гарантирует совпадение индексных диапазонов, поэтому в цикле по индексному диапазону первого аргумента (строка 15) нам необходимо каждый раз вычислять индекс соответствующего компонента второго аргумента. Мы лишены возможности сделать это для типа Index, так как знаем про него только, что он дискретен, поэтому переходим от значения дискретного типа к его порядковому номеру (атрибут?Pos), вычисляем необходимый сдвиг для порядкового номера и возвращаемся к соответствующему значению типа Index (атрибут?Val).

Заметим, что параметры (настраиваемой) функции «+» Left и Right объявлены как имеющие тип Arr, индексный диапазон которого не уточнен. Однако Left и Right - это формальные параметры, на место которых при вызове (результата конкретизации) функции «+» будут подставлены конкретные массивы с известными индексными диапазонами. Мы же в теле функции «+» пользуемся атрибутами массивов (?Range, ?First, ?Length), чтобы из объекта получить информацию о его индексном диапазоне.

Почему Ада?

Выбор языка для программного проекта ранее был чисто техническим вопросом. Сегодня это стало вопросом стратегической важности, имеющим далеко идущие последствия для успеха проекта. Перечислим некоторые причины, благодаря которым язык Ада был выбран для реализации программных проектов различными компаниями, либо сделан обязательным для использования в рамках тендеров.

Желание повысить надежность разрабатываемой системы, так как программные дефекты могут иметь серьезные последствия для здоровья людей, экономики, экологии и т.п. (Ада обладает встроенными средствами обеспечения надежности).
Желание снизить стоимость разработки и сопровождения системы.
Наличие международных стандартов и наличие компиляторов языка практически для любой платформы.
Преимущества дисциплинированного подхода к разработке программного обеспечения, которые становятся особенно существенными по мере увеличения объема и сложности программного обеспечения.

Ада и Си

При проведении сравнительных анализов популярных языков переломано столько копий, что сегодня эту тему часто относят к разряду «религиозных войн». Поэтому ограничимся лишь ссылкой на известную статью , в которой делается ряд красноречивых выводов.

Разработка программ на языке Ада обходится на 60% дешевле аналогичных программных проектов, реализуемых на Си.
Программа на языке Ада имеет в 9 раз меньше дефектов, чем программа на Си; программа на Си++ имеет еще более низкие, чем программа Си, характеристики.
предпочтительнее Си как для опытных, так и для неопытных программистов, а также для программистов, имеющих как максимальный, так и минимальный рейтинг в своей группе.
Трудоемкость изучения языка Ада не выше трудоемкости изучения Си.
Программы на Аде более надежны, чем программы на Си.

В качестве иллюстрации этих выводов, приведем пример разработки бортового программного обеспечения самолета C-130J в соответствии с требованиями Уровня А стандарта DO-178B . При этом констатировалось качество кода, в 10 раз превышающее среднее для программного обеспечения Уровня А. Производительность труда выросла вчетверо относительно сопоставимых программных проектов.

Ада и Java

В Microsoft были вынуждены включить в лицензионные соглашения для своих операционных систем следующий пункт (www.microsoft.com/msdownload/ieplatform/ie/ license.txt ): «Замечание относительно поддержки языка Java... Технология Java не является устойчивой к сбоям и не предназначена... для использования в рамках управляющих систем реального времени..., в которых сбой языка Java может повлечь за собой смерть, увечье, или тяжелый урон инфраструктуре или окружающей среде. Компания Sun Microsystems, Inc. обязала компанию Microsoft разместить данное предупреждение».

Укажем также на статьи и , демонстрирующие преимущества языка Ада над Java.

«Адские» мифы

Довольно часто с Адой связывают набор устойчивых заблуждений, препятствующих как распространению языка, так и осознанному выбору Ады в качестве языка реализации проекта.

Ада - мертвый язык, на нем сейчас никто не программирует. В действительности, Ада уверенно занимает нишу больших встроенных систем с повышенными требованиями к надежности. По сравнению с «коробочными» продуктами для Windows, такие системы не так заметны, поскольку либо существуют в одном экземпляре (какой смысл тиражировать программу, управляющую движением поездов метро), или распространяются как часть системы, в которую они встроены (бортовое программное обеспечение).

Ада - язык, предназначенный исключительно для военных применений. Ада действительно была разработана при участии Министерства обороны США, однако отсутствуют какие-либо технические, административные или иные причины, препятствующие использованию Ады для разработки гражданских систем. Количество «гражданских» проектов, основанных на этом языке, сегодня сопоставимо с количеством «военных» проектов.

Ада - слишком большой и сложный язык, для того чтобы использовать его в небольшом проекте. Объем и сложность всех современных индустриальных языков практически одинаковы, и чтобы убедиться в этом, достаточно просто сравнить объем их описаний. Этот миф восходит к началу 80-х годов, когда Аду сопоставляли с Паскалем, Фортраном 77 или Бейсиком.

Программистов, знающих Аду, мало, изучение языка с нуля требует чрезмерных усилий и времени. На самом же деле, настоящую трудность представляет отыскание специалистов, понимающих специфику встроенных систем и способных создавать качественные программы для них. Так, например, компания BAE, один из активных пользователей языка Ада, не требует от кандидатов знания этого языка; вместо этого ищутся люди, знакомые со встроенными системами и процессами создания программного обеспечения индустриального качества. После найма таких людей требуется всего две недели для обучения их языку Ада.

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

Существующие Ада-технологии неэффективны; и трансляторы, и порождаемый ими код, отличаются низкой производительностью. Этот миф также восходит к первой половине 80-х годов, когда появились первые реализации Ады, фактически всего лишь доказывавшие «теорему существования Ада-транслятора, соответствующего стандарту». Достаточно провести ряд несложных экспериментов, запрограммировав некоторую модельную задачку на Аде, Паскале и Си/Си++, и сравнив (при сопоставимых параметрах компиляторов) затем скорость компиляции, объем порождаемого кода и скорость его выполнения, чтобы убедиться, что какой-либо специфической неэффективности, свойственной Аде, просто не существует. Можно также отметить, что система программирования GNAT при объеме исходных текстов более 40 Мбайт, на 90% реализована на Аде, и построение ее из исходных текстов (в его ходе она трижды сама себя компилирует) на современном ПК занимает не более получаса.

Существующие реализации Ады крайне дороги. Это верно, однако следует иметь в виду, что существует публично доступная версия системы программирования GNAT, которая бесплатно и на совершенно законных основаниях может быть взята из программного репозитория Нью-йоркского университета (ftp://cs.nyu.edu/pub/gnat ) вместе с исходными текстами

Бесплатный сыр и как избежать мышеловки

GNAT (GNu Ada Translator) - многоплатформная реализация языка Ада, существующая практически на всех современных индустриальных платформах и поддерживающая генерацию кода для популярных встроенных архитектур. GNAT (www.gnat.com ) полностью реализует стандарт Ады, включая те библиотеки, которые стандартом классифицируются как необязательные. Помимо собственно Ада-транслятора, GNAT включает инструментарий, в котором следует отметить развитую интегрированную среду разработчика и многоязыковый графический отладчик, позволяющий, в том числе, исследовать поведение программ с асинхронными процессами. Транслятор и сопутствующие инструменты можно использовать как по отдельности, вызывая их из командной строки, так и в рамках интегрированной графической среды разработки Ада-программ. Все компоненты GNAT, включая среду разработки, имеют один и тот же интерфейс на всех платформах. Помимо полной реализации описываемых стандартом средств GNAT предлагает богатый набор допускаемых стандартом расширений. GNAT - реализация Ады в многоязыковой системе программирования gcc, состоящей из набора компиляторов переднего плана для различных входных языков при общем генераторе кода, что существенно упрощает разработку программ, содержащих компоненты, реализованные на различных языках программирования.

GNAT с самого начала разрабатывался и распространялся под лицензией GPL. Увы, с GPL также связана масса мифов. Так, многие считают, что программы под GPL разрабатываются неорганизованными группами энтузиастов, распространяются абсолютно бесплатно; в результате и надежность, и функциональность таких программ оставляют желать лучшего, не позволяют использовать их в сколько-нибудь серьезных проектах. В случае с GNAT это далеко не так. Для того чтобы убедиться в этом, достаточно просмотреть список компаний, заключивших с его разработчиками контракты на техническую поддержку: Boeing, British Aerospace, Lockheed, Ericsson, SAAB, Avionics и др.

Свободное предоставление демонстрационных версий - обычная практика многих разработчиков программного обеспечения. GNAT отличается тем, что находящаяся в свободном доступе публичная версия является абсолютно полной версией технологии, без каких-либо юридических или технических ограничений на ее использование. Ряд серьезных проектов был успешно реализован именно на базе публичных версий GNAT. Программное обеспечение спускаемого аппарата Beagle 2 европейской автоматической станции Mars Express, направляющейся в данный момент к Марсу (www.beagle2.com/index.htm ), автоматизированная станция документальной связи Министерства обороны РФ (www.ada-ru.org/prj_doc.html ). Единственным недостатком публичных версий является то, что разработчик не предоставляет для них технической поддержки.

Заключение

Подводя итог, можно сказать, что язык Ада предоставляет разработчикам идеальное сочетание цельности, последовательности, надежности и эффективности. Язык поддерживает созидательное творчество и новаторство, обеспечивая в то же время дисциплину и индустриальный уровень разработки программного обеспечения, необходимые для реализации программных систем большой важности.

Литература

Benjamin Brosgol, Introduction to Ada 95. www.embedded.com/story/OEG20021211S0034
Stephen Zeigler, Comparing Development Costs of C and Ada. www.adaic.com/whyada/ada-vs-c/cada_art.html www.ada-ru.org . Аннотированную библиографию книг по языку Ада, изданных на русском языке, можно найти на сайте

Язык Ада более-менее всегда был на слуху. На школьной скамье мы посмеивались над его названием, в университетской программе он сухо упоминался в качестве языка, разработанным по требованию Министерства Обороны США, но непосредственно до изучения синтаксиса или применения дошли лишь редкие программисты. Отсюда сложилось ошибочное мнение, что язык Ада функционирует лишь на прошловековом оборудовании, и потребность в нем пропадет вместе с естественной модернизацией.

И это очень далеко от правды.

Появление

В 70-х годах 20 века, в разгар холодной войны, Министерство Обороны США устроило международный конкурс, по результатам которого необходимо было выбрать язык программирования для использования в военных целях. Однако ни один из существующих языков не устроил членов комиссии, поэтому путём долгого выбора и нескольких доработок на свет появился язык Ада, названный так в честь Ады Лавлейс . Далее началась многолетняя волокита со стандартизацией, регистрация торговой марки, запреты на кастомные трансляторы и прочие действия, отбившие желание массовой аудитории работать с Ада.

На выходе же получился достаточно нишевый язык, предназначенный для сложных вычислительных систем с повышенными требованиями по безопасности. Опять-таки из-за требований Пентагона и строгих стандартов взаимодействие с другими языками программирования крайне затруднено, поэтому до недавнего времени перейти на массовый рынок у Ада практически не было шансов. Но с удешевлением техники и усложнением используемых технологий такой шанс появляется.

Синтаксис

Изначально, Ада - модульный язык программирования со строгой типизацией, унаследовавший синтаксис от Паскаль и Алгол. Если вы учили первый в школе или институте, то глядя на «Hello, World!» должны испытать ностальгию:

with Ada.Text_IO;

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

Одним из главных требований к языку была надёжность его использования. Соответственно, это повлекло за собой строгие ограничения по структуре, типам, написанию и многому другому. Кроме того, почти все ошибки здесь улавливаются на этапе компиляции.

Другим требованием была максимальная читаемость кода в распечатанном виде, что повлекло за собой тяжеловесность полученного языка и невысокую гибкость.

Более поздние стандарты частично решали эти проблемы, но по понятным причинам, они не сделали из Ада второй Python.

Ада сегодня

Вопреки мнению широкой аудитории, язык Ада до сих пор активно используется, не только в США и не только в военной индустрии. Так, например, часть ПО самолёта-амфибии Бериев Бе-200 написана как раз на Ада. Поезда метрополитена без машиниста, которые курсируют во многих крупных городах (Париже, Лондоне, Нью-Йорке и др.), также используют оборудование с американским военным языком.

И да, конечно, среди «клиентов» была военная и гражданская авиация (в частности, Боинг-777), ракеты, шаттлы, спутники - в общем, практически весь перечень бесконечно дорогой американской продукции, предполагающей высшую степень безопасности.

Перспективы

Язык Ада критиковался и в момент появления, и когда стало понятно, что грандиозные планы Пентагона не вполне стыкуются с реальностью, и тем более сейчас. Причиной тому является неудобный язык, сложность стандартов, написанных в 1983 и 1995 году, а также недальновидность разработчиков, лишивших язык Ада массовой аудитории.

Впрочем, почти 40 лет активного использования подтверждают, что пожалуй со своей главной задачей язык Ада справился - с его помощью всё ещё можно создавать надёжный код для систем с повышенными требованиями к безопасности. При этом, если вы посмотрите на современные тенденции, количество таких изделий неуклонно растёт: автомобили с автопилотом и гибридными двигателями, частные космические аппараты и малые летательные средства, скоростные поезда, а также огромное количество встраиваемых систем. Всё это потенциальное поле для деятельности языка Ада. Добавьте сюда тот факт, что стандарт был серьёзно переработан и модернизирован в 2012 году, инструменты для работы тоже выходят и обновляются .

Таким образом, язык Ада - это и фрагмент из не самого приятного прошлого, и один из инструментов для строительства яркого будущего. И он точно не собирается на пенсию.

Особенности языка

«Hello, world!» на Аде

Несколько различных вариантов программы «Hello, world!» можно увидеть в Викиучебнике (англ.) . Различия обусловлены необходимостью использовать библиотечную функцию Put_Line - в этом языке есть три различных способа организации такого использования.

with Ada.Text_IO;

procedure Hello is

Use Ada.Text_IO;

Put_Line("Hello, world!");

end Hello;

Здесь для применения функции Put_Line содержащий её пакет Ada.Text_IO импортируется с помощью конструкции use, что даёт возможность вызывать функцию по имени без квалификации - указания в вызове имени пакета, содержащего функцию.

История

Разработка языка была проведена в рамках международного конкурса, организованного и профинансированного министерством обороны США .Целью разработки было получение языка программирования , который мог бы стать единым для разработки проектов по заказам военного ведомства, главным образом, для разработки встроенных систем военного назначения и для больших военных компьютеров (на базе процессора iAPX 432 от Intel). Работа началась в 1975 году , с формирования набора требований к языку, который бы в полной мере удовлетворил разработчиков систем указанного типа. Первоначальный список требований, выпущенный под кодовым наименованием «Соломенный», был представлен на рецензию в ряд организаций и фирм, в течение двух лет последовательно уточнялся, в конечном счёте превратившись в итоговый документ под названием «Стальной».

После завершения формирования требований был проведён анализ, который показал, что ни один из имеющихся языков программирования не удовлетворяет требованиям в достаточной мере, так что было принято решение разработать новый язык. Конкурс на его создание был объявлен в 1977 году , разработчикам было предложено базироваться на одном из трёх языков: Паскаль , Алгол-68 или PL/1 .

Из представленных на конкурс 15 проектов было отобрано 4 (все основаны на Паскале). Эти проекты были отправлены на дальнейшую доработку. На следующем этапе из 4 проектов отобрали два, из которых, после очередной доработки, был выбран один. Этот язык получил наименование «Ада» - разработавшая его группа под руководством француза Жана Ишбиа дала языку название в честь Огасты Ады Кинг Лавлейс (дочери поэта Дж. Байрона), которая считается первым программистом в мире за разработку программ для вычислительной машины Бэббиджа .

Дейкстра в одной из своих статей усомнился, что язык такой сложности, как Ада, может быть обозрим и управляем. Он заметил: «Если Ada собирается выдать стандарт, желательно, чтобы он был недвусмысленно документирован. По меньшей мере две группы попытались сделать это; в результате обе выдали около 600 страниц формального текста. Это гораздо больше, чем необходимо, чтобы удостовериться в невозможности хотя бы твердо установить, что оба документа определяют один и тот же язык. Ошибка очевидной неуправляемости этих двух документов кроется ни в двух группах, составивших их, ни в принятом ими формализме, а лишь в самом языке: сами не обеспечив формального определения, могут ли его разработчики скрыть, что они предлагают неуправляемого монстра. То, что Ada уменьшит проблемы программирования и увеличит надёжность наших разработок до приемлемых границ, - это лишь одна из тех сказок, в которые могут поверить только люди с военным образованием».

Хоар выразил своё сожаление тем, что «погремушки и побрякушки возобладали над фундаментальными требованиями надёжности и безопасности» и предостерёг от «армады ракет, летящих не туда из-за не обнаруженной вовремя ошибки в компиляторе Ады». Никлаус Вирт высказался более сдержанно, но тоже негативно. Он сказал: «Слишком много всего вываливается на программиста. Я не думаю, что, изучив треть Ады, можно нормально работать. Если вы не освоите всех деталей языка, то в дальнейшем можете споткнуться на них, и это приведёт к неприятным последствиям» . Жан Ишбиа, руководитель группы разработчиков Ады, выразив своё «уважение и восхищение» Виртом, не согласился с ним, сказав: «Вирт верит в простые решения сложных проблем. Я не верю в такие чудеса. Сложные проблемы требуют сложных решений».

Вызывает сомнения и процедура проверки соответствия компилятора стандарту языка путём тестирования. Из общих соображений ясно, что тестирование может найти несоответствие, но не может гарантировать правильность. Практическим подтверждением этого является тот факт, что сертифицированные компиляторы, будучи проверены на другом наборе тестов, обнаруживали несоответствие стандарту .

Сторонники Ады утверждают, что единственная альтернатива большому и сложному языку в больших проектах - это применение нескольких компактных языков, неизбежно порождающее проблемы с совместимостью, для избавления от которых и была придумана Ада. Они замечают также, что представление о сложности разработки на Аде верно лишь отчасти: написание простой программы на Аде действительно требует больше времени, чем на других, менее формальных языках, типа Си , но отладка и сопровождение программ, особенно крупных и сложных, значительно упрощается. По утверждению Стефена Цейгера из Rational Software Corporation , разработка программного обеспечения на Аде в целом обходится на 60 % дешевле, а разработанная программа имеет в 9 раз меньше дефектов, чем при использовании языка Си.

Распространение, перспективы

На практике оказалось, что Ада, заняв предназначенную ей нишу в военных и родственных им разработках встроенных систем, за пределы данной ниши так и не вышла, ни на Западе, ни в СССР, ни на постсоветском пространстве. Причин этому называется много. Противники языка упирают на его сложность и недостатки, сторонники говорят, прежде всего, об объективных обстоятельствах появления языка и негативных сторонах процесса его внедрения. Интересно мнение С. И. Рыбина, старшего научного сотрудника НИВЦ МГУ, консультанта компании AdaCore EU, эксперта по языку Ада рабочей группы ISO по стандарту языка. Он считает , что своими неудачами Ада обязана двум основным причинам:

Во время проектирования языка Пентагон предполагал, что всё новое ПО будет создаваться только на Аде. Из-за этого Ада получила крайне примитивные средства взаимодействия с программами на других языках. На практике оказалось, что написать на Аде вообще всё - нереально (хотя бы потому, что возникала необходимость взаимодействовать с готовыми разработками на других языках). Поэтому в отраслях, где не было жёсткого требования «писать только на Аде», предпочитали другие языки, более приспособленные к мультиязычной среде. В стандарте 1995 года проблема взаимодействия с другими языками была решена, но время оказалось упущено.
Парадоксально, но распространению Ады помешала финансовая и организационная поддержка Пентагона. Программы на Аде, написанные для военных, работали на самой мощной вычислительной технике, какая была доступна, поэтому разработчики компиляторов заботились в первую очередь о прохождении тестов ACVC, и только потом - об эффективности компилятора и создаваемого им кода. В начале 1980-х годов начался бум микрокомпьютеров, и трансляторы для распространённых языков (Паскаля, Си, Бейсика) были оперативно оптимизированы под маломощные системы. Для Ады стимула в такой модернизации не оказалось, в результате ставшие через несколько лет основной массой мирового вычислительного парка персональные компьютеры оказались без качественного транслятора Ады. Естественно, что Ада потеряла этот сегмент рынка. Лишь относительно недавно появился компилятор GNAT , качественный и производительный, но и здесь время оказалось упущено.

В настоящее время Ада достаточно прочно обосновалась в разработках больших встроенных систем повышенной надёжности, здесь у неё практически нет сильных конкурентов. Применение языка постепенно растёт, хотя и довольно медленно. По некоторым осторожным прогнозам, с удешевлением аппаратуры и распространением встроенных систем со сложным ПО рынок для программ на Аде может заметно вырасти, вырастет и использование языка.

Кроме того, Ада имеет, пусть и весьма ограниченное, применение в сфере высшего образования. В МГУ и Харьковском университете читаются спецкурсы по Аде. Однако, по словам того же С. И. Рыбина,

… сейчас на пост-советском пространстве в области программной индустрии и образования сложился очевидный порочный круг: в индустрии практически не знают про Аду, соответственно, со стороны индустрии нет запроса к образованию по подготовке Ада-специалистов, и из вузов в индустрию приходят новые люди, которые практически ничего не знают про Аду.

Операционные системы, написанные на Аде

Встроенные системы

RTEMS - ОС с открытым исходным кодом, разработана DARPA МО США
Ravenskar
RTOS -32 - проприетарная ОС

Системы в разработке

AuroraUX (проект по переписыванию ядра OpenSolaris на язык Ада)
Lovelace (операционная система на ядре )

Больше не существующие системы

BiiN™
Pulse™
AdaOS

Компиляторы Ада

Название	Компания	Версия	Операционная система	Сайт
AdaMagic	SofCheck	Ада 95	?	www.sofcheck.com
AdaMULTI	Green Hills Software	Ада 83, Ада 95,

(Ада 2005), Эйфелева (Ada 2012)

C ++ , Chapel , "Драго" . , Eiffel , "Грифон" . , Java , Nim , летать на парашюте за катером , PL / SQL , PL / PgSQL , рубин , Seed7 , "SPARforte" . , Sparkel , SQL / PSM , VHDL

Особенности Ada включают в себя: сильные печатать , модульность механизмы (пакеты), во время выполнения проверки , параллельной обработки (задачи , синхронные передачи сообщений , защищенных объектов и недетерминированных операторов выбора), обработку исключений и дженерики . Ада 95 добавлена поддержка объектно-ориентированного программирования , в том числе динамической диспетчеризации .

Синтаксис Ada минимизирует выбор способов выполнения основных операций, и предпочитает английские ключевые слова (например, «или же» и « а затем») в символы (такие как «||» и «&&»). Ада использует основные арифметические операторы «+», «-», «*» и «/», но избегает использования других символов. Блоки кода ограничивается словами, такие как «объявить», «начать» и «конец», где «конец» (в большинстве случаев) следует идентификатор блока он закрывает (например, если конец, если... , петля... конец цикла ). В случае условных блоков это позволяет избежать оборванных еще , что может спариваться с неправильным вложенным if-выражения в других языках, таких как C или Java.

Ада предназначена для разработки очень больших программных систем. пакеты Ada могут быть собраны отдельно. спецификации пакета Ada (интерфейс пакета) также могут быть скомпилированы отдельно без осуществления проверки на предмет соответствия. Это позволяет обнаруживать проблемы на ранней стадии на стадии проектирования, до начала реализации.

Большое количество проверок во время компиляции поддерживается, чтобы помочь избежать ошибок, которые не будут обнаружено до времени выполнения в некоторых других языках, или же требуют явных проверок, которые будут добавлены к исходному коду. Например, синтаксис требует явного имя закрытия блоков для предотвращения ошибок из-за Несовпадающие конечные маркер. Соблюдение строгой типизации позволяет обнаружить наличие стандартных ошибок программного обеспечения (неправильные параметры, нарушения диапазона, недействительные ссылки, несоответствующие типы и т.д.) либо во время компиляции, или в противном случае во время выполнения. Как параллелизм является частью спецификации языка, компилятор может в некоторых случаях обнаружения потенциальных тупиков. Составители также обычно проверять орфографические ошибки идентификаторов, видимость пакетов, избыточных деклараций и т.д., и может предоставить предупреждения и полезные советы о том, как исправить ошибку.

Ада также поддерживает проверки времени выполнения для защиты от доступа к нераспределенной памяти, переполнение буфера ошибок, нарушений диапазона, вне череде ошибок , ошибки доступа к массиву, и других обнаруживаемых ошибок. Эти проверки могут быть отключены в интересах эффективности выполнения, но часто могут быть собраны эффективно. Она также включает в себя средства, чтобы помочь проверки программы. По этим причинам, Ада широко используется в критических системах, где любая аномалия может привести к очень серьезным последствиям, например, смерти от несчастного случая, травмы или тяжелой финансовой потери. Примеры систем, в которых используются Ada включают авионику , УВД , железные дороги, банковское дело, военный и космическую технику.

Динамическое Ады управление памятью является высоким уровнем и типа-сейф. Ада не имеет общие или нетипизированные указатели ; и не неявно объявить любой тип указателя. Вместо этого, все динамическое распределение памяти и освобождение должно происходить через явно объявленных типов доступа . Каждый тип доступа имеет соответствующий пул устройств хранения данных , который обрабатывает низкоуровневые детали управления памятью; программист может использовать либо пул хранения по умолчанию или определить новые (это особенно актуально для Non-Uniform Memory Access). Можно даже объявить несколько различных типов доступа, которые все обозначают один и тот же тип, но используют различные пулы хранения. Кроме того, язык обеспечивает доступности проверок , как во время компиляции и во время выполнения, что гарантирует, что стоимость доступа не может изгладить тип объекта он указывает.

Хотя семантика языка позволяет автоматически сбор мусора недоступных объектов, большинство реализаций не поддерживают его по умолчанию, так как это приведет к непредсказуемому поведению в системах реального времени. Ада поддерживает ограниченную форму области на основе управления памятью ; Кроме того, творческое использование пулов хранения может обеспечить ограниченную форму автоматической сборки мусора, поскольку уничтожение пула устройств хранения данных также уничтожает все объекты в бассейне.

история

Продолжается работа по совершенствованию и обновлению технического содержания языка программирования Ada. Техническое исправление к Аду 95 было опубликовано в октябре 2001 года, а основная поправке, ISO / IEC 8652: 1995 / Amd 1: 2007 было опубликовано 9 марта 2007 года В Ada-Europe 2012 конференции в Стокгольме, Ассоциация Ada ресурсов (ARA) и Ад-Europe объявили о завершении проектирования последней версии языка программирования Ada и представления справочного руководства к Международной организации по стандартизации (ISO) для утверждения. ISO / IEC 8652: 2012 был опубликован в декабре 2012 года.

Другие соответствующие стандарты включают ISO 8651 -3: 1988 Системы обработки информации, компьютерной графики, графического ядра системы (ГКС) язык привязок-Часть 3: Ада .

Языковые конструкции

"Привет, мир!" в Ada

Типичным примером такого языка в синтаксисе является Привет мир программа : (hello.adb)

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

Эта программа может быть составлена с использованием свободно распространяемого с открытым исходным кодом компилятора GNAT , выполнив

gnatmake hello.adb

Типы данных

Система типа Ады не на основе набора предопределенных примитивных типов , но позволяет пользователям объявлять свои собственные типы. Это заявление, в свою очередь, не основано на внутреннем представлении типа, но на описание цели, которая должна быть достигнута. Это позволяет компилятору, чтобы определить подходящий размер памяти для данного типа, и для проверки наличия нарушения определения типа во время компиляции и времени выполнения (т.е. нарушение диапазона, переполнение буфера, типа консистенция и т.д.). Ада поддерживает числовые типы, определенные в диапазоне, по модулю типов, агрегатные тип (записи и массивы), а также тип перечисления. Типы доступа определить ссылку на экземпляр указанного типа; нетипизированных указатели не разрешены. Специальные типы, предоставляемые на языке типов задач и охраняемые виды.

Например, дата может быть представлена в виде:

type Day_type is range 1 .. 31 ; type Month_type is range 1 .. 12 ; type Year_type is range 1800 .. 2100 ; type Hours is mod 24 ; type Weekday is (Monday , Tuesday , Wednesday , Thursday , Friday , Saturday , Sunday ); type Date is record Day : Day_type ; Month : Month_type ; Year : Year_type ; end record ;

Типы могут быть уточнены путем объявления подтипов:

subtype Working_Hours is Hours range 0 .. 12 ; -- at most 12 Hours to work a day subtype Working_Day is Weekday range Monday .. Friday ; -- Days to work Work_Load : constant array (Working_Day ) of Working_Hours -- implicit type declaration := (Friday => 6 , Monday => 4 , others => 10 ); -- lookup table for working hours with initialization

Типы могут иметь модификаторы, такие как ограниченные, абстрактные, частные и т.д. Частные типы могут быть доступны и ограниченные типы могут быть изменены только или скопированы в пределах пакета, который определяет их только. Ada 95 добавляет дополнительные возможности для объектно-ориентированного расширения типов.

Управляющие структуры

Ада также предлагает защищенные объекты для взаимного исключения . Защищенные объекты являются монитор, как конструкция, но и использовать защитные вместо условных переменных для сигнализации (аналогично условных критических областей). Охраняемые объекты сочетают инкапсуляцию данных и безопасное взаимное исключение из мониторов, а также въездные охранник из условных критических областей. Главное преимущество по сравнению с классическими мониторами является то, что условные переменные не требуется для передачи сигналов, избегая потенциальные тупики из - за неправильную запирающих семантику. Как и задачи, защищаемый объект является встроенным ограниченным типом, и он также имеет декларацию часть и тело.

Защищенный объект состоит из инкапсулированных личных данных (которые могут быть доступны только в пределах охраняемого объекта), а также процедуры, функции и записи, которые гарантированно являются взаимоисключающими (с единственным исключением функций, которые необходимы, чтобы быть побочным эффектом бесплатно Таким образом, и может работать одновременно с другими функциями). Задача вызова защищенного объекта блокируется, если другая задача выполняется в данный момент в том же защищаемом объекте, и освобождается, когда эта другая задача оставляет защищаемый объект. Заблокированные задачи ставятся в очередь на защищаемом объекте заказанного времени прибытия.

Защищенные данные объекта аналогичны процедурам, но дополнительно имеют охрану . Если охранник оценивается как ложное, задача вызова блокируется, и добавляется в очередь этой записи; Теперь другая задача может быть допущен к защищаемому объекту, так как ни одна из задач не выполняется в данный момент внутри защищаемого объекта. Охранники переоценены всякий раз, когда задача выходит из охраняемого объекта, так как это единственный раз, когда оценка охранников может быть изменена.

Звонки на запись могут быть requeued для других записей с той же подписью. Задача, которая requeued блокируется, и добавляются в очередь целевой записи; это означает, что защищаемый объект освобождается и позволяет прием другой задачи.

Выберите оператор в Ada может быть использован для реализации неблокируемых вызовов входа и принимает, недетерминирован выбор записей (также с охраной), время ожидания и прерывает.

Следующий пример иллюстрирует некоторые концепции параллельного программирования в Ada.

with Ada.Text_IO ; use Ada.Text_IO ; procedure Traffic is type Airplane_ID is range 1. . 10 ; -- 10 airplanes task type Airplane (ID : Airplane_ID ); -- task representing airplanes, with ID as initialisation parameter type Airplane_Access is access Airplane ; -- reference type to Airplane protected type Runway is -- the shared runway (protected to allow concurrent access) entry Assign_Aircraft (ID : Airplane_ID ); -- all entries are guaranteed mutually exclusive entry Cleared_Runway (ID : Airplane_ID ); entry Wait_For_Clear ; private Clear : Boolean := True ; -- protected private data - generally more than just a flag... end Runway ; type Runway_Access is access all Runway ; -- the air traffic controller task takes requests for takeoff and landing task type Controller (My_Runway : Runway_Access ) is -- task entries for synchronous message passing entry Request_Takeoff (ID : in Airplane_ID ; Takeoff : out Runway_Access ); entry Request_Approach (ID : in Airplane_ID ; Approach : out Runway_Access ); end Controller ; -- allocation of instances Runway1 : aliased Runway ; -- instantiate a runway Controller1 : Controller (Runway1 " Access ); -- and a controller to manage it ------ the implementations of the above types ------ protected body Runway is entry Assign_Aircraft (ID : Airplane_ID ) when Clear is -- the entry guard - calling tasks are blocked until the condition is true begin Clear := False ; Put_Line (Airplane_ID " Image (ID ) & " on runway " ); end ; entry Cleared_Runway (ID : Airplane_ID ) when not Clear is begin Clear := True ; Put_Line (Airplane_ID " Image (ID ) & " cleared runway " ); end ; entry Wait_For_Clear when Clear is begin null ; -- no need to do anything here - a task can only enter if "Clear" is true end ; end Runway ; task body Controller is begin loop My_Runway . Wait_For_Clear ; -- wait until runway is available (blocking call) select -- wait for two types of requests (whichever is runnable first) when Request_Approach " count = 0 => -- guard statement - only accept if there are no tasks queuing on Request_Approach accept Request_Takeoff (ID : in Airplane_ID ; Takeoff : out Runway_Access ) do -- start of synchronized part My_Runway . Assign_Aircraft (ID ); -- reserve runway (potentially blocking call if protected object busy or entry guard false) Takeoff := My_Runway ; -- assign "out" parameter value to tell airplane which runway end Request_Takeoff ; -- end of the synchronised part or accept Request_Approach (ID : in Airplane_ID ; Approach : out Runway_Access ) do My_Runway . Assign_Aircraft (ID ); Approach := My_Runway ; end Request_Approach ; or -- terminate if no tasks left who could call terminate ; end select ; end loop ; end ; task body Airplane is Rwy : Runway_Access ; begin Controller1 . Request_Takeoff (ID , Rwy ); -- This call blocks until Controller task accepts and completes the accept block Put_Line (Airplane_ID " Image (ID ) & " taking off..." ); delay 2.0 ; Rwy . Cleared_Runway (ID ); -- call will not block as "Clear" in Rwy is now false and no other tasks should be inside protected object delay 5.0 ; -- fly around a bit... loop select -- try to request a runway Controller1 . Request_Approach (ID , Rwy ); -- this is a blocking call - will run on controller reaching accept block and return on completion exit ; -- if call returned we"re clear for landing - leave select block and proceed... or delay 3.0 ; -- timeout - if no answer in 3 seconds, do something else (everything in following block) Put_Line (Airplane_ID " Image (ID ) & " in holding pattern" ); -- simply print a message end select ; end loop ; delay 4.0 ; -- do landing approach... Put_Line (Airplane_ID " Image (ID ) & " touched down!" ); Rwy . Cleared_Runway (ID ); -- notify runway that we"re done here. end ; New_Airplane : Airplane_Access ; begin for I in Airplane_ID " Range loop -- create a few airplane tasks New_Airplane := new Airplane (I ); -- will start running directly after creation delay 4.0 ; end loop ; end Traffic ;

Прагмы

Прагма является директивой компилятора , который передает информацию в компилятор, чтобы конкретные манипуляции скомпилированной продукции. Некоторые псевдокомментарии встроены в язык, а другие реализации.

Примеры общего использования компилятора прагм будут отключать определенные функции, такие как проверка типов времени выполнения или индекс массива проверка граничной, или поручить компилятор, чтобы вставить код объекта вместо вызова функции (в C / C ++ делает с инлайн функции).

APSE - спецификация для среды программирования для поддержки разработки программного обеспечения в Ada
Ravenscar профиль - это подмножество функций Ada многозадачных, предназначенных для обеспечения безопасности критически важных жесткого реального времени вычислений
СПАРК (язык программирования) - язык программирования, состоящий из весьма ограниченного подмножества Ada, аннотированные с мета - информацией, описывающей желаемое поведение компонента и индивидуальных требований во время выполнения

Категории

Популярное