package redis-async

  1. Overview
  2. Docs
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file cursor.ml

1
2
3
4
5
6
7
8
9
10
11
open Core

(* Redis allows an unsigned 64 bit integer for cursor. Because we cannot easily represent
   this in OCaml and the data is opaque to the client anyhow, just store a string. *)

type t = string [@@deriving equal, sexp_of]

let zero = "0"
let of_string = Fn.id
let to_string = Fn.id
let ( = ) = equal