// comparetest — exercises strings.compare. A failing row aborts // via the assert/abort builtin (task #5 @test conversion). // Vectors mirror ref/hare/strings/compare.ha. package strings_test; import strings; // ref/hare/strings/compare.ha:16. @test fn compare_cases() void = { assert(!(strings.compare("ABC", "ABC") != 0)); assert(!(strings.compare("ABC", "AB") <= 0)); assert(!(strings.compare("AB", "ABC") >= 0)); assert(!(strings.compare("BCD", "ABC") <= 0)); assert(!(strings.compare("ABC", "abc") >= 0)); assert(!(strings.compare("ABC", "こんにちは") >= 0)); };