diff --git a/lib/Utils/Architectures.pm b/lib/Utils/Architectures.pm
index d4dd7edcf4e4..f9c3511988dc 100644
--- a/lib/Utils/Architectures.pm
+++ b/lib/Utils/Architectures.pm
@@ -13,6 +13,12 @@
# You should have received a copy of the GNU General Public License along
# with this program; if not, see .
+=head1 Utils::Architectures
+
+C - Library for archtectures related functionality
+
+=cut
+
package Utils::Architectures;
use strict;
use warnings;
@@ -42,21 +48,68 @@ our %EXPORT_TAGS = (
# specific architectures
+=head2 is_s390x
+
+ is_s390x();
+
+Returns C.
+
+=cut
sub is_s390x {
return check_var('ARCH', 's390x');
}
+
+=head2 is_i586
+
+ is_i586();
+
+Returns C.
+
+=cut
sub is_i586 {
return check_var('ARCH', 'i586');
}
+
+=head2 is_i686
+
+ is_i686();
+
+Returns C.
+
+=cut
sub is_i686 {
return check_var('ARCH', 'i686');
}
+
+=head2 is_x86_64
+
+ is_x86_64();
+
+Returns C.
+
+=cut
sub is_x86_64 {
return check_var('ARCH', 'x86_64');
}
+
+=head2 is_aarch64
+
+ is_aarch64();
+
+Returns C.
+
+=cut
sub is_aarch64 {
return check_var('ARCH', 'aarch64');
}
+
+=head2 is_ppc64le
+
+ is_ppc64le();
+
+Returns C.
+
+=cut
sub is_ppc64le {
return check_var('ARCH', 'ppc64le');
}