А ты уже написал своего бота для Телеграма на Free Pascal'е, $username?

Свободный первый уровень

А я помню любил турбу. Возможно уже не первый раз пишу про Delphi. Ах молодость

Я тоже ее любил. Первый язык, на котором я писал что-то более менее серьезное и лично мне интересное.

Ну турбы они все были «няшками» не только паскакаль :)

Третий проект — прикольный. Поставил галочку себе, спасибо.

$username

А у тебя падала полка под тяжестью DVD-болванок, $username? (комментарий)

Нет, я из 2019.

До сих пор удивляет, как быстро компилятор работал. На 386 почти не заметно задержек было. Только запустил, а оно уже экзэшник выплюнуло.

я из 2019

Free Pascal тоже.

"@thezerobit 5 августа

Паскаль является недооцененной платформой программирования в 2019 году.
* Визуальное проектирование графических интерфейсов в IDE Lazarus
* Очень быстрая скорость компиляции и выполнения
* Объектная ориентированность, дженерики, юникод
* Нет пауз GC
* Безопаснее и умнее C/C++
* Free Pascal - это компилятор с сертификатом A+, поддерживает множество платформ" (c)

* Безопаснее и умнее C++

Ммм?

Не переживай, никто тут не пытался обидеть metaprog.

Вас это беспокоит? Хотите об этом поговорить?

Очень. Но не с тобой.

Тогда M-x doctor тебе поможет.

А гуй Паскаля выглядит общесистемно или как оригинальный вврвиглаз?

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

Ты про нативный вид? Ну он может использовать qt5, gtk2, и многое другое:

Win32/64 Interface - The winapi interface for Windows 95/98/Me/2K/XP/Vista, but not CE
Windows CE Interface - For Pocket PC and Smartphones
Carbon Interface - The Carbon interface for Mac OS X
Cocoa Interface - The Cocoa interface for Mac OS X
Qt Interface - The Qt4 interface for Unixes, Mac OS X, Windows, and Linux-based PDAs
Qt5 Interface - The Qt5 interface for Unixes, Mac OS X, Windows, and Linux-based PDAs
GTK1 Interface - The gtk1 interface for Unixes, Mac OS X (X11), Windows
GTK2 Interface - The gtk2 interface for Unixes, Mac OS X (X11), Windows
GTK3 Interface - The gtk3 interface for Unixes, Mac OS X (X11), Windows

Паскаль более высокоуровневый.

Как написать такое? Я код писал по фану так что на читабельность не смотри:

template <class T, class = typename std::enable_if<
  std::is_integral<typename T::value_type>::value>::type
> 
auto xor_iter1(const T& a, const T& b) 
{
    return ranges::views::zip(a,b) | ranges::views::for_each(
        [](std::pair<typename T::value_type, typename T::value_type> p) 
        { 
             return ranges::yield(p.second ^ p.first); 
        }
    );
}

Ну и в стандартных библиотеках много всего предусмотрено.

А какой в них смысл если у С++ библиотек тупо больше?

Например, можно даже возводить в нулевую степень

В плюсах тоже ж. И единица выйдет.

Как написать такое?

Сначала объясни что это за нечитаемая наркоманска херота и что надо получить, тогда может и покажут как надо хехе, на паскале.

GUI для современного свободного Паскаля обычно делается на LCL (Lazarus Component Library), которая дёргает WinAPI (в Винде), GTK+ или Qt (в Линуксах), Carbon на Маках. Также, ничто не мешает дёргать любую GUI библиотеку, не используя IDE. Я когда писал свои проги, они выглядели системно везде, где я пробовал ради интереса их запускать, даже в WinCE.

До Object Pascal'ей я пока ещё не успел добраться. Если бы код был написан в обычном структурном виде, то ещё, может быть, подсказал бы чего. А так надо ещё разбираться. Но шаблоны есть: https://wiki.freepascal.org/Templates .

А какой в них смысл если у С++ библиотек тупо больше?

Не всем и не всегда нужно больше.

В плюсах тоже ж. И единица выйдет.

