annotate lib/bytes.ml @ 1:b5139af1a420 tip basis

Fixed permissions on compile scripts
author Mike Spivey <mike@cs.ox.ac.uk>
date Fri, 13 Oct 2017 17:27:58 +0100
parents bfdcc3820b32
children
rev   line source
mike@0 1 (* bytes.ml -- simulate Bytes module for OCaml versions <= 4.01 *)
mike@0 2 (* Copyright (c) 2017 J. M. Spivey *)
mike@0 3
mike@0 4 let create n = String.create n
mike@0 5
mike@0 6 let of_string s = s
mike@0 7
mike@0 8 let get s i = String.get s i
mike@0 9
mike@0 10 let set s i v = String.set s i v
mike@0 11
mike@0 12 let unsafe_set s i v = String.unsafe_set s i v
mike@0 13
mike@0 14 let to_string s = s
mike@0 15
mike@0 16 let sub_string s i j = String.sub s i j
mike@0 17
mike@0 18 let length s = String.length s
mike@0 19
mike@0 20 let fill s i n c = String.fill s i n c