Permalink
Browse files

fix whitespace and over-long lines

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13432 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
  • Loading branch information...
1 parent 3a8ba35 commit a27fa1322e97418156214223d1e1ab6073d4e2a1 Damien Doligez committed Mar 22, 2013
Showing with 4 additions and 2 deletions.
  1. +4 −2 lex/lexgen.ml
View
@@ -78,7 +78,8 @@ type ('args,'action) automata_entry =
(* A lot of sets and map structures *)
-module Ints = Set.Make(struct type t = int let compare (x:t) y = compare x y end)
+module Ints =
+ Set.Make(struct type t = int let compare (x:t) y = compare x y end)
let id_compare (id1,_) (id2,_) = String.compare id1 id2
@@ -619,7 +620,8 @@ module StateSet =
module MemMap =
- Map.Make (struct type t = int let compare (x:t) y = Pervasives.compare x y end)
+ Map.Make (struct type t = int
+ let compare (x:t) y = Pervasives.compare x y end)
type 'a dfa_state =
{final : int * ('a * int TagMap.t) ;

0 comments on commit a27fa13

Please sign in to comment.