diff options
Diffstat (limited to 'testsuites/ada/support/address_io.ads')
-rw-r--r-- | testsuites/ada/support/address_io.ads | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/testsuites/ada/support/address_io.ads b/testsuites/ada/support/address_io.ads new file mode 100644 index 0000000000..8a4fce98d3 --- /dev/null +++ b/testsuites/ada/support/address_io.ads @@ -0,0 +1,32 @@ +-- +-- ADDRESS_IO / SPECIFICATION +-- +-- DESCRIPTION: +-- +-- This package instantiates the IO routines necessary to +-- perform IO on data of the type System.Address. +-- +-- DEPENDENCIES: +-- +-- +-- +-- COPYRIGHT (c) 1989-1997. +-- On-Line Applications Research Corporation (OAR). +-- +-- The license and distribution terms for this file may in +-- the file LICENSE in this distribution or at +-- http://www.rtems.org/license/LICENSE. +-- + +with System; + +package Address_IO is + + procedure Put ( + Item : in System.Address; + Width : in Natural := 8; + Base : in Natural := 16 + ); + +end Address_IO; + |