DataMuseum.dk

top - download

    Length: 1259 (0x4eb)
    Types: TextFile
    Notes: R1k Text-file segment

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦7e3383029⟧ 
            └─⟦this⟧ 

TextFile

with transport_defs;
with system;


package transport is


	transport_error:   exception;
	transport_timeout: exception;
	transport_init_err: exception;
	transport_tdm_xcpt: exception;	-- target processor exception while in
									-- TDM, normally, referencing non-existant
									-- memory
	transport_contention: exception;	-- both sides trying to send

	procedure put_signal(
			sig: transport_defs.tdm_sig_t
		);


	procedure send(
			chan:		in transport_defs.channel_t;
			count:		in natural;
			buf_addr:	in system.address
		);


	procedure receive(
			chan:		in transport_defs.channel_t;
			count:		in out natural;
			buf_addr:	in system.address;
			rcvd_msg:	out boolean
		);



	------------------------------------------------------
	-- intialize communications hardware and reset		--
	-- transport internal state							--
	------------------------------------------------------
	procedure initialize(
			verbose:	boolean := FALSE;
			preempt:	boolean := FALSE
		);

	------------------------------------------------------
	-- reset internal state of transport package,       --
	-- without re-initializing the hardware             --
	------------------------------------------------------
	procedure reset;

	procedure shutdown;

end transport