Joint.pin.same: def of ezx@1.11.0.0
Import: import ezx@1.11.0.0/src/ws/joint.bend as Joint
Lines 271-285 of ezx@1.11.0.0/src/ws/joint.bend: https://jend.leeeet.dev/read.txt?path=ezx@1.11.0.0/src/ws/joint.bend&start_line=271&end_line=285

import Base
import ezx@1.11.0.0/src/ledger/manifest.bend as M

# whether two git sources are pinned alike: one commit and one tag
def pin.same(aa: M.Source, bb: M.Source) -> Bool:
  match aa:
    case M.Hub{_an}:
      True{}
    case M.Git{_au, ar, at, _ao, _an, _av}:
      match bb:
        case M.Hub{_bn}:
          True{}
        case M.Git{_bu, br, bt, _bo, _bn, _bv}:
          Bool.and(String.eq(ar, br), String.eq(at, bt))
        case M.Member{_bp, _bm}:
          True{}
    case M.Member{_ap, _am}:
      True{}

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String.eq
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ledger/manifest.bend&name=Source