def cookie.ipv4.step

emerging-ezhttp@0.21.0.0 · src/cookie.bend:398

import Base

398# a dot continues the scan, a digit keeps it, anything else stops
399def cookie.ipv4.step(dot: Bool, digit: Bool, if_dot: Unit -> Bool,
400  if_digit: Unit -> Bool) -> Bool:
401  match dot digit:
402    case True{} _:
403      if_dot(Unit{})
404    case False{} True{}:
405      if_digit(Unit{})
406    case False{} False{}:
407      False{}