#!/bin/sh
set -C -e -f -u
cd "$AUTOPKGTEST_TMP"

cat > m.adb <<EOF
with Ada.Text_IO;
procedure M is
   procedure C_Call with Import, Convention => C;
begin
   Ada.Text_IO.Put_Line ("Hello from Ada.");
   C_Call;
end M;
EOF
cat > c.c <<EOF
#include <stdio.h>
void c_call(void)
{
   printf("Hello from C.\n");
}
EOF
cat > p.gpr <<EOF
project P is
   for Main use ("m.adb");
   for Languages use ("Ada", "C");
end P;
EOF

gcc_version=`gnatmake --version | sed 's/.* //;q'`
echo "gcc_version : $gcc_version"

gprconfig --batch --config=Ada --config=C,$gcc_version,,,gcc
gprbuild -vh p.gpr

./m
