1
1
mirror of https://github.com/github/semantic.git synced 2024-11-24 17:04:47 +03:00
semantic/prototype/DoubtTests/LocationTests.swift
2015-11-05 10:57:07 -05:00

26 lines
565 B
Swift

final class LocationTests: XCTestCase {
func testExplorationOfATermBeginsAtTheExploredTerm() {
assert(term.explore().it, ==, term)
}
func testCannotMoveUpwardsAtTheStartOfAnExploration() {
assert(term.explore().up?.it, ==, nil)
}
}
private let leaf = Cofree(1, .Leaf("a string"))
private let term: Cofree<String, Int> = Cofree(0, .Indexed([
leaf,
Cofree(2, .Leaf("b string")),
Cofree(3, .Keyed([
"a": Cofree(4, .Leaf("a nested string")),
"b": Cofree(5, .Leaf("b nested string")),
])),
]))
import Assertions
@testable import Doubt
import XCTest