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.
35 lines
991 B
35 lines
991 B
8 years ago
|
(*
|
||
|
* Copyright (c) 2015 - 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
|
||
|
|
||
|
(** Location in the original source file *)
|
||
|
type t =
|
||
|
{ line: int (** The line number. -1 means "do not know" *)
|
||
|
; col: int (** The column number. -1 means "do not know" *)
|
||
|
; file: SourceFile.t (** The name of the source file *) }
|
||
|
[@@deriving compare]
|
||
|
|
||
|
val equal : t -> t -> bool
|
||
|
|
||
|
val none : SourceFile.t -> t
|
||
7 years ago
|
(** Dummy source location for the given file *)
|
||
8 years ago
|
|
||
|
val dummy : t
|
||
7 years ago
|
(** Dummy location with no source file *)
|
||
8 years ago
|
|
||
|
val pp : Format.formatter -> t -> unit
|
||
7 years ago
|
(** Pretty print a location. *)
|
||
8 years ago
|
|
||
|
val to_string : t -> string
|
||
7 years ago
|
(** String representation of a location. *)
|
||
8 years ago
|
|
||
|
val pp_file_pos : Format.formatter -> t -> unit
|
||
7 years ago
|
(** Pretty print a file-position of a location *)
|