OberonCore

Библиотека  Wiki  Форум  BlackBox  Компоненты  Проекты
Текущее время: Воскресенье, 15 Июнь, 2025 13:06

Часовой пояс: UTC + 3 часа


Правила форума


Посмотреть правила форума



Начать новую тему Ответить на тему  [ Сообщений: 684 ]  На страницу Пред.  1 ... 24, 25, 26, 27, 28, 29, 30 ... 35  След.
Автор Сообщение
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Среда, 13 Сентябрь, 2023 16:21 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
> вставить логирование, перекомпилировать и запустить не медленней, чем поставить брэйкпоинт и потом руками нужные переменные напечатать

Вообще-то медленнее. Перекомпиляция может быть быстрой, а вот возникать ошибка может не сразу, а в ходе какого-то долгого вычисления. Например, перекомпиляция ЯОС у меня занимает 2 минуты и да, проблемы были. В пошаговом отладчике шаг занимает пару секунд, а тут пару минут. Сразу в 60 раз. А кратковременная память человека 2 минуты не держит своё содержимое. Т.е. мало что медленнее, так и мощь ума снижается при таких паузах. Особенно плохо, если ошибка является результатом действий в ГПИ, которые на автоматизированы. Но в общем я не уговариваю, просто раз уж обменялись мнениями, то я тоже своё высказал.


Последний раз редактировалось budden Среда, 13 Сентябрь, 2023 16:25, всего редактировалось 1 раз.

Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Среда, 13 Сентябрь, 2023 16:23 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
> а gdb вообще произведение внеземного разума, предназначеное для того, чтобы человеков сошли с ума

Однако без gdb я бы не смог:

* разобраться, как загружается A2 на ARM
* починить баг в QEMU, мешавший ей это делать в QEMU
* запустить эмуляцию ЯОС для Zynq (были проблемы с эмуляцией SD карты)
* починить загрузку A2 под x86 с CD
* починить кооп. версию ядра A2 на ARM (ядро загрузилась, а дальше там ничего нет).
Ибо при загрузке ОС до какого-то момента нет никаких логов. А вот возможность запустить эмуляцию в QEMU и пройти по шагам - есть.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Среда, 13 Сентябрь, 2023 17:24 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
budden писал(а):
Вот поэтому и не нужны все эти гибриды, где на гнилом фундаменте пытаются построить нормальный дом.
а я в Doom люблю играть. только не в тот, который из 90-х, а который с полновесным 3д-рендером, динамическим освещением с тенями, и воксельными объектами вместо спрайтов. примерно на этом месте A2 становится очень грустно, потому что в GPU она не умеет. да и нет под неё нужного сурспорта. ну и что мне, гонять A2 под виртуалкой и делать вид, что я реально её использую как ОС? да ну его.

конечно, то, что A2 не умеет в GPU — это не вина A2 самой по себе, а вина производителей GPU, которые сидят на своих спеках как приклееные. но мне-то от этого не легче, моя невидия там всё равно бесполезна.

budden писал(а):
Т.е. A2 - это уникальная вещь, красивая и безальтернативная
не спорю: я ней искренне восхищаюсь. но увы: она бесполезна «для дома, для семьи». это может показаться странным — с моей-то любовью к велосипедам ;-),— но мне нужна система чтобы решать практические задачи. я, к сожалению, не могу написать с нуля абсолютно всё; а даже если бы и мог — как заставить других бросить то, что уже есть, и начать использовать моё?

лет двадцать назад у меня бы хватило задора и энергии (да камон, я когда-то умудрялся даже кое-какой реально использующийся софт делать на native oberon), а сейчас уже нет.

я вон BBCB забросил на кучу лет потому что у него не было порта под GNU/Linux. если бы меня жестоко не обманули обещанием, что 2.0 под линуксами нормально работает — я бы и сейчас не пришёл. ;-) хотя теперь не жалею.

budden писал(а):
Странно, почему все ещё не бросили всё остальное и не занялись такими системами, ведь их преимущества очевидны с точки зрения кибербезопасности.
кибербезопасность никого не волнует. вообще. а вот возможность набрать кодирав пучок за пятачок, а потом «херак-херак и в продакшон» — ещё как. кому нужен софт под A2-то, кому его продавать?

budden писал(а):
> нужен фронтэнд компонентного паскаля к фоксу
Это не выглядит слишком уж сложным, с учётом того, что компонентный Паскаль - это почти подмножество АО.
оно-то несложно, но кому-то надо это сделать. и ещё тестов написать, чтобы conformance check. а никто не любит писать тесты.

