Вложенные функции

[Arigato]

Сообщение от type_Oleg

Кстати, в том же Радио-86 его "ОС" начинается как-то так:

F800 jmp F836
F803 jmp FECA
F806 jmp F899
... и т .д.

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

[MihalNik]

Сообщение от type_Oleg

Я в Паскале так ни разу не делал.
Если нужна какая-то вспомогательная функция b для функции a, то просто не объявляю эту b в разделе [I]интерфасе[/I

Расширение интерфейса несколько усложняет понимание исходника.
С вложенной функцией нет вопросов о месте возможного применения.

"Анонимки" нужны, вложенные - нет.

Когда лениво продумывать названия, итог всегда плохо читается.

Ну, или сразу на лямбды замахнуться

Немагического названия им так и не дали?

[min@y™]

Нужны ли старопаскальные IO-функции?

[lomastr_]

Расширение интерфейса несколько усложняет понимание исходника.

да и расширение самого исходника никак не добавляет понятности, толи дело хеловорлд.

и чего это борландовцы отказались от вложенных при разработке сишарпа, нипанятна

[type_Oleg]

Сообщение от Arigato

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

А там чисто аппаратным способом, можно сказать насильно, после Сброса процессору подсовывался вместо 0000 адрес F800. Это как раз адрес ПЗУ.
А в нем - программа Монитор - типа БИОС+ОС в одном флаконе. Размером 2 кБ.

[lomastr_]

вот задачки с использованием вложенных (делфи)
http://www.gunsmoker.ru/2015/04/task-18-1.html
может кому интересно

[Utkin]

Нужны ли старопаскальные IO-функции?

В смысле? По-подробней, если можна

[min@y™]

В смысле? По-подробней, если можна

Наследство от турбопаскакаля:

Append procedure
Prepares an existing file for adding text to the end.

BlockRead procedure
Reads one or more records from an open file into a variable.

BlockWrite procedure
Writes one or more records from a variable to an open file.

Eof function
Tests whether the file position is at the end of a file.

ErrOutput variable
Specifies a write-only Text file associated with the process's standard error file.

FileMode variable
Indicates the access mode on typed and untyped files opened by the Reset procedure.

FilePos function
Returns the current file position.

FileSize function
Returns the number of records in a file.

Input variable
Specifies a read-only Text file associated with the processes standard input file.

IOResult function
Returns the status of the last I/O operation performed.

MkDir procedure
Creates a new subdirectory.

Output variable
Specifies a write-only Text file associated with the process's standard output file.

Rename procedure
Changes the name of an external file.

Reset procedure
Opens an existing file.

Rewrite procedure
Creates a new file and opens it.

RmDir procedure
Deletes an empty subdirectory.

Seek procedure
Moves the current position of a file to a specified component.

Truncate procedure
Deletes all the records after the current file position.

Write procedure (for typed files)
Writes to a typed file.

[the_deer_one]

Сообщение от Utkin

Ну надо мне знать . Суть идеи описывать функцию внутри функции (так или иначе это уже есть в некоторых языках программирования). Нужно ли или просто выпендреж?
Вкратце:

function a(): Integer;
begin

   function b(): Integer;
   begin
       Result:=1;
   end;

   Result:=b()+9;
end;

Ну то есть вкладываем одну функцию в другую. За пределами a функцию b ни где не видно.

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

P.S.
А зачем ключевое слово begin? По ключевому слову function, компилятор по идее может понять, что там там тело функции.

[Аватар]

А зачем ключевое слово begin? По ключевому слову function, компилятор по идее может понять, что там там тело функции.

Там описка (или нет )

function a(): Integer;
   function b(): Integer;
   begin
       Result:=1;
   end;
begin
   Result:=b()+9;
end;