Import Debian changes 20180207-1
[hcoop/debian/mlton.git] / mlton / control / source-pos.sig
1 (* Copyright (C) 2009,2017 Matthew Fluet.
2 * Copyright (C) 1999-2007 Henry Cejtin, Matthew Fluet, Suresh
3 * Jagannathan, and Stephen Weeks.
4 * Copyright (C) 1997-2000 NEC Research Institute.
5 *
6 * MLton is released under a BSD-style license.
7 * See the file MLton-LICENSE for details.
8 *)
9
10 signature SOURCE_POS_STRUCTS =
11 sig
12 end
13
14 signature SOURCE_POS =
15 sig
16 include SOURCE_POS_STRUCTS
17
18 type t
19
20 val bogus: t
21 val column: t -> int
22 val compare: t * t -> Relation.t
23 val equals: t * t -> bool
24 val file: t -> File.t
25 val fileEquals: t * t -> bool
26 val isBogus: t -> bool
27 val line: t -> int
28 val make: {column: int,
29 file: File.t,
30 line: int} -> t
31 val posToString: t -> string
32 val toString: t -> string
33 end