metod_15.03.04_atppp_oaip_ump_2016 (1016599), страница 39
Текст из файла (страница 39)
Это объясняется тем, что остаютсянерешенными следующие проблемы:объемтекста программы, даже хорошо структурированной, затрудняет ее Большойпонимание; вызывают ее полное перекомпилирование, что Даже минимальные изменения в программусвязано с большими потерями времени;Архитектура современных ЭВМ предполагает, что объем памяти отдельнойпрограммы не должен превышать 64 Кбайт, даже несмотря на большой объемсвободной памяти.Для решения перечисленных проблем разбивают программу на ряд модулей (UNIT),текст каждого из них должен быть не более 64 Кбайт.Программный модуль – это совокупность операторов, описывающих независимуюфункцию обработки или представления информации и имеющих стандартные средствасвязи с другими модулями. Понятие модуля является дальнейшим развитием понятияподпрограммы.Модуль должен удовлетворять двум основным требованиям: быть независимым от контекста, в котором используется (независимость отисточника исходных данных, от места назначения выходных данных, от другихмодулей); выполнять определенную функцию в соответствии с требованиями спецификациимодуля – чтобы процесс формирования сложных программ мог проводиться безкаких-либо предварительных знаний о внутренней работе модуля.При конструировании программы может использоваться иерархия модулей:вызывающий модуль передает управление и параметры вызываемому модулю,который, в свою очередь, может стать вызывающим по отношению к другому модулю.Вызываемый модуль всегда возвращает управление вызывающему модулю.
Модуль впрограмме должен иметь одну точку входа и одну точку выхода. Переменные,используемые внутри одного модуля, должны быть определены в этом модуле. Еслиодни и те же данные обрабатываются несколькими модулями, их можно разместить вотдельном модуле.Модуль - это библиотека подпрограмм (UNIT – модули), автономно компонуемаяпрограммная единица на языке Паскаль (набор подпрограмм, собранных в отдельномфайле). Он может включать разделы описаний и операторы инициирующей частимодуля.
Все разделы модуля можно использовать в других модулях и программах,подключив к ним данный модуль с помощью оператора Uses (использование).Модули храняться до компиляции в виде исходных подпрограммных текстов (PASфайлов) и в откомпилированном виде как объектные модули с расширением .TPU(Turbo Pascal Unit - TPU-файлы).
Компилятор Паскаля размещает объектные модули вотдельном сегменте памяти. Максимальная длина сегмента модуля может быть не179более 64 Кбайт. Но количество используемых модулей ограничивается толькодоступной внешней памятью.Структура модулейUNITимя-модуля ;{ - заголовок модуля }INTERFACE{ Интерфейсная секция: uses и глобальные объекты модуля.Заголовки процедур и функций модуля ( с параметрами ).}IMPLEMENTATION{ Секция реализации: локальные объекты модуля и тексты процедур и функций }[BEGIN инициирующая часть ]{ Секция инициализации: }END.{ в ней обязателен только END }Имя модуля - это идентификатор длиною не более восьми символов. Оно должнобыть уникально и совпадать с именем дискового файла, в котором размещаетсяисходный текст модуля на языке Паскаль.Например, если заголовок модуля имеет вид Unit MODUL;, то имя файла сисходным текстом модуля должно быть MODUL.PAS.
После компиляции имя файла собъектным модулем будет MODUL. TPU. Имя модуля используется для его связи сдругими модулями и с программой, к которой он присоединен с помощью оператораUses (использование). Форма оператора:Uses список-модулей ;где список-модулей - это список имен модулей, с которыми устанавливается связьпри компиляции программы, использующей подпрограммы этих модулей. Например:Uses MODUL, Crt, Printer;.Модуль может использовать подпрограммы других модулей. Оператор Uses ввызывающей программе должен быть после оператора PROGRAM, а в модуле - послеключевого слова INTERFACE.Например, в программе может быть:PROGRAM KR;Uses MODUL, Printer;или - в модуле:Unit MODUL; INTERFACE Uses Crt;Модуль System (со стандартными процедурами и функциями) подключается всегдаавтоматически.
Все модули, названные в операторе Uses, компилятор Паскаля ищет вфайле Turbo.TPL (системных библиотеках), в файлах типа .TPU (библиотекахпользователя) или в файлах типа .PAS. Поиск файлов ведется сначала в текущемкаталоге, затем в каталогах, заданных в списке каталогов файлов, определенных в менюOptions\Directories\Unit directories (Параметры \ Каталоги \ Каталоги модулей ).Интерфейсная часть модуляИнтерфейсная часть модуля (секция) начинается словом INTERFACE.
В ней могутсодержаться объявления всех глобальных объектов модуля: меток, типов, переменных иконстант любых типов. Они являются глобальными, а значит, доступными программе180или модулю, которые используют данный модуль. Вызывающая программа имеетдоступ ко всем объектам интерфейсной секции, если эти объекты не переобъявлены ввызывающей программе (или модуле).Структура интерфейсной секции:INTERFACEUsesLABEL ...CONST . .
.TYPE ...Глобальные объектыVAR...Заголовки процедур и функций модуля (с параметрами).Глобальные объекты и оператор Uses необязательны. Правила описания констант,типов и переменных идентичны правилам их описания в программах и подпрограммах.Все константы и переменные, объявленные в интерфейсной части модуля, как иглобальные переменные вызывающей программы, помещаются в один общий сегментданных (длиною не более 65521 байт).В интерфейсной секции содержатся операторы заголовков процедур и функций (сосписками формальных параметров), которые вызываются из программы, к которойподключен модуль. Заголовки процедур и функций, которые вызываются только изпроцедур и функций данного модуля, можно не включать в интерфейсную секциюмодуля.Тексты процедур и функций модуля располагаются в исполняемой части модуля(implementation), расположенной после интерфейсной секции.
Пример интерфейснойсекции модуля:Unit MODUL;InterfaceVar А, В : REAL;{ А и В - глобальны }Procedure ADD ( А, В : REAL; VAR REZ : REAL );Function MUL ( А, В : REAL; RS : REAL ) : REAL;Если в вызывающей программе написать Uses MODUL, то в ней будут доступныпеременные А, В, процедура ADD и функция MUL.Исполняемая часть модуляИсполняемая часть модуля начинается словом IMPLEMENTATION и содержитобъявление локальных объектов модуля и тела (тексты) всех процедур и функций,заголовки которых даны в интерфейсной части, и локальные подпрограммы.
Текстызаголовков подпрограмм, заголовки которых даны в интерфейсной части, могут бытьбез параметров. После слова Implementation могут быть объявлены объекты, локальныев модуле: типы, константы, переменные, метки.Структура исполняемой части модуля:IMPLEMENTATIONЛокальные объекты модуляЗаголовок подпрограммыДля каждой подпрограммы181Блок подпрограммы.Блок подпрограммы модуля, процедуры или функции имеет то же строение, что и упрограммы. То есть в ней могут быть локальные объекты и внутренние процедуры ифункции.Пример модуля с процедурой ISWAP и функцией IMAX.
Подключить модуль кпрограмме можно с помощью USES MODUL. После подключения модуля можноиспользовать его процедуру и функцию.Модуль с процедурой и функцией.Unit MODUL;Interface{ - начало интерфейсной части }Procedure ISWAP ( Var i, j : integer );Function IMAX ( i, j : integer ) : integer ;Implementation{ - начало исполняемой части }Procedure ISWAP;{ - заголовок без параметров }Var Т : integer;BeginT := I; I := J; J := T;End;{ - конец процедуры ISWAP }Function IMAX;{ - заголовок без параметров }BeginIF I > 3 THEN IMAX := IELSE IMAX := JEnd;{ - конец функции IMAX }END.{ - конец модуля MODUL }Инициирующая часть модуляИнициирующая часть завершает модуль.
В ней может быть блок с операторами,содержащими некоторый фрагмент программы. Эти операторы выполняются до началавызывающей программы и обычно используются для подготовки работы вызывающейпрограммы. Например, в ней могут инициироваться (получать начальные значения)переменные, открываться требуемые файлы и т. д. Если этого не требуется, винициирующей части обязателен только последний оператор END.
Пример модуля синициирующей частью.Модуль с инициирующей частью.Unit FileText;Interface{ - начало интерфейсной части }Procedure Print (S : string );Implementation{ - начало исполняемой части }Var F : TEXT;{ Локальны в модуле: F и NAME }Const NAME = 'D:\REZ.TXT';{ Определение константы NAME }{------------- Процедура вывода значения S в файл F ---------------------- }Procedure Print;BeginWRITE ( F, S);End;{ - конец исполняемой части }BEGIN{ - начало инициирующей части }Assign ( F, NAME );{ - назначение переменной F файла }182Rewrite ( F ) ;END.{ из константы NAME }{ - открытие файла F для создания }{ - конец инициирующей части }Компиляция и подключение модулейДля того чтобы сформировать модуль (библиотеку) с подпрограммами, можноотладить подпрограммы в составе основной программы, а затем перенести их в модуль.Для использования подпрограмм модуля его надо оттранслировать, т.
е. сформироватьиз PAS-файла TPU-файл на МД, подключить к среде директорию с TPU-файламимодулей и подключить сформированный модуль к основной программе с помощьюоператора USES.В директории Options\Directories\EXE&TPU directory должны быть:1) пустая строка, если TPU-файл надо поместить в текущий каталог;2) имя директории, в которую необходимо записать сформированные TPU-файлы,если модуль должен быть в заданном каталоге.Например: F:\TURBO\TP.Если TPU-файлы помещены не в текущем каталоге, то для их использования в менюOptions\Directories\Unit directories должна быть их директория, например:F:\TURBO\TP.В Паскале имеется 3 режима (и 3 команды) компиляции: Compile, Make, Build. Ониотличаются только отношением компилятора к модулям, указанным в Uses.Если с Помощью Compile компилируется текст программы или модуль, расположенный в редакторе, и в них используется оператор Uses, то все модули, указанныев Uses, должны быть предварительно откомпилированы и результаты их компиляциидолжны быть помещены в TPU-файлы на МД.
Например, если в программе (модуле)имеется Uses FileText;, то на МД в текущем каталоге или в каталоге, определенномопцией Unit directories, должен быть файл FileText.tpu.Для получения этого файла из файла FileText.pas надо:1) установить опцию компилятора Compile/Destination в состояние Disk (для версий,меньших 7.0) и имя каталога в опцию Options/ Directories/EXE&TPO directory;2) откомпилировать файл FileText.pas с помощью команд Compile (Alt-F9) илиMake (F9).В результате компиляции с помощью команды Make компилятор сам проверяетналичие требуемых TPU-файлов для каждого модуля, указанного в Uses. Кроме того,компилятор проверяет даты и время создания PAS-файлов и соответствующих им TPUфайлов модулей. И если обнаружено, что в найденный PAS-файл были внесеныизменения со времени создания соответствующего ему TPU-файла, то Паскальавтоматически транслирует PAS-файл и создает из него новый TPU-файл.














