let
is_next_list_stream stream =
match
peek_stream stream
with
Ilist
_
->
true
|
_
->
false