indexing
	description: "Objects that ..."
	author: ""
	date: "$Date$"
	revision: "$Revision$"

class
	AXIS_FOLLOWING_SIBLING

inherit
	AXIS

feature -- Basic Operations

	start (n: XML_NODE) is
			--
		do
			node := n
			item := node.next_sibling
		end

	next is
			--
		do
			item := item.next_sibling
		end

end