Sigv4.st.shut: def of bend-kit-sigv4@0.11.0.1
Import: import bend-kit-sigv4@0.11.0.1/sigv4.bend as Sigv4
Lines 588-593 of bend-kit-sigv4@0.11.0.1/sigv4.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-sigv4@0.11.0.1/sigv4.bend&start_line=588&end_line=593

import Base

def st.shut(stack: List<&2, String>, txt: String, out: List<&2, Leaf>, ok: Bool, +name: String) -> St:
  match stack:
    case Nil{}:
      St{Nil{}, "", "", out, False{}}
    case Con{+top, +rest}:
      St{rest, "", "", Con{Leaf{first(rest), top, String.reverse(txt)}, out}, Bool.and(ok, String.eq(top, name))}

Uses (9):
  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=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String.eq
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String.reverse
  https://jend.leeeet.dev/definition.txt?path=bend-kit-sigv4@0.11.0.1/sigv4.bend&name=Leaf
  https://jend.leeeet.dev/definition.txt?path=bend-kit-sigv4@0.11.0.1/sigv4.bend&name=St
  https://jend.leeeet.dev/definition.txt?path=bend-kit-sigv4@0.11.0.1/sigv4.bend&name=first