Commits

Yaron Minsky  committed f492777

removed branch_position

  • Participants
  • Parent commits 2d4b355

Comments (0)

Files changed (2)

File ocaml/common.ml

 (* The id of a given branch *)
-module Branch          : Private_int.S = Private_int.M
+module Branch : Private_int.S = Private_int.M
 (* A strand identifier on the interval *)
-module Strand          : Private_int.S = Private_int.M
-(* A position within a branch *)
-module Branch_position : Private_int.S = Private_int.M
+module Strand : Private_int.S = Private_int.M
 

File ocaml/private_int.ml

 open Core.Std
 
+(* Used for creating private integer types, to avoid confusion between
+   different kinds of int identifiers *)
+
 module type S = sig
   type t with sexp
   include Hashable   with type t := t