budden писал(а):
В общем-то в A2 же уже есть Оберон как приложение. Я выпилил его из ЯОС, т.к. там было 700 файлов и система была заметно тяжелее. Оберон запускается в своём окне со своей отрисовкой.
ну так оно, по сути, с остальной системой никак не интегрировано: живёт себе в своём отдельном юниверсуме. при таких раскладах и BBCB в A2 как таковой не нуждается: оттуда надо повыкидывать абсолютно всё кроме ядра, компилятора и драйверов. и получим странное создание, которое не понимает и не знает, чем же оно хочет быть: то ли ETHOS с зачем-то прилепленой сбоку бесполезной многозадачностью, то ли A2, у которой вырвали кишки и намотали на столбик.

budden писал(а):
Однако без gdb я бы не смог:…
это несколько специфические задачи, довольно редко возникающие. тут да: поможет трэйс от эмулятора, и возможность с эмулятором поговорить. я, в общем, вёл речь об отладке более прикладного слоя уже, не настолько низкого уровня.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Среда, 13 Сентябрь, 2023 18:58 

Зарегистрирован: Пятница, 11 Январь, 2019 21:33
Сообщения: 101
Цитата:
Цитата:
КЛЮЧЕВЫЕ СЛОВА КРИЧАТ НА МЕНЯ

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


А так же это удобно в режиме GUI Shell набора отладчиков, поддерживаемых IDA Pro, или в классическом отладчике x64dbg
( на всякий случай: это про отладку cm3 Modula-3 ).

Вообще я про крик читаю часто и всегда удивляюсь: с 90х, т.е. TopSpeed Modula-2 , Clarion , это, наоборот, было весьма практично. И эстетитчески привлекательно.

Я, наоборот, и в лабораторных работах на Turbo Pascal перешёл на такой стиль.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 04:27 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
тоже вопрос привычки, я полагаю. а иногда просто людям капс не нравитсяю ну, бывает: меня вот люто, бешено нервируют идентификаторы на чём-то кроме английского, например. это намного хуже, потому что регистр, в конце концов, можно исправлять автоматически простым фильтром перед компилятором, а вот автоматически переводить имена переменных не выйдет. ;-)

но если серьёзно, то регистрозависимость вообще очень кривая идея. я, кстати, не помню, писал ли Вирт, почему от неё отказался. в смысле, были ли кроме чисто технических причин экономии восемнадцати (rough estimation for Z80 ;-) тактов ещё и идеологические. потому что для человека оно максимально неестественно: ни размер букв, ни начертание не меняют значения слов.

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

а. кажется, я понял, почему регистрозависимость. в обероне sym-файлы появились, и они важная часть системы. писать туда надо точно так, как в модуле объявлено, иначе нечитаемо будет. значит, нельзя нормализовывать идентификаторы, и каждый поиск замедляется. так себе причина, но на машине с 12 MHz, наверное, заметно было.

но всё равно это максимально недружелюбная система. хотя бы коммандеры научили бы на регистр плевать. (не, я в LC не стану, я тоже максимально недружелюбен к обычным пользователям. ;-)


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 09:15 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
А у меня наоборот, вот так выглядит код, который я пишу не на работе:
Код:
def ВыведиГруппыПодJson(г):
    """Превращает группу (и всё, что в неё вложено) в форму, которая легко
    сериализуется в JSON для последующего сравнения"""
    тек = []
    уровеньВложенности = [0]
    def УчтиТекстЛексемы(гл, _и):
        т = гл[гЛексема][лТекст]
        тек.append(т)
    def ВыведиТекстГруппы(пг,_у):
        тек.append(ВыведиГруппыПодJson(пг))
        return False
    ОбойдиГруппу(г,
        функцияОбработкиЛексемы=УчтиТекстЛексемы,
        функцияОбработкиПодгруппы=ВыведиТекстГруппы)
    return тек

Или вот, на другом языке и из другого проекта:
Код:
// ПротоколСайта возвращает "http:". или "https:".
func ПротоколСайта() string {
        сдк := СекретныеДанныеКонфигурации
        if сдк.ИзЗаПроксиЛи == 1 || сдк.ФайлЗакрытогоКлючаTLS != "" {
                return "https:"
        }
        return "http:"
}

