From b4bf880c8deac37445a493adf9c5eb42a168a486 Mon Sep 17 00:00:00 2001
From: Eric Wong <mwrap-perl@80x24.org>
Date: Tue, 27 Dec 2022 21:56:29 +0000
Subject: rproxy: support FreeBSD addr2line unresolved (??) output

FreeBSD addr2line uses `?? at ??:0' for unresolved addresses, so
relax the regexp we use for handling unresolved output.
---
 lib/Devel/Mwrap/Rproxy.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Devel/Mwrap/Rproxy.pm b/lib/Devel/Mwrap/Rproxy.pm
index b2bee8c..c96a947 100644
--- a/lib/Devel/Mwrap/Rproxy.pm
+++ b/lib/Devel/Mwrap/Rproxy.pm
@@ -66,7 +66,7 @@ sub a2l {
 	my $a2l = $addr2line{$exe} //= Devel::Mwrap::Rproxy::A2L->new($exe);
 	chomp(my $line = $a2l->lookup($addr));
 	$line = Plack::Util::encode_html($line);
-	$line =~ /\A\?\?:/ ? "$line $exe $addr" : $line;
+	$line =~ /\?\?/ ? "$line $exe $addr" : $line;
 }
 
 sub call { # PSGI entry point
-- 
cgit v1.2.3-24-ge0c7