note
	description: "[
		Well know parallel port addresses.
	]"
	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_ADDRESS

inherit
	ENUM_TYPE [NATURAL_16]

create
	default_create,
	make

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

feature -- Access

	lpt1: NATURAL_16 = 0x378
			-- Address of parallel port 1 (Default)

	lpt2: NATURAL_16 = 0x278
			-- Address of parallel port 2

	lpt3: NATURAL_16 = 0x3BC
			-- Address of parallel port 3

feature {NONE} -- Factory

    members: ARRAY [NATURAL_16]
            -- <Precursor>
		once
			Result := <<lpt1, lpt2, lpt3>>
		end

end