Когда-то я тоже был снобом-англофилом, однако со временем я понял, кто есть кто на карте мира, и кроме того поимел опыт общения с 1С, который как-то исподволь меня убедил в том, что и на русском языке можно совершенно нормально программировать. Мне повезло, что этот код на 1С, а была это переделанная под конкретное предприятие конфигурация с кучей своих нашлёпок, был написан человеком с системным мышлением и его идентификаторы были крайне понятны. Сам я до сих пор не настолько крут в придумывании понятных имён сущностей. Что, впрочем и немудрено, если их приходится придумывать на чужом языке, которым я владею не в совершенстве.

На работе я проиграл борьбу за русскоязычные идентификаторы, но в последнем MR у меня молча приняли штук 5. Думаю, могу привести здесь немного видоизменённый кусочек кода, не раскрывающий секретов фирмы :) Вот, например:
Код:
# Бог - бессмертный формальный прародитель всех сущностей
кодБога = -888

def isMortal(c:entityContext):
    return c.id != кодБога


Для справки: у нас собирались принять закон об уголовном преследовании за ограничения в использовании русского языка. Выглядит вполне логично на сегодняшний день. Не знаю, приняли ли уже или ещё пока не приняли.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 09:29 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
Касаемо капса, ВЕРХНИЙ РЕГИСТР ОБЪЕКТИВНО МЕНЕЕ УДОБОЧИТАЕМ, потому что все буквы одинакового размера. У строчных букв то и дело торчат вверх и вниз различные хвостики, которые резко облегчают чтение. Особенно в латинице. Попадающиеся изредка среди строчных заглавные тоже дают глазу реперные точки для удобства чтения.

Другое дело, если есть небольшое число N заранее предопределённых ключевых слов, то тогда в принципе пофигу в каком они регистре. Третье дело, что в Обероне они всё ещё недостаточно сжаты. Сравнить го и питон, где слово PROCEDURE сокращено до 3-4 буковок и преимущество сразу ясно видно. Слово PROCEDURE просто тупо занимает место на экране, не неся никакой полезной нагрузки. Если оно при этом ещё и большими буквами - это особенно плохо. Отсутствие в Обероне слова BEGIN почти везде решает болячку Паскаля - многие люди осознают, что BEGIN - это просто мусор на экране, который мешет читать. Сравним с си и питоном, где это один знак - и преимущество очевидно. Поскольку программист на Паскале видит меньше кода за один раз, ему сложнее читать алгоритмы - значит, если мы исключим прочие факторы и начнём сравнивать программистов на этих языках только на основе удобства чтения синтаксиса, то программист на Паскале окажется самым тупым, оберонщик будет где-то в середине, а программисты на Го и Питоне окажутся самыми умными. Конечно, такой эксперимент сложно провести. Причём тупость будет проявлена не из-за того, что программист на Паскале реально тупее, а просто по той причине, что он потратит больше сил на то, чтобы пробраться через мусор, загромождающий экран, и скрывающий от него суть алгоритма (кстати, чем меньше экран - тем тоже тупее окажется программист).

Ну, если ещё подумать, то можно заметить, что для заглавных букв нужен больше междустрочный интервал, потому что строки налезают друг на друга. Наверное, это ещё одна причина, почему КАПС МЕНЕЕ УДОБОЧИТАЕМ. Если это так (а почему бы и нет), то тогда даже то, что слова предопределены, не полностью спасает от неудобств, вызванных тем, что ключевые слова в верхнем регистре.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 09:42 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
P.S. опять же, то, что касается сокращения ключевых слов - верно лишь для профессионалов. Для тех, кто программирует от случая к случаю, и Оберон, и Паскаль могут иметь смысл, т.к. простые принципы и меньше условностей позволяют быстрее вспомнить, что тут к чему и перейти собственно к делу. К программе на Си вообще нельзя подходить, не выучив, к примеру, таблицу приоритетов. В Оберонах она всё же насколько-то проще и не сильно ушла от правил, которые учат в школе на алгебре (хотя тут Вирт не доработал, на мой взгляд). И тут действительно идея с заглавными в ключевых словах может быть очень продуктивна. Т.е. если мы вспомним изначальное целевое назначение Оберона, то всё сходится и Вирт всё сделал правильно.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 10:29 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
а зачем вообще ключевые слова читать? кто их читает-то? ну, в смысле, человек с небольшим опытом языка — читает, и ему однозначно приятней видеть полное слово, а не странное сокращение. не надо, например, запоминать, какие слова сокращаются, и до скольки букв. а люди с опытом — они ж не читают ключевые слова по буквам, а воспринимают их как цельные глифы. так что совершенно неважно, что PROCEDURE длинная — никто ведь это как слово не читает побукванно.

