Skip to content

Instantly share code, notes, and snippets.


Denis DoubleDi

Block or report user

Report or block DoubleDi

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View gist:17c230e1edf5528f12a11622f76a4dc1
/* Запуск программы */
start :- /* создаём диалоговое окно */
new(DW, dialog('Окно моей программы')),
/* создаём поле Picture для вывода графических
фигур и задаём его размеры */
new(Picture, picture),
send(Picture, width(350)),
send(Picture, height(350)),
/*добавляем в это диалоговое окно список
объектов*/send_list(DW,append, /*графическое поле*/
View typemap
$type typemap__struct = ($type)$arg;
SV *x;
SV *y;
sv_setnv(x, typemap__struct->x);
sv_setnv(y, typemap__struct->y);
HV *point = newHV();
hv_store((HV *)point, \"x\", 1, x, 0);
hv_store((HV *)point, \"y\", 1, y, 0);
SV *ref = newRV_inc((SV*)point);
use strict;
use warnings;
use feature "say";
use AnyEvent::HTTP;
use Web::Query;
use DDP;
my $index = 1;
my $results_hash = {};
You can’t perform that action at this time.