From 63caf9e9e18c23dcd3f077f3717d08d09a07277d Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Mon, 5 Jan 2026 23:07:17 +0000 Subject: [PATCH] ParseXS: add comment at the top of all t/5xx*.t Add a boilerplate comment line or two explaining the purpose of each file. --- dist/ExtUtils-ParseXS/t/501-typemaps-compile.t | 4 ++++ dist/ExtUtils-ParseXS/t/510-typemaps-bare.t | 4 ++++ dist/ExtUtils-ParseXS/t/511-typemaps-whitespace.t | 4 ++++ dist/ExtUtils-ParseXS/t/512-typemaps-file.t | 4 ++++ dist/ExtUtils-ParseXS/t/513-typemaps-merge.t | 3 +++ dist/ExtUtils-ParseXS/t/514-typemaps-embed.t | 3 +++ dist/ExtUtils-ParseXS/t/515-typemaps-cmd.t | 3 +++ dist/ExtUtils-ParseXS/t/516-typemaps-clone.t | 3 +++ dist/ExtUtils-ParseXS/t/517-typemaps-targetable.t | 4 ++++ dist/ExtUtils-ParseXS/t/518-typemaps-compat.t | 11 +++++++---- 10 files changed, 39 insertions(+), 4 deletions(-) diff --git a/dist/ExtUtils-ParseXS/t/501-typemaps-compile.t b/dist/ExtUtils-ParseXS/t/501-typemaps-compile.t index 5681cd2e22..5aceadeda0 100644 --- a/dist/ExtUtils-ParseXS/t/501-typemaps-compile.t +++ b/dist/ExtUtils-ParseXS/t/501-typemaps-compile.t @@ -1,4 +1,8 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# check it built ok. + use strict; BEGIN { $| = 1; diff --git a/dist/ExtUtils-ParseXS/t/510-typemaps-bare.t b/dist/ExtUtils-ParseXS/t/510-typemaps-bare.t index 033c0aea5a..7a292f1764 100644 --- a/dist/ExtUtils-ParseXS/t/510-typemaps-bare.t +++ b/dist/ExtUtils-ParseXS/t/510-typemaps-bare.t @@ -1,4 +1,8 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# [ XXX I'm not clear what 'bare' refers to in the test file name ] + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/511-typemaps-whitespace.t b/dist/ExtUtils-ParseXS/t/511-typemaps-whitespace.t index 003d7e5378..cd064f5572 100644 --- a/dist/ExtUtils-ParseXS/t/511-typemaps-whitespace.t +++ b/dist/ExtUtils-ParseXS/t/511-typemaps-whitespace.t @@ -1,4 +1,8 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# Check that leading white space in typemap lines are handled correctly. + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/512-typemaps-file.t b/dist/ExtUtils-ParseXS/t/512-typemaps-file.t index 53bb393738..22548d3a76 100644 --- a/dist/ExtUtils-ParseXS/t/512-typemaps-file.t +++ b/dist/ExtUtils-ParseXS/t/512-typemaps-file.t @@ -1,4 +1,8 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# check creating and writing typemaps + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/513-typemaps-merge.t b/dist/ExtUtils-ParseXS/t/513-typemaps-merge.t index 72d948fce2..760768292e 100644 --- a/dist/ExtUtils-ParseXS/t/513-typemaps-merge.t +++ b/dist/ExtUtils-ParseXS/t/513-typemaps-merge.t @@ -1,4 +1,7 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps::merge() + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/514-typemaps-embed.t b/dist/ExtUtils-ParseXS/t/514-typemaps-embed.t index 976af3123e..01b5b5e2af 100644 --- a/dist/ExtUtils-ParseXS/t/514-typemaps-embed.t +++ b/dist/ExtUtils-ParseXS/t/514-typemaps-embed.t @@ -1,4 +1,7 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps::as_embedded_typemap() + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/515-typemaps-cmd.t b/dist/ExtUtils-ParseXS/t/515-typemaps-cmd.t index d5e862b7e6..a02da61416 100644 --- a/dist/ExtUtils-ParseXS/t/515-typemaps-cmd.t +++ b/dist/ExtUtils-ParseXS/t/515-typemaps-cmd.t @@ -1,4 +1,7 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps::Cmd::embeddable_typemap() + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/516-typemaps-clone.t b/dist/ExtUtils-ParseXS/t/516-typemaps-clone.t index 239ec52e96..7edf8e527d 100644 --- a/dist/ExtUtils-ParseXS/t/516-typemaps-clone.t +++ b/dist/ExtUtils-ParseXS/t/516-typemaps-clone.t @@ -1,4 +1,7 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps::clone() + use strict; use warnings; diff --git a/dist/ExtUtils-ParseXS/t/517-typemaps-targetable.t b/dist/ExtUtils-ParseXS/t/517-typemaps-targetable.t index 81ee99adf6..3677e74ff1 100644 --- a/dist/ExtUtils-ParseXS/t/517-typemaps-targetable.t +++ b/dist/ExtUtils-ParseXS/t/517-typemaps-targetable.t @@ -1,4 +1,8 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# test targetable() and targetable_legacy() methods + use strict; use warnings; use Carp; diff --git a/dist/ExtUtils-ParseXS/t/518-typemaps-compat.t b/dist/ExtUtils-ParseXS/t/518-typemaps-compat.t index 6a330668d2..d0ac26f0ff 100644 --- a/dist/ExtUtils-ParseXS/t/518-typemaps-compat.t +++ b/dist/ExtUtils-ParseXS/t/518-typemaps-compat.t @@ -1,13 +1,16 @@ #!/usr/bin/perl +# +# Test ExtUtils::Typemaps: +# +# This test file is for making sure that the new EU::Typemaps +# based typemap merging produces the same result as the old +# EU::ParseXS code. + use strict; use warnings; use Test::More; -# This test is for making sure that the new EU::Typemaps -# based typemap merging produces the same result as the old -# EU::ParseXS code. - use ExtUtils::Typemaps; use ExtUtils::ParseXS::Utilities qw( C_string