ну да, есть VAR/DIV/MOD, сокращения. но это уже настолько общепринято, что пусть будет.

насчёт русского языка же — срач сейчас будет, давай просто сойдёмся на том, что у нас разные точки зрения на это. ;-)

p.s.: я, кстати, не из россии, поэтому мне русский в коде совершенно не нужен. справедливости ради — как и остальные национальные языки. но, кажется, я срач и провоцирую сейчас. ;-)

p.p.s.: у меня бы код бога был -666. так смешнее.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 10:39 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
кстати, всегда любил паскаль и наследников за вложеные процедуры. очень удобно ведь, помогает лучше код структурировать. ну да, такие вот ad-hoc namespaces. но удобно. я и в GCC не чураюсь, там в сишечке это разрешили.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 12:32 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
и кстати. с введением `VOID:xxx()` назрела проблема реюза временных локалов: компилятор плодит их по необходимости, но никогда не использует повторно. непорядок. научил фронтэнд запоминать уже созданые, и использовать ещё раз (и много, много раз), если возможно. все временные локалы после завершения разбора одного оператора (statement) возвращаются в список свободных, откуда их в следующий раз добудут. естественно, каждая процедура имеет свой список.

а то мне было очень некомфортно использовать `VOID:`. расточительство же! теперь комфортно.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 13:19 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
> так что совершенно неважно, что PROCEDURE длинная

Важна не её длина, а то, что для начала чтения названия надо больше отмотать вправо. Чем больше скачок глаза - тем он дороже. Казалось бы, зачем считать стоимость скачков глаза? Но это во внутреннем цикле происходит. Кроме того, быстрее потребуется перенос на следующую строку, а значит, алгоритм меньшего объёма уместится на экране целиком. При плотной работе с кодом гораздо дешевле один раз выучить какой-нибудь условное "defn" или "алг", чем каждый раз листать.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 13:21 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
666 - это число зверя, не совсем ясно, что имеется в виду. Но это точно не число Бога. Зачем вводить в смысл неточности? Кстати, в этом пункте было замечание, поскольку изначально было что-то -100510, а это не вполне очевидно, что является "специальным" числом. Замечание было не по поводу названия константы, а по поводу её значения. Мне сказали "число Бога", я спросил у окружающих, и мне кроме 888 ничего не сказали.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 13:55 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
budden писал(а):
Важна не её длина, а то, что для начала чтения названия надо больше отмотать вправо. Чем больше скачок глаза - тем он дороже. Казалось бы, зачем считать стоимость скачков глаза? Но это во внутреннем цикле происходит. Кроме того, быстрее потребуется перенос на следующую строку, а значит, алгоритм меньшего объёма уместится на экране целиком. При плотной работе с кодом гораздо дешевле один раз выучить какой-нибудь условное "defn" или "алг", чем каждый раз листать.
это очередное место, где я категорически не согласен. потому что таким путём у нас получается опять сишечка, с её малочитабельным line noise.

как по мне, тут всё просто: если я читаю чей-то чужой алгоритм (или свой старый), то я никуда не спешу. даже наоборот: очень медленно поспешаю. поэтому ни длина идентификаторов, ни скачки глаз здесь совершенно неважны: я намного больше времени трачу на то, чтобы уложить в голове структуру. классический i/o stall получается. ;-)

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

как ни крути, а получается что размер неважен, а полные слова читать всё-таки приятней.

ну и чисто эстетически код с обрезками слов для меня выглядит неряшливо. создаёт впечатление, что автор изо всех сил куда-то спешил, накидал чего-нибудь абы было — и побежал дальше.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:04 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
кстати, про эстетику. английские слова в целом короче русских, поэтому там, где на английском вмещаются полные слова — на русском зачастую приходится сокращать, чтобы не получались имена длиной стопицот символов. и на русском получается отвратительная «ГосМосКрасШвея» какая-нибудь. коробит. плюс падеж и род ещё. это не основная претензия, конечно, но один из нюансов в копилочку моей нелюбви к русскоязычным идентификаторам.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:06 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
Ну я в общем-то не убеждаю, практика показывает, что любовь к языку - не по расчёту. Однако большинство разработчиков языков приняли другое решение и большинство пользователей за это решение проголосовали руками и ногами. В том, что касается ключевого слова для объявления функции:

