Файл: Система математического обеспечения ЕС ЭВМ..pdf

находящегося на магнитной ленте. Создаваемый набор данных име­ ет следующие характеристики: формат записи F, записи имеют 4-байтовые ключи, диапазон изменения которых 1050—6050. За­ прос памяти под набор данных делается на 5000 записей. Если за­ пись с некоторым ключом из указанного диапазона отсутствует, записывается фиктивная запись.

Для входного последовательного набора данных открывается блок управления данными VVOD в режиме ввода (INPUT), а для выходного— блок управления данными VIVOD в режиме вывода (OUPUT). Считывание входного последовательного набора данных осуществляется с помощью макрокоманды GET в режиме указа­ ния. После выполнения этой макрокоманды адрес очередной логи­ ческой записи находится в регистре 1.

Если это следующая запись формируемого набора данных с прямой организацией, то используется макрокоманда WRITE для ее записи на том прямого доступа.

Если же запись с некоторым ключом из вышеуказанного диа­ пазона отсутствует во входном наборе данных, то в формируемый набор помещается фиктивная запись (режим SD макрокоманды

WRITE).

Формирование набора данных с прямой организацией заверша­ ется после записи в него 5000 блоков данных, после чего выпол­ няется закрытие всех блоков управления данными.

Во втором примере осуществляется добавление блоков данных в только что созданный набор данных с прямой организацией. До­ полнительные блоки вводятся с магнитной ленты.

173

а для набора данных с прямой организацией — VIVOD в режиме вывода (OUTPUT). Считывание входного набора данных осуществ­ ляется с помощью макрокоманды GET в режиме пересылки (пос­ ледовательный метод доступа с очередями). В результате очеред­ ная логическая запись помещается в область KLUCH. После это­ го, используя ключ, вычисляют относительный номер блока, кото­ рый запоминается в области OSTATOK.

Последующая макрокоманда WRITE помещает данную логиче­ скую запись как блок данных в набор данных с прямой организа­ цией.

В данном примере синхронизация операции вывода с выполне­ нием программы осуществляется с помощью макрокоманды WAIT. Анализ ошибочных ситуаций при выводе возлагается на програм­ миста.

7. ОСОБЕННОСТИ РЕАЛИЗАЦИИ языков ПРОГРАММИРОВАНИЯ

АЛГОЛА-60, ФОРТРАНА IV, КОБОЛА И ПЛ/1 ДЛЯ ОС ЕС ЭВМ

7.1. СТРУКТУРА СИСТЕМЫ ПРОГРАММИРОВАНИЯ'

Каждая из систем программирования ОС ЕС рассчитана на оп­ ределенный класс проблемных программистов (пользователей) и дает им возможность записывать алгоритмы и запросы на предо­ ставление услуг из определенного подмножества полного набора услуг ОС ЕС таким образом, что становится необязательным зна­ комство ни с внутренним устройством системы и ОС ЕС, ни с пол­ ным набором возможностей и услуг ОС ЕС.

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

Трансляторы обсуждаемых систем программирования относят­ ся к типу компилирующих программ и называются в дальнейшем компиляторами. Порцией исходного текста для каждого процесса компиляции служит так называемый исходный модуль: для Алго-

объектным модулем, теряет, с точки зрения редактора связей, ис­ ходную языковую индивидуальность и обрабатывается затем на общих основаниях.

7.2.ФОРТРАН IV ОС ЕС

Всистему программирования Фортран IV входят два компи­ лятора: отладочный компилятор G и оптимизирующий компилятор

Н. Общая часть языковых версий для этих компиляторов содер­ жит в виде правильного подмножества ANS-Фортран, известный ранее как ASA-Фортран. Общие для G и Н расширения языка ANS-Фортран представляют собой, с одной стороны, элементы Фортрана V, ставшие традиционными для современных реализа­ ций, с другой — средства совместимости с ранними версиями язы­ ка, в частности, с Фортраном II. Кроме того, как и при любой реа­ лизации, существуют машинозависимые уточнения стандартного языка и элементы, зависимые от конкретной операционной систе­ мы. Ниже приведена схема состава языка Фортран IV ОС ЕС.

175

7.2.1. Машинозависимые уточнения языка

Для величин типа INTEGER максимум равен 231—1, т. е. 2147483647.

Для величин типа REAL:

максимум равен 1663, т. е. около 1075; минимум, отличный от нуля, равен 16~65, т. е. около 10~78;

количество значащих шестнадцатеричных цифр в зависи­ мости от объявления (TYPE DECLARATION) равно 6 или 14, т. е. около 7.2 или 16.8 десятичных цифр.

7.2.2. Элементы Фортрана V

