On Mon, Feb 17, 2020 at 3:46 PM Martin Storsjö <mar...@martin.st> wrote:
>
> Perl 5.28 warns about this, saying it will be fatal in Perl 5.32.
>
> Signed-off-by: Martin Storsjö <mar...@martin.st>
> ---
>  gas-preprocessor.pl | 2 +-
>  1 file changed, 1 insertion(+), 1 deletion(-)
>
> diff --git a/gas-preprocessor.pl b/gas-preprocessor.pl
> index b2a4bcc..e3805e0 100755
> --- a/gas-preprocessor.pl
> +++ b/gas-preprocessor.pl
> @@ -1102,7 +1102,7 @@ sub handle_serialized_line {
>              }
>
>              # Convert "ld1 {v0.4h-v3.4h}" into "ld1 
> {v0.4h,v1.4h,v2.4h,v3.4h}"
> -            if ($line =~ 
> /(?:ld|st)\d\s+({\s*v(\d+)\.(\d[bhsdBHSD])\s*-\s*v(\d+)\.(\d[bhsdBHSD])\s*})/)
>  {
> +            if ($line =~ 
> /(?:ld|st)\d\s+(\{\s*v(\d+)\.(\d[bhsdBHSD])\s*-\s*v(\d+)\.(\d[bhsdBHSD])\s*\})/)
>  {
>                  my $regspec = $1;
>                  my $reg1 = $2;
>                  my $layout1 = $3;
> --
LGTM, verified
_______________________________________________
ffmpeg-devel mailing list
ffmpeg-devel@ffmpeg.org
https://ffmpeg.org/mailman/listinfo/ffmpeg-devel

To unsubscribe, visit link above, or email
ffmpeg-devel-requ...@ffmpeg.org with subject "unsubscribe".

Reply via email to