* С - 0 букв
* Java - 0 букв
* Basic - 3 буквы (но это не точно)
* Python - 3 буквы
* Go - 4 буквы
* Lisp - 5 букв

А вот языки, где нет сокращений:
* JS - 8 букв
* Оберон - 9 букв

Мы видим, что в подавляющем большинстве языков слово "procedure" сокращено. То же касается и скобок. В Обероне тоже ведь сокращено BEGIN до 0 букв, если сравнить с Паскалем. Ну или почти.

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


Последний раз редактировалось budden Четверг, 14 Сентябрь, 2023 14:09, всего редактировалось 1 раз.

Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:07 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
arisu писал(а):
кстати, про эстетику. английские слова в целом короче русских, поэтому там, где на английском вмещаются полные слова — на русском зачастую приходится сокращать, чтобы не получались имена длиной стопицот символов. и на русском получается отвратительная «ГосМосКрасШвея» какая-нибудь. коробит. плюс падеж и род ещё. это не основная претензия, конечно, но один из нюансов в копилочку моей нелюбви к русскоязычным идентификаторам.


Да, такой недостаток есть. В большинстве случаев у любого решения есть "за" и "против".


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:10 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
и наглядно про реюз временных локалов.
Код:
   PROCEDURE TestInCall*;
   VAR
      ss: ARRAY 64 OF SHORTCHAR;
      sl: ARRAY 64 OF CHAR;
      f, c: INTEGER;
   BEGIN
      VOID:TestIn(69, 666);
      VOID:TestIn(69, 666);
      VOID:TestIn(69, 666);
      TestIn3(69, 666, VOID, VOID);
      TestIn4(69, 666, VOID, VOID, VOID, VOID);
      ss := "boo!"; sl := "too!" + ss$ + "doo!";
      sl := "goo!"; ss := SHORT(sl$) + "zoo!";
      FOR f := 0 TO LEN(ss$) - 1 DO
         ss[f] := 0X;
         FOR c := 0 TO LEN(sl$) - 1 DO sl[c] := 0X;
            TestIn4(69, 666, VOID, VOID, VOID, VOID);
         END
      END;
   END TestInCall;


без реюза:
Код:
   PROCEDURE TestInCall
      VAR @par0014: INTEGER
      VAR @par0013: Rec
      VAR @par0012: Rec
      VAR @par0011: INTEGER
      VAR @for0010: INTEGER
      VAR @for0009: INTEGER
      VAR @par0008: INTEGER
      VAR @par0007: Rec
      VAR @par0006: Rec
      VAR @par0005: INTEGER
      VAR @par0004: Rec
      VAR @par0003: INTEGER
      VAR @res0002: INTEGER
      VAR @res0001: INTEGER
      VAR @res0000: INTEGER
      VAR c: INTEGER
      VAR f: INTEGER
      VAR sl: ARRAY 64 OF CHAR
      VAR ss: ARRAY 64 OF SHORTCHAR
   BEGIN
      @res0000 := TestIn(69, 666);
      @res0001 := TestIn(69, 666);
      @res0002 := TestIn(69, 666);
      CALL TestIn3(69, 666, @par0003, @par0004);
      CALL TestIn4(69, 666, @par0005, @par0006, @par0007, @par0008);
      ss := "boo!";
      sl := ("too!" + (CONV(, ss$) + "doo!"));
      sl := "goo!";
      ss := (CONV(, sl$) + "zoo!");
      @for0009 := ((ss$ LEN 0) - 1);
      f := 0;
      WHILE (f <= @for0009) DO
         ss[f] := 00X;
         @for0010 := ((sl$ LEN 0) - 1);
         c := 0;
         WHILE (c <= @for0010) DO
            sl[c] := 00X;
            CALL TestIn4(69, 666, @par0011, @par0012, @par0013, @par0014);
            INC c, 1;
         END;
         INC f, 1;
      END;
   END TestInCall

жуть и мрак.

