note
	description: "[
		Type of parallel port register.
	]"
	legal   : "See notice at end of class."
	status  : "See notice at end of class.";
	author  : "Paul Bates (paul.a.bates@gmail.com)"
	date    : "$Date$"
	revision: "$Revision$"

expanded class
	PRT_PARALLEL_REGISTER_TYPE

inherit
	ENUM_TYPE [NATURAL_8]

create
	default_create,
	make

convert
	make ({NATURAL_8}),
	item: {NATURAL_8}

feature -- Access

	data: NATURAL_8 = 0x0
			-- Data register.

	status: NATURAL_8 = 0x1
			-- Status register.

	control: NATURAL_8 = 0x2
			-- Control register.

feature {NONE} -- Factory

    members: ARRAY [NATURAL_8]
            -- <Precursor>
		once
			Result := <<data, status, control>>
		end

end