note
	description: "[
		Hitachi HD44780 controller display font sizes.
	]"
	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
	HD44780_FONT

inherit
	ENUM_TYPE [NATURAL_8]

create
	default_create,
	make

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

feature -- Access

	font_5x7: NATURAL_8 = 0x0
			-- 5x7 font size

	font_5x10: NATURAL_8 = 0x1
			-- 5x10 font size

feature {NONE} -- Members

	members: ARRAY [NATURAL_8]
			-- <Precursor>
		once
			Result := <<
				font_5x7,
				font_5x10 >>
		end

end