Это где? glibc раньше такое не позволял.

Ну у меня скорей про концепты а не шаблоны: https://en.cppreference.com/w/cpp/language/constraints

Это где? glibc раньше такое не позволял.

Да везде вроде.

Не всем и не всегда нужно больше.

И лучше %) Аналогов нет!

концепты

Там написано, что это дополнительные фичи шаблонов. Причём пока ещё экспериментальные даже для C++.

Ну когда слышишь шаблоны о другом думаешь, имхо. Фича это из C++20, у меня реализована без концептов.

да ужж ..
поцаны, прибейте c+++ обезьян а то они угробят всё разумное

Ты просто ниасилил.

с таким подходом скоро и 1000 ядерный интел будет тормозить

И лучше

Кому как.

Аналогов нет!

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

А для юзеров винды есть возможность рулить системой через реестр.

Это аналогов каких библиотек нет?

WinAPI неполный, чуть в сторону от самого стандартного и тоже нету ниче, к примеру Assimp, FMOD, нормальных сетевых либ, leveldb, короче я как не захочу попробовать чет сделать, вечно облом %) Ну может я особенный, однако...

Эту функцию можно даже пометить constexpr, и все будет считаться на момент компиляции. Сложнее не значит тормознее, хотя я не плюсовик, возможно мой вариант плох.

лучше бы свой нормальный проект начал

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

Assimp

https://github.com/ev1313/Pascal-Assimp-Headers

FMOD

https://wiki.freepascal.org/Multimedia_Programming#FMOD

нормальных сетевых либ

Но при этом на Паскале пишут целые web-фреймворки, ага.

leveldb

Зато поддерживается куча других форматов БД.

Ты по ссылкам то ходил?

Но при этом на Паскале пишут целые web-фреймворки, ага.

Ага.

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

Реализации для других языков (например, BlitzMax, C#, Python), как правило, разрабатываются как часть проекта[2].

Первая ссылка на либу которая 5 лет не обновлялась и не содержит полный функционал.

Какие проблемы с дёрганием любой из WinAPI функций? Даже если они не описаны в Windows.pas, заклинания вида

function GetCurrentProcessId:DWORD; external 'kernel32' name 'GetCurrentProcessId';   

всегда спасут отца русской демократии

Осталось заняться увлекательной работой по описанию структур!

Вообще не проблема, 5 минут делов

Сизифов труд.

чё делать, придётся следовать за обезьянами

А чем, кстати, современный Паскаль безопасней C? В нём все возможности отстрелить ногу указателями и ручным управлением памятью присутствуют.

Это да, но во многих других случаях всё равно получается гораздо безопаснее:

In general, the lower dependence on pointers for basic tasks makes it safer than C in practice.

The Extended Pascal standard extends Pascal to support many things C supports, which the original standard Pascal did not, in a type safer manner. For example, schema types support (besides other uses) variable-length arrays while keeping the type-safety of mandatory carrying the array dimension with the array, allowing automatic run-time checks for out-of-range indices also for dynamically sized arrays.

Так не одними динамическими массивами жив человек. Вот я заглянул в код того же PascalCoin, а там сплошь и рядом динамические списки из нетипизированных указателей и New() и Dispose().

Это да, но тут уж ничего не поделаешь.

А чем, кстати, современный Паскаль безопасней C?

Как минимум сильной типизацией.

Кастовать типы можно, есть операция взятия адреса и нетипизированные указатели. Следовательно, от отморозков не спастись.

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

Поэтому, собственно, никто не говорит, что «Паскаль - это самый безопасный язык программирования, безопаснее просто не бывает», а говорят, что «Паскаль безопаснее чем C/C++». Разница таки есть.

Как написать такое?

ударить кулаком по клаве и получить комбинации различных символов, букв, разделенных пробелами, переводом строк, скобочками

ты наверное хотел написать

void *memxor(void *restrict dest, const void *restrict src, size_t n) {
  const char *s = src;
  char *d = dest;

  for (; n > 0; n--) *d++ ^= *s++;
  return dest;
}