/*

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