kcavaill/ocaml_project
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Run auto format on sources

Browse source
This commit is contained in:
Arthur Bit-Monnot 2019-11-06 14:14:51 +01:00
parent 4901986d80
commit 7255fb2c3d
4 changed files with 12 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/gfile.ml
View file

@ -16,7 +16,7 @@ type path = string
e 3 1 11 e 3 1 11
e 0 2 8 e 0 2 8
*) *)
let write_file path graph = let write_file path graph =

2
src/graph.mli
View file

@ -37,7 +37,7 @@ type 'a out_arcs = (id * 'a) list
val out_arcs: 'a graph -> id -> 'a out_arcs val out_arcs: 'a graph -> id -> 'a out_arcs
(* find_arc gr id1 id2 finds an arc between id1 and id2 and returns its label. Returns None if the arc does not exist. (* find_arc gr id1 id2 finds an arc between id1 and id2 and returns its label. Returns None if the arc does not exist.
* @raise Graph_error if id1 is unknown. *) * @raise Graph_error if id1 is unknown. *)
val find_arc: 'a graph -> id -> id -> 'a option val find_arc: 'a graph -> id -> id -> 'a option