def packages_ok

near-v-framework@0.4.0.0 · domain/architecture/system/release/ops.bend:32

import Base
import near-v-framework@0.4.0.0/domain/architecture/system/release/type.bend as Rl

32def packages_ok(ps: List<&2, Rl.Package>) -> Bool:
33  match ps:
34    case []:
35      True{}
36    case p <> rest:
37      package_ok(p) && packages_ok(rest)