Sha256: 6f2cf64706d537aa87e1e03230cffc9014788f7e74ce89634daeca586d644c1b

Contents?: true

Size: 437 Bytes

Versions: 177

Compression:

Stored size: 437 Bytes

Contents

open Core.Std

let digit_to_int c =
  match c with
  | '0'..'9'  -> Some (int_of_char(c) - 48)
  | 'a'..'f'  -> Some (Char.to_int(c) - 97 + 10)
  | 'A'..'F'  -> Some (Char.to_int(c) - 97 + 10)
  | _ -> None

let to_int hex_str =
  let rec go acc = function
    | []    -> acc
    | c::cs -> match digit_to_int c with
                    | Some n -> go (acc * 16 + n) cs
                    | None -> 0 in
  go 0 (String.to_list hex_str)

Version data entries

177 entries across 177 versions & 1 rubygems

Version Path
trackler-2.1.0.21 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.20 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.19 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.18 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.17 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.16 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.15 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.14 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.13 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.12 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.11 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.10 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.9 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.8 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.7 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.6 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.5 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.4 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.3 tracks/ocaml/exercises/hexadecimal/example.ml
trackler-2.1.0.2 tracks/ocaml/exercises/hexadecimal/example.ml