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.
25 lines
676 B
25 lines
676 B
9 years ago
|
(*
|
||
6 years ago
|
* Copyright (c) Facebook, Inc. and its affiliates.
|
||
9 years ago
|
*
|
||
7 years ago
|
* This source code is licensed under the MIT license found in the
|
||
|
* LICENSE file in the root directory of this source tree.
|
||
9 years ago
|
*)
|
||
|
|
||
8 years ago
|
open! IStd
|
||
|
|
||
8 years ago
|
type mode = On | Off
|
||
|
|
||
7 years ago
|
type 'issue_type issue_desc0 =
|
||
6 years ago
|
{ issue_type: 'issue_type (** issue type *)
|
||
|
; description: string (** Description in the error message *)
|
||
|
; mode: mode
|
||
|
; loc: Location.t (** location in the code *)
|
||
|
; severity: Exceptions.severity
|
||
|
; suggestion: string option (** an optional suggestion or correction *) }
|
||
8 years ago
|
|
||
7 years ago
|
type issue_desc = IssueType.t issue_desc0
|
||
|
|
||
8 years ago
|
val pp_issue : Format.formatter -> issue_desc -> unit
|
||
|
|
||
8 years ago
|
val should_run_check : mode -> bool
|