File: link-with-shared

package info (click to toggle)
asis 2015-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 13,640 kB
  • sloc: ada: 140,372; makefile: 260; sh: 50; xml: 48; csh: 10
file content (20 lines) | stat: -rw-r--r-- 309 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
#!/bin/sh
set -C -e -f -u
cd "$ADTTMP"

cat > main.adb <<EOF
with Asis.Ada_Environments;
procedure Main is
  W : constant Wide_String := Asis.Ada_Environments.Default_Name;
begin
   null;
end Main;
EOF
cat > p.gpr <<EOF
with "asis";
project P is
   for Main use ("main.adb");
end P;
EOF
gprbuild p.gpr
./main