def observed

near-v-framework@0.4.0.0 · domain/architecture/system/deployment/nix_darwin/brew/effects.bend:90

import Base
import near-v-framework@0.4.0.0/domain/architecture/system/effs/io.bend as X
import near-v-framework@0.4.0.0/domain/architecture/system/deployment/nix_darwin/brew/type.bend as Br
import near-v-framework@0.4.0.0/domain/architecture/system/deployment/nix_darwin/brew/ops.bend as BrO

90# The Mac's Homebrew entries, as `brew bundle dump` writes them.
91def observed() -> IO(List<&2, Br.Brew>):
92  do IO<List<&2, Br.Brew>>:
93    ok : Bool <- X.succeeds("brew", ["bundle", "dump", "--force", "--file=" ++ observed_file()])
94    text : String <- X.read(observed_file())
95    return Bool.pick(List<&2, Br.Brew>, ok, BrO.of_brewfile(text), [])