/*
Copyright (C) 2015 LiveCode Ltd.

This file is part of LiveCode.

LiveCode is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License v3 as published by the Free
Software Foundation.

LiveCode is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

You should have received a copy of the GNU General Public License
along with LiveCode.  If not see <http://www.gnu.org/licenses/>.  */

module com.livecode.array.tests

public handler TestSubscriptPrecedence()
	variable tArray as Array

	-- Bug 15435
	put the empty array into tArray
	put "foo" into tArray["bar"]
	test "subscript (_ ends with)" when tArray["bar"] ends with "o"
end handler

public handler TestIsAmongTheElementsOf()
	/* Non-const variants of in element searches are required to ensure
	 * it isn't just pointer equality which is occurring (LCB uniques all 
	 * constants so the same constant has the same pointer). */

	variable tArray
	put {"a": "x", "b": 1, "c": true, "d": { "e": [2] } } into tArray
	test "element is among the elements of" when "x" is among the elements of tArray
	test "element is among the elements of (non-const)" when ("x" & "") is among the elements of tArray
	test "array element is among the elements of" when { "e": [2] } is among the elements of tArray
	test "array element is among the elements of (non-const)" when { "e": [1 + 1] } is among the elements of tArray
	test "array element is not among the elements of" when not { "e": [1] } is among the elements of tArray
end handler

end module