summaryrefslogtreecommitdiffstats
path: root/gnu/usr.bin/perl/t/porting/args_assert.t
diff options
context:
space:
mode:
authorafresh1 <afresh1@openbsd.org>2021-03-01 23:19:42 +0000
committerafresh1 <afresh1@openbsd.org>2021-03-01 23:19:42 +0000
commit56d68f1e19ff848c889ecfa71d3a06340ff64892 (patch)
tree272372e9e82dd675d06054187c7f04b32fe71acc /gnu/usr.bin/perl/t/porting/args_assert.t
parentImport perl-5.32.1 (diff)
downloadwireguard-openbsd-56d68f1e19ff848c889ecfa71d3a06340ff64892.tar.xz
wireguard-openbsd-56d68f1e19ff848c889ecfa71d3a06340ff64892.zip
Fix merge issues, remove excess files - match perl-5.32.1 dist
OK sthen@
Diffstat (limited to 'gnu/usr.bin/perl/t/porting/args_assert.t')
-rwxr-xr-xgnu/usr.bin/perl/t/porting/args_assert.t4
1 files changed, 3 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/t/porting/args_assert.t b/gnu/usr.bin/perl/t/porting/args_assert.t
index d9000a6e966..97aaafe04d4 100755
--- a/gnu/usr.bin/perl/t/porting/args_assert.t
+++ b/gnu/usr.bin/perl/t/porting/args_assert.t
@@ -31,7 +31,9 @@ unless (-d 't' && -f 'MANIFEST') {
open my $fh, '<', $proto or die "Can't open $proto: $!";
while (<$fh>) {
- $declared{$1}++ if /^#define\s+(PERL_ARGS_ASSERT[A-Za-z0-9_]+)\s+/;
+ # The trailing '.' distinguishes real from dummy macros that have no
+ # real asserts
+ $declared{$1}++ if /^#define\s+(PERL_ARGS_ASSERT[A-Za-z0-9_]+)\s+./;
}
}