File: linked_queue0.ml

package info (click to toggle)
janest-base 0.14.0-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 2,896 kB
  • sloc: ml: 37,596; ansic: 251; javascript: 114; makefile: 21
file content (15 lines) | stat: -rw-r--r-- 394 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
open! Import0

type 'a t = 'a Caml.Queue.t

let create = Caml.Queue.create
let clear = Caml.Queue.clear
let copy = Caml.Queue.copy
let is_empty = Caml.Queue.is_empty
let length = Caml.Queue.length
let peek = Caml.Queue.peek
let pop = Caml.Queue.pop
let push = Caml.Queue.push
let transfer = Caml.Queue.transfer
let iter t ~f = Caml.Queue.iter f t
let fold t ~init ~f = Caml.Queue.fold f init t