The Ada Binding

18th October 2002

Ada Binding Specification

The Ada binding is maintained by Martin Dowie <martin.dowie@btopenworld.com>

It is provided in the form of a set of seven Ada interface specification files as follows:

Canonical Sample Program

To give a flavour of the Ada binding, here is ZOOM's equivalent of the ``Hello World'' program: a tiny Z39.50 client that fetches and displays the MARC record for Farlow & Brett Surman's The Complete Dinosaur from the Library of Congress.

with Zoom.Connections; use Zoom.Connections;
with Zoom.Records;     use Zoom.Records;
with Zoom.Result_Sets; use Zoom.Result_Sets;
with Zoom.Queries;     use Zoom.Queries;

procedure Canonical is
   Conn : Connection   := New_Connection ("z3950.loc.gov", 7090);
   Q    : Prefix_Query := Create ("@attr 1=7 0253333490");
   Rs   : Result_Set;
begin
   Set_Option (Conn, "databaseName", "Voyager");
   Rs := Search (Conn, Q);
   Render (Get_Record (Rs, 0));
end Canonical;

Ada Binding Implementations

None yet available, although Martin is working on one.

Feedback to <mike@indexdata.com> is welcome!