You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

28 lines
761 B

(*
* Copyright (c) 2016 - present Facebook, Inc.
* All rights reserved.
*
* This source code is licensed under the BSD style license found in the
* LICENSE file in the root directory of this source tree. An additional grant
* of patent rights can be found in the PATENTS file in the same directory.
*)
open! IStd
type mode = On | Off
type issue_desc = {
name : string; (* issue name *)
severity : Exceptions.err_kind;
mode : mode;
description : string; (* Description in the error message *)
suggestion : string option; (* an optional suggestion or correction *)
loc : Location.t; (* location in the code *)
}
val string_of_mode : mode -> string
val pp_issue : Format.formatter -> issue_desc -> unit
val should_run_check : mode -> bool