note
	description: "[
		Describes this location, so units can be moved to it.
		]"
	author: "Jimmy J. Johnson"

deferred class
	LOCATION_UNCOMMITTED

inherit

	LOCATION
		redefine
			make
		end

feature {NONE} -- Initialization

	make (a_game: like game)
			-- Set up Current
		do
			Precursor (a_game)
			nationality := {NATIONALITY_CONSTANTS}.nobody
		end

feature {NONE} -- Inapplicable

	adjacent_sea_areas: LINEAR [SEA_AREA]
			-- A list of all sea areas that touch this location
		do
				-- satisfy void safety
			Result := (create {LINKED_SET [SEA_AREA]}.make).linear_representation
			check
				do_not_call: False
					-- Because not applicable
			end
		end

end
