def peek

mylsm-lsm-store@0.6.0.1 · src/coordinator/RequestQueue.bend:271

import Base

271# Handles peek.
272def peek(queue: Queue) -> PeekResult:
273  match queue:
274    case Queue{front, back, count, bytes}:
275      match front:
276        case Nil{}:
277          match back:
278            case Nil{}: PeekResult{Queue{Nil{}, Nil{}, count, bytes}, None{}}
279            case Con{_, _}:
280              peek.front(reverse.into(back, Nil{}), Nil{}, count, bytes)
281        case Con{_, _}: peek.front(front, back, count, bytes)