Best of Jokes Current Jokes RHF Home Search Sponsor RHF?
Fun Stuff & Jokes
Previous | RHF Joke Archives | Next

What are the lawyers doing to the computer industry?

paulo@eik.ii.uib.no
(smirk, computer)

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)


Previous | RHF Joke Archives | Next

Best of Jokes | Current Jokes | RHF Home | Search