fork(4) download 
  1. With Ada.Text_IO; Use Ada.Text_IO;  
  2. With Ada.Integer_Text_IO; Use Ada.Integer_Text_IO;
  3.  
  4. procedure Prog is
  5.   Large : array (0 .. 100) of Integer;
  6.   Small : array (0 .. 3) of Integer;
  7. begin
  8.   -- extract section from one array into another.
  9.   Small(0 .. 3) := Large(10 .. 13);
  10. end;
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin 
Standard input is empty
compilation info 
gcc-4.6 -c -pipe -O2 prog.adb
prog.adb:9:20: expected type of Small declared at line 6
prog.adb:9:20: found type of Large declared at line 5
gnatmake: "prog.adb" compilation error
stdout 
Standard output is empty
https://ideone.com/5AA3pC
language:
Ada95 (gnat 8.3)
created:
10 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!