arg.ml
core
core.base_for_tests
core.command
core.filename_base
core.heap_block
core.top
core.univ_map
core.validate
1 2 3 4 5 6 7 8 open! Import include Stdlib.Arg type t = key * spec * doc let sort_and_align lst = align (Base.List.sort lst ~compare:(fun (a, _, _) (b, _, _) -> String.compare a b)) ;;
1 2 3 4 5 6 7 8
open! Import include Stdlib.Arg type t = key * spec * doc let sort_and_align lst = align (Base.List.sort lst ~compare:(fun (a, _, _) (b, _, _) -> String.compare a b)) ;;