с реюзом:
Код:
   PROCEDURE TestInCall
      VAR @par0005: INTEGER
      VAR @par0004: INTEGER
      VAR @par0003: INTEGER
      VAR @par0002: Rec
      VAR @par0001: Rec
      VAR @res0000: INTEGER
      VAR c: INTEGER
      VAR f: INTEGER
      VAR sl: ARRAY 64 OF CHAR
      VAR ss: ARRAY 64 OF SHORTCHAR
   BEGIN
      @res0000 := TestIn(69, 666);
      @res0000 := TestIn(69, 666);
      @res0000 := TestIn(69, 666);
      CALL TestIn3(69, 666, @res0000, @par0001);
      CALL TestIn4(69, 666, @res0000, @par0001, @par0002, @par0003);
      ss := "boo!";
      sl := ("too!" + (CONV(, ss$) + "doo!"));
      sl := "goo!";
      ss := (CONV(, sl$) + "zoo!");
      @res0000 := ((ss$ LEN 0) - 1);
      f := 0;
      WHILE (f <= @res0000) DO
         ss[f] := 00X;
         @par0003 := ((sl$ LEN 0) - 1);
         c := 0;
         WHILE (c <= @par0003) DO
            sl[c] := 00X;
            CALL TestIn4(69, 666, @par0004, @par0001, @par0002, @par0005);
            INC c, 1;
         END;
         INC f, 1;
      END;
   END TestInCall

красота!


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:12 

Зарегистрирован: Воскресенье, 25 Декабрь, 2022 23:14
Сообщения: 1556
budden писал(а):
На самом деле, если честно разобраться в себе, то смысл в том, что "хороши те сокращения, к которым я уже привык" и ничего более того - это при прочих равных. Хотя "при прочих равных" бывает в ЯП далеко не всегда - обычно имеется "при прочих неравных", а дальше каждый сам для себя определит веса этих неравных и каждый останется при своей любви.
ну, это да, тут трудно спорить. но мы ж и не спорим, вроде бы, а так, проясняем точки зрения. ну, надеюсь, что не спорим. ;-)


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: BlackBox: Lament Configuration
СообщениеДобавлено: Четверг, 14 Сентябрь, 2023 14:15 

Зарегистрирован: Понедельник, 11 Сентябрь, 2017 13:23
Сообщения: 1623
Тебя же не коробит, что операция деления занимает аж целый значок. Почему бы вместо "/" не писать "DIVIDE" или "поделить"? Тогда значок можно высвободить для чего-то более полезного. Почему не коробит? Потому что в школе так учили. Но ведь значок - это не полное слово, а обрывок. Не коробит просто из-за синдрома утёнка. Поскольку учили в школе, то это "сокращение по умолчанию, к которому я уже привык". А определить функцию как "defn" - не привык. Учили бы это в школе в четвёртом классе - и даже мысли бы не возникло, что нужно здесь писать слово "procedure". Надеюсь, я обосновал, что использование слова "procedure" - это не более чем условность и вкусовщина, и как таковая может быть заменена на что угодно, вопрос лишь в готовности переучиваться или в неготовности.

Ну если не обосновал, то всё равно, больше добавить по теме мне нечего. Кроме того, что если мы обратим внимание на человеческие языки, то увидим, что "I", "you", "and" и соответственно, "я", "ты", "и" - кратчайшие слова. Почему? Потому что они наиболее часто используются. Человеческий язык оптимизирован по частотам. Нет никакого смысла делать часто употребляемое длинным - нужно забрать короткие имена для часто употребляемых, тогда процесс общения будет более энергетически выгоден.

Слово "procedure" злостно, вопиюще нарушает это правило. Но понятно, что для любви пофигу энергетическая эффективность, надо лишь признаться, что это в данном случае именно она, а не какая-то объективность.

Если пытаться оптимизировать ЯП, то надо было бы деление писать словом, а значок "/" отобрать для определения процедуры, к примеру. Потому что процедуры определяются в среднем во много раз чаще, чем используется деление. Понятно, что так никто делать не будет, но я просто довожу ситуацию до логического завершения.


Последний раз редактировалось budden Четверг, 14 Сентябрь, 2023 14:17, всего редактировалось 1 раз.

Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 684 ]  На страницу Пред.  1 ... 24, 25, 26, 27, 28, 29, 30 ... 35  След.

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Вся информация, размещаемая участниками на конференции (тексты сообщений, вложения и пр.) © 2005-2025, участники конференции «OberonCore», если специально не оговорено иное.
Администрация не несет ответственности за мнения, стиль и достоверность высказываний участников, равно как и за безопасность материалов, предоставляемых участниками во вложениях.
Без разрешения участников и ссылки на конференцию «OberonCore» любое воспроизведение и/или копирование высказываний полностью и/или по частям запрещено.
Powered by phpBB® Forum Software © phpBB Group
Русская поддержка phpBB