+# Parse the RETIRED_EXES variable from the Makefiles to populate %disable.
+# Duplicated in ../OSX/build-fntable.pl.
+#
+sub parse_makefiles() {
+ foreach my $mf ( "Makefile.in", "glx/Makefile.in" ) {
+ open (my $in, '<', $mf) || error ("$mf: $!");
+ local $/ = undef; # read entire file
+ my $body = <$in>;
+ close $in;
+
+ $body =~ s/\\\n//gs;
+ my ($var) = ($body =~ m/^RETIRED_EXES\s*=\s*(.*)$/mi);
+ my ($var2) = ($body =~ m/^RETIRED_GL_EXES\s*=\s*(.*)$/mi);
+ error ("no RETIRED_EXES in $mf") unless $var;
+ $var .= " $var2" if $var2;
+ foreach my $hack (split (/\s+/, $var)) {
+ $disable{$hack} = 2;
+ }
+ }
+}
+
+