SabreTalk - SabreTalk

SabreTalk это прекращенный диалект PL / I для S / 360 Мэйнфреймы IBM запуск TPF Платформа. SabreTalk был разработан совместно американские авиалинии, Восточные авиалинии и IBM. SabreTalk известен как PL / TPF (язык программирования для TPF).[1]

Программы SabreTalk все еще работают в British Airways Система управления полетами (FICO ) под ALCS, используя коммерчески доступный автоматический конвертер для перевода программ SabreTalk в C программы. Система бронирования и поддержки операций (OSS) Delta Air Lines были разработаны с использованием SabreTalk и IBM 360 Assembler. Хотя разработка в настоящее время ограничена C ++, большая часть платформы программирования Delta оставалась на Sabretalk до недавнего времени, в 2010-х годах.

Из-за переводчика[2]с SabreTalk на C и поскольку он больше не поддерживается исходными разработчиками, несколько компаний начинают переход от SabreTalk к программам, основанным исключительно на C.

Пример кода:

ОБРАЗЕЦ:ПРОЦЕДУРА;ЗАЯВИТЬМНОЖЕСТВО(10)ДЕСЯТИЧНЫЙ(5)ОСНОВАН(POINTUR);ЗАЯВИТЬПРИЛАВОКБИНАРНЫЙ(15)ВЫРАВНИВАЕТСЯ;ЗАЯВИТЬОБЩИЙБИНАРНЫЙ(31)ВЫРАВНИВАЕТСЯ;НАЧНИТЕ(POINTUR=#RG1);/ * ПОЛУЧАТЬ УКАЗАТЕЛЬ НА МАССИВ В РЕГИСТРЕ 1 * /ОБЩИЙ=0;ПЕТЛЯ:ДЕЛАТЬПРИЛАВОК=0К10К2;ОБЩИЙ=ОБЩИЙ+МНОЖЕСТВО(ПРИЛАВОК);/ * ВСЕГО ЧЕТНО НУМЕРАЦИЯ ПУНКТОВ * /КОНЕЦПЕТЛЯ;ЕСЛИОБЩИЙ=0ТОГДА/ * ОБЩЕЕ ВЫЧИСЛЕННОЕ ЗНАЧЕНИЕ? * /ENTRCERRO;/ * N = ПРОВЕРИТЬ ДЕЙСТВИТЕЛЬНОСТЬ В PROG ERRO W / ОЖИДАЕТСЯ ВОЗВРАТ * /BACKC(#RAC=ОБЩИЙ);/ * НАЗАД К ПРОГРАММЕ ВЫЗОВА ПРОХОДЯЩЕЕ ЗНАЧЕНИЕ * /КОНЕЦОБРАЗЕЦ;/ * ИТОГО В РЕГИСТРАХ RAC. * /

Рекомендации

  1. ^ С. Дж. Хобсон, "ALCS - высокопроизводительный монитор DB / DC с высокой доступностью", стр. 136 (сноска 2) в High Performance Transaction Systems, 2nd International Workshop, Asilomar Conference Center, Pacific Grove, California, USA, 28-30 сентября 1987 г., Proceedings. Конспект лекций по информатике 359, Springer 1989, ISBN  3-540-51085-0.
  2. ^ С. Дхинакар Джейкоб, Мадхучханда дас, «TALK2C: инструмент для автоматической миграции», icpc, pp.288, 11-й международный семинар IEEE по пониманию программ (IWPC'03), 2003 г.

внешняя ссылка