forked from
anil.recoil.org/monopam
Monorepo management for opam overlays
fix(lint): resolve E331 redundant prefixes and E335 used underscore bindings
- make_routes → routes (irmin/bin/cmd_serve.ml)
- find_project_dir → project_dir (ocaml-claude-skills/bin/main.ml)
- create_skill → skill (ocaml-claude-skills/test/test.ml)
- create_remoteproc → remoteproc (ocaml-openamp/test/test_remoteproc.ml)
- _hash → hash or _ (irmin/bin/common.ml)
+4
-8
+4
-8
lib/git_cli.ml
+4
-8
lib/git_cli.ml
···
67
67
| _ -> None)
68
68
| exception Eio.Io _ -> None
69
69
70
-
(** Retryable HTTP 5xx and network error patterns, compiled once. *)
70
+
(** Retryable HTTP 5xx and transient network error patterns, compiled once. Only
71
+
matches errors where a retry is likely to succeed (server-side errors and
72
+
mid-connection drops). Permanent failures like DNS resolution errors,
73
+
connection refused, and unreachable networks are not retried. *)
71
74
let retryable_re =
72
75
let open Re in
73
76
let patterns =
···
83
86
"Service Unavailable";
84
87
"Gateway Timeout";
85
88
"RPC failed";
86
-
"curl";
87
89
"unexpected disconnect";
88
90
"the remote end hung up";
89
91
"early EOF";
90
-
"Connection refused";
91
92
"Connection reset";
92
-
"Connection timed out";
93
-
"Could not resolve host";
94
-
"Failed to connect";
95
-
"Network is unreachable";
96
-
"Temporary failure";
97
93
]
98
94
in
99
95
compile (alt (List.map str patterns))