Skip to content

Commit 37952a1

Browse files
committed
Apply headache.sh
1 parent 4fe1088 commit 37952a1

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

70 files changed

+403
-0
lines changed

lib/cmdlang/src/command.ml

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*********************************************************************************)
2+
(* cmdlang - Declarative command-line parsing for OCaml *)
3+
(* SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(* SPDX-License-Identifier: MIT *)
5+
(*********************************************************************************)
6+
17
module Nonempty_list = struct
28
type 'a t = 'a Cmdlang_ast.Ast.Nonempty_list.t = ( :: ) : 'a * 'a list -> 'a t
39
end

lib/cmdlang/src/command.mli

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*_********************************************************************************)
2+
(*_ cmdlang - Declarative command-line parsing for OCaml *)
3+
(*_ SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(*_ SPDX-License-Identifier: MIT *)
5+
(*_********************************************************************************)
6+
17
(** Declarative Command-line Parsing for OCaml.
28
39
Cmdlang is a library for creating command-line parsers in OCaml. Implemented

lib/cmdlang/test/test__command.ml

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*********************************************************************************)
2+
(* cmdlang - Declarative command-line parsing for OCaml *)
3+
(* SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(* SPDX-License-Identifier: MIT *)
5+
(*********************************************************************************)
6+
17
module Empty = struct
28
type t = |
39

lib/cmdlang/test/test__command.mli

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
(*_********************************************************************************)
2+
(*_ cmdlang - Declarative command-line parsing for OCaml *)
3+
(*_ SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(*_ SPDX-License-Identifier: MIT *)
5+
(*_********************************************************************************)

lib/cmdlang_ast/src/ast.ml

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*********************************************************************************)
2+
(* cmdlang - Declarative command-line parsing for OCaml *)
3+
(* SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(* SPDX-License-Identifier: MIT *)
5+
(*********************************************************************************)
6+
17
type 'a or_error_msg = ('a, [ `Msg of string ]) result
28
type 'a parse = string -> 'a or_error_msg
39
type 'a print = Format.formatter -> 'a -> unit

lib/cmdlang_ast/src/ast.mli

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*_********************************************************************************)
2+
(*_ cmdlang - Declarative command-line parsing for OCaml *)
3+
(*_ SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(*_ SPDX-License-Identifier: MIT *)
5+
(*_********************************************************************************)
6+
17
(** The internal representation for the EDSL used by the cmdlang library.
28
39
Cmdlang doesn't include an execution engine. Instead, Cmdlang parsers are

lib/cmdlang_stdlib_runner/src/arg_runner.ml

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*********************************************************************************)
2+
(* cmdlang - Declarative command-line parsing for OCaml *)
3+
(* SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(* SPDX-License-Identifier: MIT *)
5+
(*********************************************************************************)
6+
17
type 'a t =
28
| Value : 'a -> 'a t
39
| Map :

lib/cmdlang_stdlib_runner/src/arg_runner.mli

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*_********************************************************************************)
2+
(*_ cmdlang - Declarative command-line parsing for OCaml *)
3+
(*_ SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(*_ SPDX-License-Identifier: MIT *)
5+
(*_********************************************************************************)
6+
17
(** Internal representation used to run a parser.
28
39
This is the final representation returned after all of the parsing phases

lib/cmdlang_stdlib_runner/src/arg_state.ml

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*********************************************************************************)
2+
(* cmdlang - Declarative command-line parsing for OCaml *)
3+
(* SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(* SPDX-License-Identifier: MIT *)
5+
(*********************************************************************************)
6+
17
type 'a t =
28
| Return : 'a -> 'a t
39
| Map :

lib/cmdlang_stdlib_runner/src/arg_state.mli

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,9 @@
1+
(*_********************************************************************************)
2+
(*_ cmdlang - Declarative command-line parsing for OCaml *)
3+
(*_ SPDX-FileCopyrightText: 2024-2025 Mathieu Barbin <mathieu.barbin@gmail.com> *)
4+
(*_ SPDX-License-Identifier: MIT *)
5+
(*_********************************************************************************)
6+
17
(** Internal representation for cmdlang arg expressions used during parsing.
28
39
This is a projection of [Cmdlang.Ast.Arg.t] where we added mutable variables

0 commit comments

Comments
 (0)