Example: Library Units

The way you would do this depends on the ada environment you are using:

• sun ada (used in CS1)
• gnat ada (used in CS1E)

Sun ada

basic_io.a

------------------------------------------------------------
-- Define standard I/O packages for numbers
--
-- Chris Lokan
-- 26 July 1995
------------------------------------------------------------

with TEXT_IO;
package int_io is new TEXT_IO.INTEGER_IO(INTEGER);

with TEXT_IO;
package float_io is new TEXT_IO.FLOAT_IO(FLOAT);

Compilation

adac basic_io.a

• puts int_io, float_io in library
• use ("WITH") them in other code
• no need to define them in other code
• but an extra source file to compile

gnat ada

int_io.ads

------------------------------------------------------------
-- int_io.ads - Declare standard integer I/O package
--
-- Lawrie Brown / 4 Aug 95
------------------------------------------------------------

with TEXT_IO;
package int_io is new TEXT_IO.INTEGER_IO(INTEGER);

float_io.ads

------------------------------------------------------------
-- float_io.ads - Declare standard float I/O package
--
-- Lawrie Brown / 4 Aug 95
------------------------------------------------------------

with TEXT_IO;
package float_io is new TEXT_IO.FLOAT_IO(FLOAT);

Compilation

gnatcc int_io.ads
gnatcc float_io.ads

• puts int_io, float_io in library
• use ("WITH") them in other code
• no need to define them in other code
• but extra source files to compile