Source file `import.ml`

1
2
3
4
5
6
7
8
9
10
open! Core
include Async_rpc_kernel

module Sequence = struct
  include Sequence

  let cons x xs = shift_right xs x

  (* shift_right?! *)
end