Литерный набор для записи исходных программ расширен символом денежной единицы, относящимся к классу букв (см. приложение 2), а также двумя специальными литерами: ’-апост­ роф, & — логическое «И». Литеральные константы разрешается специфицировать заключением в одиночные апострофы.

Вводится понятие шестнадцатеричной константы для инициа­ лизации значений переменных. Шестнадцатеричная константа ог­ раничивается слева буквой Z, справа — ограничителем. Цифры шестнадцатеричной константы помещаются по две на каждый байт в правой части участка памяти, отведенного для соответствующей переменной, и дополняются слева нулями. При нехватке места в памяти обрезаются левые цифры константы.

Символическое имя может содержать символ денежной едини­ цы и, в частности, начинаться с этого символа. Размерность мас­ сивов может достигать 7. Разрешаются смешанные арифметиче­ ские выражения, т. е. операнды арифметических операций могут не совпадать по типу и по длине. Перед выполнением операции производится выравнивание типов и длин по старшему операнду согласно следующей схеме старшинства:

где I, R и С обозначают соответственно INTEGER, REAL и COMP­ LEX; цифрами обозначены длины в байтах.

Окончательный результат вычислений выравнивается по типу и длине левой части высказывания (statement) присваивания или по типу и длине, определяемым местом арифметического выраже­ ния: имеются в виду такие случаи, как индексное выражение или фактический параметр-выражение,-

176

Индексное выражение может иметь вид произвольного смешан­

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

При возведении в степень показатель не может быть комплекс­ ным, а при комплексном основании — и действительным выраже­ нием.

При выравнивании действительной величины по комплексной мнимая часть принимается равной нулю. При выравнивании комп­ лексной величины по действительной мнимая часть игнорируется.

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

Высказывание PAUSE может иметь, кроме стандартных, сле­ дующий формат:

P A U S E ’ л и т е р а л ь н а я к о н с т а н т а ’

Выполнение этого высказывания состоит в передаче его текста оператору и переходе программы в состояние ожидания до вмеша­ тельства оператора.

Выполнение высказывания STOP в форме:

S T O P а

где а — не более чем пятизначное целое, влечет прекращение ра­ боты программы с передачей текста этого высказывания оператору.

Высказывание чтения может иметь, кроме стандартного, сле­ дующий формат:

READ (al, а2, ERR= a3, END —а4) список

где a l — целая переменная или константа длины 4, представляю­ щая собой ссылочный номер набора данных, получающий реальное содержание в dd-картах определения данных, внешних по отношению к фортрановской программе вы­ сказываниях языка управления заданиями ОС ЕС;

а2 — метка или массив с форматными данными, или NA- MELIST-имя;

аЗ — метка высказывания, получающего управление при ошиб­ ке ввода-вывода;

а4 — метка высказывания, получающего управление при попыт­ ке прочитать запись конца файла.

Отсутствие одного из двух последних параметров или обоих сразу влечет в соответствующих ситуациях прекращение работы программы. Порядок записи параметров END и ERR несуществен.

Параметры высказывания

W R I T E ( a l , a 2 ) сп и с ок

аналогичны первым двум параметрам высказывания READ. Введено новое высказывание

N A M E L I S T / x l / с п и с о к 1 / х 2 / с п и с о к 2 . . .

где х 1, х2,... — NAMELIST-имена, указываемые в высказываниях чтения и записи и связывающие эти высказывания с соответствую­ щим^ NAMELIST-именам списками.

Данные для ввода и вывода по NAMELIST имеют формат

п р о б е л

&

E N D

где cij — имя простой или индексированной переменной, или имя массива;

список ij — список целых и действительных констант, разде­ ленных запятыми.

Повторяющиеся группы констант могут быть изображены в со­ кращающей записи аналогично группам повторения в форматах

к * { ( с п и с о к к о н с т а н т )|к о н с т а н т а }

где к — коэффициент повторения.

Введены дополнительные спецификации форматов:

Z — для шестнадцатеричных полей данных, которые обрабаты­ ваются подобно шестнадцатеричным «литералам, дополняясь при вводе слева нулями, а при выводе — пробелами;

G — обобщенная спецификация для целых, действительных, двойной точности и логических данных, играющая роль специфи­ каций I, F,D,L в соответствии с объявленным или умалчиваемым типом переменных в списке ввода-вывода;

’литерал’ — используется наряду с обычным обозначением ли­ тералов: wH литерал;

Т — для указания номера той позиции в записи, начиная с ко­ рой производится передача данных.

Первая литера в записи, предназначенной для вывода на пе­ чать, действует как литера управления кареткой и на печать не выводится. Укажем рекомендуемые программисту значения первой литеры:

пробел— передвинуть каретку на одну строку (к началу сле­ дующей строки);

О — передвинуть каретку на две строки;

— — передвинуть каретку на три строки;

178