Телеграмм чат группы adalang страница 5086

Если кто помнит эту эпопею - вначале же perl 6 упорно пытались делать, несовместимый с perl 5. Потом, когда дошло, что он нах никому не нужен после 10 лет разработки и существования питона, вернулись к идее испортить perl 5 ;)

источник

16:21пожаловаться #11

. . in Ada

например в p 5.32 вместо примитивного eval { }or для исключений, сделали передовой try {} catch и т.п. Ну и совместимость где-то похерили, до сих пор не совсем понимают где)

источник

16:22пожаловаться #12

. . in Ada

Зато, теперь наконец-то заработал правильный код
use Win32::API;
#my $fi = Win32::API->new( 'libada.dll', 'void ada_init()') || die "error: $!\n";
my $fc = Win32::API->new( 'libada.dll', 'void doia()') || die "error: $!\n";
#my $ff = Win32::API->new( 'libada.dll', 'void ada_final()') || die "error: $!\n";

#$return = $fi->Call();
$return = $fc->Call();
#$return = $ff->Call();

источник

16:27пожаловаться #13

. . in Ada

теперь не надо ada_init и ada_final в конце вызывать, сами вызываются, только теперь надо вручную за разрядностью следить, потому что диагностического сообщения нормального больше не выдаётся. И совместимости как в питоне нет

источник

16:27пожаловаться #14

Egor Pugin in Ada

что-нибудь с юникодом, длинными путями

источник

16:47пожаловаться #15

Слава in Ada

Тоже ничего нового не появилось со времён Висты

источник

17:06пожаловаться #16

. . in Ada

64 разрядная кстати нормально встала, именно 32 матерится

источник

17:14пожаловаться #17

2021 June 05

. . in Ada

В общем, сегодня пару часов посмотрел на интеграцию новой версии перла с dll и умилялся. Всё в лучшем, ламповом стиле питона. Я бы даже сказал, что в простых случаях удобнее))
Никакого секаса с perl xs или глючным Inline::...

источник

15:17пожаловаться #18

. . in Ada

подключаете
use Win32::API;

создаёте указатель на функцию прямо через описание прототипа
my $fr = Win32::API->new( './dll_lib/libada.dll', 'char* rsada()') || die "error: $!\n";

и вперёд...
$result = $fr->Call();

источник

15:20пожаловаться #19

. . in Ada

В аде соответственно только конвертировать функции через
with Interfaces.C; use Interfaces.C;

источник

15:21пожаловаться #20