From 26fa911d410208ebef16530b1240de921d37ff66 Mon Sep 17 00:00:00 2001
From: Johnny Hughes <johnny@centos.org>
Date: Mar 21 2019 18:22:43 +0000
Subject: Merge pull request #33 from psgreco/test_gcc_gnat


Add test for gcc-gnat
---

diff --git a/tests/p_gcc-gnat/0-install_gcc-gnat.sh b/tests/p_gcc-gnat/0-install_gcc-gnat.sh
new file mode 100755
index 0000000..c60a088
--- /dev/null
+++ b/tests/p_gcc-gnat/0-install_gcc-gnat.sh
@@ -0,0 +1,13 @@
+#!/bin/bash
+# Author: Pablo Greco <pablo@fliagreco.com.ar>
+
+# Install gcc-gnat
+t_Log "Running $0 - installing gcc-gnat."
+
+
+# Install git
+if [ $centos_ver -ge 7 ];  then
+  t_InstallPackage gcc-gnat
+else
+  t_Log "This test is skipped before CentOS7."
+fi
diff --git a/tests/p_gcc-gnat/test_gcc-gnat.sh b/tests/p_gcc-gnat/test_gcc-gnat.sh
new file mode 100755
index 0000000..ca3940a
--- /dev/null
+++ b/tests/p_gcc-gnat/test_gcc-gnat.sh
@@ -0,0 +1,29 @@
+#!/bin/sh
+# Author: Pablo Greco <pablo@fliagreco.com.ar>
+
+t_Log "Running $0 - gcc-gnat can build a hello.adb"
+
+# creating source code
+pushd '/var/tmp' >/dev/null
+FILE='/var/tmp/gcctesthello.adb'
+EXE='/var/tmp/gcctesthello'
+
+cat > $FILE <<EOF
+with Ada.Text_IO;
+
+procedure GccTestHello is
+begin
+  Ada.Text_IO.Put_Line("hello, centos!");
+end GccTestHello;
+EOF
+
+# Executing gcc
+gnat make -o $EXE $FILE
+
+# run EXE
+$EXE |grep -q 'hello, centos'
+t_CheckExitStatus $?
+
+# remove files
+/bin/rm $FILE $EXE $EXE.ali $EXE.o
+popd >/dev/null