def answer.above
import ezx@1.11.0.0/src/lock/run.bend as Runimport Base
import ezx@1.11.0.0/src/git/exec.bend as GX
import ezx@1.11.0.0/src/lock/up.bend as Up
332# whether `tip` descends from `pin`, asked of a blobless bare clone
333def answer.above(+lib: String, +url: String, +pin: String, +tip: String) -> IO(Up.Answer):
334 do IO<Up.Answer>:
335 yes : Bool <- GX.descendant.at(lib ++ "/.work-above", url, pin, tip)
336 return Up.Onward{yes}