blob: c98cbcd1aef9e6215aea341b3779c9cdba3e8e06 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
(**************************************************************************)
(* *)
(* OCaml *)
(* *)
(* Stephen Dolan, University of Cambridge *)
(* *)
(* Copyright 2016 Stephen Dolan. *)
(* *)
(* All rights reserved. This file is distributed under the terms of *)
(* the GNU Lesser General Public License version 2.1, with the *)
(* special exception on linking described in the file LICENSE. *)
(* *)
(**************************************************************************)
(** Instrumentation for afl-fuzz. *)
val instrument_function : Cmm.expression -> Debuginfo.t -> Cmm.expression
val instrument_initialiser
: Cmm.expression
-> (unit -> Debuginfo.t)
-> Cmm.expression
|
