with System_Utilities;
package Port_Tools is
    ---- this package contains a set of port/terminal tools that are useful
    ---- for doing diagnostics on the ports.
    subtype R1000_Port is System_Utilities.Port range 16 .. 47;
    procedure Port_Settings (From : R1000_Port := Port_Tools.R1000_Port'First;
                             To : R1000_Port := Port_Tools.R1000_Port'Last);


end Port_Tools;