## Strings

    "foo ""bar"" baz"
    "Multi-line strings are appended with a " &
    "ampersand symbole."

## Ada83 example

    WITH ADA.TEXT_IO;

    --  Comments look like this.

    PROCEDURE TEST IS
    BEGIN
       ADA.TEXT_IO.PUT_LINE ("Hello");   --  Comments look like this.
    END TEST;

## Ada 2012 full example

    with Ada.Text_IO; Use Ada.Text_IO;

    --  Comments look like this.
    procedure Test is
       procedure Bah with
        Import        => True,   --  Shows the new aspect feature of the language.
        Convention    => C,
        External_Name => "bah";

       type Things is range 1 .. 10;
    begin
       Put_Line ("Hello");   --  Comments look like this.

       Bah;  -- Call C function.

       for Index in Things'Range loop
          null;
       end loop;
    end Test;