tricu

An interpreted language for exploring Tree Calculus
Log | Files | Refs | README | LICENSE

choose-found.scp (296B)

      1 -- Application-specific: search for the first nonempty suffix; otherwise
      2 -- return the request's fallback. The search worker is supplied as state.
      3 consumer chooseFound
      4   (paths, fallback) @ finder => call finder paths as optional in
      5     match optional of (leaf => fallback | stem value => value)