mirror/binutils-gdb
2
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2025-01-12 12:16:04 +08:00
Code Issues Packages Projects Releases Wiki Activity

gprofng: fix bug 29351 - Move dynamic loading of modules to a later stage

Browse Source 
gprofng/Changelog:
2022-07-22  Ruud van der Pas  <ruud.vanderpas@oracle.com>

	PR gprofng/29351
	* gp-display-html/gp-display-html.in: the dynamic loading of
	modules occurred too early, resulting in the generation of the
	man page to fail in case a module is missing; the loading part is
	now done somewhat later in the execution to avoid this problem.
This commit is contained in:
Ruud van der Pas 2022-07-22 06:32:51 -07:00 committed by Vladimir Mezentsev
parent 24d2cbc42c
commit 872ae1027e
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gprofng/gp-display-html/gp-display-html.in
View File

@ -8852,6 +8852,8 @@ sub handle_module_availability
{
my $subr_name = get_my_name ();
gp_message ("verbose", $subr_name, "Handling module requirements");
#------------------------------------------------------------------------------
# This is clunky at best, but there is a chicken egg problem here. For the
# man page to be generated, the --help and --version options need to work,
@ -8868,7 +8870,9 @@ sub handle_module_availability
"List::Util",
"Cwd",
"File::Basename",
"File::stat",
"POSIX",
"bigint",
"bignum");
my @missing_modules = ();
@ -8895,12 +8899,17 @@ sub handle_module_availability
{
$cmd = $m . "->import ( qw (min max))";
}
elsif ($m eq "bigint")
{
$cmd = $m . "->import ( qw (hex))";
}
else
{
$cmd = $m . "->import";
}
$cmd .= ";";
$result = eval ("$cmd");
gp_message ("debugM", $subr_name, "cmd = $cmd");
}
else
{