blob: c0a76bcadffaddc66b68b3d5f9c1248cf8f30a0a (
plain) (
tree)
|
|
package body TS1325.Parallel is
procedure Read_Parallel_Port (Data: out Byte) is
begin
Inport (Parallel_Port_In, Data);
end Read_Parallel_Port;
procedure Write_Parallel_Port (Data: in Byte) is
begin
Outport (Parallel_Port_Out, Data);
end Write_Parallel_Port;
end TS1325.Parallel;
|