let peek_line p = Queue.peek p.lines