def tracked.step
import ezx@1.11.0.0/src/pub/plan.bend as Planimport Base
481# whether `git ls-files -v` names a path as tracked in the ordinary way. `H`
482# is a file git holds and watches; a file marked `--assume-unchanged` (`h`) or
483# `--skip-worktree` (`S`) is one whose changes `git status` does not report,
484# so its text on disk need not be the commit's, and it counts as untracked.
485def tracked.step(hit: Bool, rest: Unit -> Bool) -> Bool:
486 match hit:
487 case True{}:
488 True{}
489 case False{}:
490 rest(Unit{})