Сокращение числа вводных

[Kronos913]

На коленке сделал 2 процедуры для превращение LongWord в 2 Word и обратно

Function LongWordFrom2Words(const word1, word2:word):LongWord;
asm
  shl eax, 16
  mov ax, dx
end;

Function LongWordTo2Words(const LongWord1:LongWord; var word2:word):Word;
asm
  mov [edx], ax
  shr eax, 16
end;

Собственно, для чего все это задумано: чтобы, если в процедуру заходит куча переменных типа word, большая часть их которых - константы, сократить число вводимых переменных, а внутри процедуры уже "разделять" их

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

Вопрос: будет ли такой код оптимальнее?
С одной стороны, при каждом вызове процедуры будет на 1 переменную меньше загоняться в стек
С другой стороны, внутри процедуры надо будет держать внутреннюю переменную, куда будет сохраняться вторая половина кода

[macomics]

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

Вопрос: будет ли такой код оптимальнее?

Нет. См. комментарий про TRGBtriple в одной из предыдущих тем.

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

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

А самое главное не это. Будет 2 дополнительных вызова процедур и при этом куча возьни с регистрами вместо простой упаковки аргументов и адресации к половинкам на уровне оффсетов.

ADD: Если ваши аргументы это константы, тогда выражение my_proc(arg1 shl 16 or arg0) компилятор посчитает еще на уровне компиляции и создаст константу, которая будет передана как один параметр без дополнительной возьни с регистрами во время исполнения программы. Тогда в процедуре вы можете представить это значение как комплексную структуру и они будут разделены на уровне оффсетов аргументов в стеке еще на этапе компиляции (без дополнительной возьни с регистрами во время исполнения программы).

[Kronos913]

Если процедура вызывается раз 40 - то каждый раз перед ее вызовом прописывается код загрузки в стек всех параметров

А код вызова процедуры "распаковки" Lword -> 2x Word - один раз в самой процедуре.

[Arigato]

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

Собственно, для чего все это задумано: чтобы, если в процедуру заходит куча переменных типа word, большая часть их которых - константы, сократить число вводимых переменных, а внутри процедуры уже "разделять" их

Жаль нет смайла фейспалм...

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

будет ли такой код оптимальнее?

Нет. В вашем случае будет оптимальнее перейти на чистый Си.

[macomics]

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

В вашем случае будет оптимальнее перейти на чистый Си.

Лучше сразу на asm

[macomics]

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

Если процедура вызывается раз 40 - то каждый раз перед ее вызовом прописывается код загрузки в стек всех параметров

Т.е. про передачу параметров через глобальные переменные вы не слышали?

В крайнем случае всегда можно воспользоваться HiWord и LoWord

[Arigato]

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

Лучше сразу на asm

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

[macomics]

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

Не, Асм жестко слишком

Пока до чистого asm не доберется - не поймет что он делает.

[Kronos913]

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

Нет. В вашем случае будет оптимальнее перейти на чистый Си.

В универе 1 семест нам давали Си. Но честно говоря, мне не понравился си-шный синтаксис. Delphi пользуюсь потому что это осовремененный Pascal

Потому что то как пишется код на Си - это какой-то взрыв мозга... Равно вместо присваивания, восклицательный знак вместо отрицания...

[macomics]

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

Равно вместо присваивания, восклицательный знак вместо отрицания...

А удвоение равенства для сравнения - это вообще беспредел!