I found this lurking in the examples/ directory of the Verdix Ada compiler.
-- UNIT: procedure HELLO
-- FILES: hello.a
-- COMPILE: ada hello.a
-- LINK: a.ld hello -o hello
-- PURPOSE: typical first program; use of TEXT_IO package in STANDARD library.
-- DESCRIPTION: prints "Hello, world." message.
-- Usage: hello
-- .......................................................................... --
with TEXT_IO; use TEXT_IO;
procedure hello is
begin
put ("Hello, world.");
new_line;
end hello;
-- .......................................................................... --
--
-- DISTRIBUTION AND COPYRIGHT:
--
-- This software is released to the Public Domain (note:
-- software released to the Public Domain is not subject
-- to copyright protection).
-- Restrictions on use or distribution: NONE
--
-- DISCLAIMER:
--
-- This software and its documentation are provided "AS IS" and
-- without any expressed or implied warranties whatsoever.
-- No warranties as to performance, merchantability, or fitness
-- for a particular purpose exist.
--
-- Because of the diversity of conditions and hardware under
-- which this software may be used, no warranty of fitness for
-- a particular purpose is offered. The user is advised to
-- test the software thoroughly before relying on it. The user
-- must assume the entire risk and liability of using this
-- software.
--
-- In no event shall any person or organization of people be
-- held responsible for any direct, indirect, consequential
-- or inconsequential damages or lost profits.
(From the "Rest" of RHF)