1
0
mirror of https://git.openwrt.org/feed/packages.git synced 2024-06-29 12:24:17 +02:00
openwrt-packages/lang/perl/files/signal.config
Marcel Denia afad970139 perl: Switch to split configuration files
This replaces the previously used collection of configuration files for every single
architecture in conjunction with hacky overrides, which became an increasing burden to maintain.

Fixes a number of outstanding bugs and oddities, with the most important one being the
previously wrong signal order(as shown by ext/POSIX/t/sigaction.t).

See files/perlconfig.pl's POD and files/README.config for details.

Signed-off-by: Marcel Denia <naoir@gmx.net>
2015-09-01 09:23:15 +02:00

19 lines
643 B
Plaintext

# Signal table helper
(defined($owrt:sigs)) {
sig_name="$owrt:sigs"
(($owrt:libc eq 'glibc') || ($owrt:libc eq 'uclibc')) {
sig_name="$sig_name NUM32 NUM33 RTMIN NUM35 NUM36"
}
($owrt:libc eq 'musl') {
sig_name="$sig_name NUM32 NUM33 NUM34 RTMIN NUM36"
}
sig_name="$sig_name @{[map({qq/NUM\$_/} 37..$owrt:sig_count - 2)]} RTMAX $owrt:sig_name_extra"
sig_num="@{[0..$owrt:sig_count - 1]} $owrt:sig_num_extra "
sig_count="$owrt:sig_count"
sig_size="@{[scalar(split(q/ /, $sig_name))]}"
sig_name_init="@{[join(q/, /, map({qq/\qq\$_\qq/} split(q/ /, $sig_name)))]}, 0"
sig_num_init="@{[join(q/, /, split(q/ /, $sig_num))]}, 0"
}