Pct.utf8.four: def of emerging-ezhttp@0.21.0.0
Import: import emerging-ezhttp@0.21.0.0/src/pct.bend as Pct
Lines 39-41 of emerging-ezhttp@0.21.0.0/src/pct.bend: https://jend.leeeet.dev/read.txt?path=emerging-ezhttp@0.21.0.0/src/pct.bend&start_line=39&end_line=41

import Base

# four bytes: U+10000 to U+10FFFF
def utf8.four(+cp: U32) -> List<&2, U32>:
  [U32.or(240, U32.shrn(cp, 18n)), cont(cp, 12n), cont(cp, 6n), cont(cp, 0n)]

Uses (5):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.or
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.shrn
  https://jend.leeeet.dev/definition.txt?path=emerging-ezhttp@0.21.0.0/src/pct.bend&name=cont