def writes.of
import ezx@1.11.0.0/src/tool/plan.bend as Planimport Base
import ezx@1.11.0.0/src/lock/plan.bend as P
import ezx@1.11.0.0/src/pkg/pkg.bend as K
767# every file of a checkout written under its top
768def writes.of(+top: String, fs: List<&2, K.Source>) -> List<&2, P.Effect>:
769 match fs:
770 case []:
771 []
772 case K.Source{at, text} <> t:
773 P.Write{top ++ "/" ++ at, text} <> writes.of(top, t)