Build:
- 0
2026-06-24 11:05.49: New job: build statverif.1.97pl1.2 (2b535dd6ea92)
2026-06-24 11:05.49: Waiting for resource in pool day11-builds
2026-06-24 11:16.29: Got resource from pool day11-builds
2026-06-24 11:16.29: [profile full] build statverif.1.97pl1.2
2026-06-24 11:16.29: build statverif.1.97pl1.2 (2b535dd6ea92)
=== DEPENDENCIES (5 transitive) ===
ocaml.4.14.4 b047fb9251f4
ocaml-base-compiler.4.14.4 d3b7ccb2c6fb
ocaml-config.2 2d9c209f5590
ocamlbuild.0.16.1 7e0d6aadb209
ocamlfind.1.9.8 214dd418ac02
=== STDOUT ===
Processing: [default: loading data]
[statverif.1.97pl1.2: dl]
[statverif.1.97pl1.2: extract]
-> retrieved statverif.1.97pl1.2 (https://opam.ocaml.org/cache)
[statverif: make]
+ /usr/bin/make (CWD=/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2)
- make -C src all
- make[1]: Entering directory '/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2/src'
- ocamlbuild -use-ocamlfind main.native
- + ocamlfind ocamlc -config
- + ocamlfind ocamldep -modules main.ml > main.ml.depends
- + ocamlfind ocamldep -modules destructor.mli > destructor.mli.depends
- + ocamlfind ocamldep -modules types.mli > types.mli.depends
- + ocamlfind ocamldep -modules stringmap.mli > stringmap.mli.depends
- + ocamlfind ocamlc -c -g -annot -o stringmap.cmi stringmap.mli
- + ocamlfind ocamlc -c -g -annot -o types.cmi types.mli
- + ocamlfind ocamldep -modules display.mli > display.mli.depends
- + ocamlfind ocamldep -modules pitypes.mli > pitypes.mli.depends
- + ocamlfind ocamlc -c -g -annot -o pitypes.cmi pitypes.mli
- + ocamlfind ocamldep -modules history.mli > history.mli.depends
- + ocamlfind ocamldep -modules param.mli > param.mli.depends
- + ocamlfind ocamldep -modules parsing_helper.mli > parsing_helper.mli.depends
- + ocamlfind ocamldep -modules ptree.mli > ptree.mli.depends
- + ocamlfind ocamlc -c -g -annot -o parsing_helper.cmi parsing_helper.mli
- + ocamlfind ocamlc -c -g -annot -o ptree.cmi ptree.mli
- + ocamlfind ocamldep -modules piauth.mli > piauth.mli.depends
- + ocamlfind ocamldep -modules pisyntax.mli > pisyntax.mli.depends
- + ocamlfind ocamldep -modules piptree.mli > piptree.mli.depends
- + ocamlfind ocamlc -c -g -annot -o piptree.cmi piptree.mli
- + ocamlfind ocamldep -modules pitransl.mli > pitransl.mli.depends
- + ocamlfind ocamldep -modules pitranslweak.mli > pitranslweak.mli.depends
- + ocamlfind ocamldep -modules pitsyntax.mli > pitsyntax.mli.depends
- + ocamlfind ocamldep -modules pitptree.mli > pitptree.mli.depends
- + ocamlfind ocamlc -c -g -annot -o pitptree.cmi pitptree.mli
- + ocamlfind ocamldep -modules proswapper.mli > proswapper.mli.depends
- + ocamlfind ocamldep -modules reduction.mli > reduction.mli.depends
- + ocamlfind ocamlc -c -g -annot -o history.cmi history.mli
- + ocamlfind ocamldep -modules reduction_bipro.mli > reduction_bipro.mli.depends
- + ocamlfind ocamldep -package str -package unix -modules reduction_helper.mli > reduction_helper.mli.depends
- + ocamlfind ocamldep -modules rules.mli > rules.mli.depends
- + ocamlfind ocamldep -modules selfun.mli > selfun.mli.depends
- + ocamlfind ocamldep -modules pvqueue.mli > pvqueue.mli.depends
- + ocamlfind ocamlc -c -g -annot -o pvqueue.cmi pvqueue.mli
- + ocamlfind ocamldep -modules simplify.mli > simplify.mli.depends
- + ocamlfind ocamldep -modules spassout.mli > spassout.mli.depends
- + ocamlfind ocamldep -modules syntax.mli > syntax.mli.depends
- + ocamlfind ocamldep -modules terms.mli > terms.mli.depends
- + ocamlfind ocamldep -modules termsEq.mli > termsEq.mli.depends
- + ocamlfind ocamldep -modules tsyntax.mli > tsyntax.mli.depends
- + ocamlfind ocamlc -c -g -annot -o destructor.cmi destructor.mli
- + ocamlfind ocamlc -c -g -annot -o display.cmi display.mli
- + ocamlfind ocamlc -c -g -annot -o param.cmi param.mli
- + ocamlfind ocamlc -c -g -annot -o piauth.cmi piauth.mli
- + ocamlfind ocamlc -c -g -annot -o pisyntax.cmi pisyntax.mli
- + ocamlfind ocamlc -c -g -annot -o pitransl.cmi pitransl.mli
- + ocamlfind ocamlc -c -g -annot -o pitranslweak.cmi pitranslweak.mli
- + ocamlfind ocamlc -c -g -annot -o pitsyntax.cmi pitsyntax.mli
- + ocamlfind ocamlc -c -g -annot -o proswapper.cmi proswapper.mli
- + ocamlfind ocamlc -c -g -annot -o reduction.cmi reduction.mli
- + ocamlfind ocamlc -c -g -annot -o reduction_bipro.cmi reduction_bipro.mli
- + ocamlfind ocamlc -c -g -annot -package str -package unix -o reduction_helper.cmi reduction_helper.mli
- + ocamlfind ocamlc -c -g -annot -o rules.cmi rules.mli
- + ocamlfind ocamlc -c -g -annot -o selfun.cmi selfun.mli
- + ocamlfind ocamlc -c -g -annot -o simplify.cmi simplify.mli
- + ocamlfind ocamlc -c -g -annot -o spassout.cmi spassout.mli
- + ocamlfind ocamlc -c -g -annot -o syntax.cmi syntax.mli
- + ocamlfind ocamlc -c -g -annot -o terms.cmi terms.mli
- + ocamlfind ocamlc -c -g -annot -o termsEq.cmi termsEq.mli
- + ocamlfind ocamlc -c -g -annot -o tsyntax.cmi tsyntax.mli
- + ocamlfind ocamlc -c -g -annot -o main.cmo main.ml
- + ocamlfind ocamlc -c -g -annot -o main.cmo main.ml
- File "main.ml", line 339, characters 14-30:
- 339 | let s_up = String.uppercase s in
- ^^^^^^^^^^^^^^^^
- Alert deprecated: Stdlib.String.uppercase
- Use String.uppercase_ascii/StringLabels.uppercase_ascii instead.
- + ocamlfind ocamldep -modules destructor.ml > destructor.ml.depends
- + ocamlfind ocamldep -modules display.ml > display.ml.depends
- + ocamlfind ocamldep -modules debug.ml > debug.ml.depends
- + ocamlfind ocamlc -c -g -annot -o debug.cmo debug.ml
- + ocamlfind ocamldep -modules param.ml > param.ml.depends
- + ocamlfind ocamldep -modules parsing_helper.ml > parsing_helper.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o parsing_helper.cmx parsing_helper.ml
- + ocamlfind ocamldep -modules stringmap.ml > stringmap.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o stringmap.cmx stringmap.ml
- + ocamlfind ocamlopt -c -g -annot -o param.cmx param.ml
- + ocamlfind ocamldep -modules misc.ml > misc.ml.depends
- + ocamlfind ocamldep -modules misc.mli > misc.mli.depends
- + ocamlfind ocamlc -c -g -annot -o misc.cmi misc.mli
- + ocamlfind ocamldep -modules terms.ml > terms.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o misc.cmx misc.ml
- + ocamlfind ocamlopt -c -g -annot -o misc.cmx misc.ml
- File "misc.ml", lines 26-31, characters 4-15:
- 26 | ....match (n, l) with
- 27 | | n, x::l when n > 0 ->
- 28 | let (l,r) = peel (n-1) l in
- 29 | (x::l, r)
- 30 | | 0, l ->
- 31 | ([], l)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (1, _)
- (However, some guarded clause may match this value.)
- + ocamlfind ocamldep -modules termslinks.ml > termslinks.ml.depends
- + ocamlfind ocamldep -modules termslinks.mli > termslinks.mli.depends
- + ocamlfind ocamlc -c -g -annot -o termslinks.cmi termslinks.mli
- + ocamlfind ocamlopt -c -g -annot -o terms.cmx terms.ml
- + ocamlfind ocamlopt -c -g -annot -o terms.cmx terms.ml
- File "terms.ml", lines 908-910, characters 56-7:
- 908 | ........................................................begin
- 909 | match args with state::rest -> ([state], rest)
- 910 | end.................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "terms.ml", lines 910-913, characters 67-7:
- 910 | ...................................................................begin
- 911 | match Misc.bisect args with l_s::l_ns, r_s::r_ns ->
- 912 | ([l_s; r_s], (l_ns @ r_ns))
- 913 | end...........
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_::_, [])
- + ocamlfind ocamlopt -c -g -annot -o debug.cmx debug.ml
- + ocamlfind ocamlopt -c -g -annot -o termslinks.cmx termslinks.ml
- + ocamlfind ocamldep -modules termsEq.ml > termsEq.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o display.cmx display.ml
- + ocamlfind ocamlopt -c -g -annot -o display.cmx display.ml
- File "display.ml", lines 37-38, characters 31-40:
- 37 | ...............................(t::vs) =
- 38 | if s == s' then t else find cells vs
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "display.ml", lines 37-38, characters 15-40:
- 37 | ...............((s',_)::cells) (t::vs) =
- 38 | if s == s' then t else find cells vs
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "display.ml", line 305, characters 21-44:
- 305 | let print_string = Pervasives.print_string
- ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: module Stdlib.Pervasives
- Use Stdlib instead.
-
- If you need to stay compatible with OCaml < 4.07, you can use the
- stdlib-shims library: https://github.com/ocaml/stdlib-shims
- File "display.ml", lines 1949-1994, characters 10-37:
- 1949 | ..........match proc with
- 1950 | | Nil ->
- 1951 | display_idcl CKeyword "0"
- 1952 | | Par _ ->
- 1953 | print_string "Parallel"
- ...
- 1991 | display_occ occ;
- 1992 | display_prefix_letfilter lb f
- 1993 | | NamedProcess(name, tl, p) ->
- 1994 | display_prefix_namedprocess name tl
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Lock (_, _, _)|Unlock (_, _, _)|Open (_, _, _)|ReadAs (_, _, _)|
- Assign (_, _, _))
- File "display.ml", lines 2441-2653, characters 2-15:
- 2441 | ..match lbl with
- 2442 | Rn _ ->
- 2443 | print_string "The attacker creates the new name ";
- 2444 | display_attacker_fact concl;
- 2445 | print_string ".";
- ...
- 2650 | display_hyp_basic hyp_num_list hl;
- 2651 | display_constra_list constra;
- 2652 | print_string ("Using the clause number " ^ (string_of_int n) ^ ",");
- 2653 | newline()
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Rread|Rwrite _)
- + /home/opam/.opam/default/bin/ocamllex.opt -q pitlexer.mll
- + ocamlfind ocamldep -modules pitlexer.ml > pitlexer.ml.depends
- + /home/opam/.opam/default/bin/ocamlyacc pitparser.mly
- + /home/opam/.opam/default/bin/ocamlyacc pitparser.mly
- 56 shift/reduce conflicts.
- + ocamlfind ocamldep -modules pitparser.mli > pitparser.mli.depends
- + ocamlfind ocamlc -c -g -annot -o pitparser.cmi pitparser.mli
- + ocamlfind ocamlc -c -g -annot -o pitlexer.cmo pitlexer.ml
- + ocamlfind ocamldep -modules pitparser.ml > pitparser.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o pitparser.cmx pitparser.ml
- + ocamlfind ocamldep -modules pvqueue.ml > pvqueue.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o pitlexer.cmx pitlexer.ml
- + ocamlfind ocamlopt -c -g -annot -o pvqueue.cmx pvqueue.ml
- + ocamlfind ocamlopt -c -g -annot -o termsEq.cmx termsEq.ml
- + ocamlfind ocamldep -modules history.ml > history.ml.depends
- + ocamlfind ocamldep -package str -package unix -modules reduction_helper.ml > reduction_helper.ml.depends
- + ocamlfind ocamlopt -c -g -annot -package str -package unix -o reduction_helper.cmx reduction_helper.ml
- + ocamlfind ocamlopt -c -g -annot -package str -package unix -o reduction_helper.cmx reduction_helper.ml
- File "reduction_helper.ml", lines 63-97, characters 28-73:
- 63 | ............................function
- 64 | Nil -> false
- 65 | | NamedProcess(_, _, p) -> occurs_var_proc v p
- 66 | | Par(p1,p2) -> (occurs_var_proc v p1) || (occurs_var_proc v p2)
- 67 | | Repl(p,_) -> occurs_var_proc v p
- ...
- 94 | (occurs_var_proc v p) || (occurs_var_proc v q)
- 95 | | Phase(_,p,_) -> occurs_var_proc v p
- 96 | | Barrier _ | AnnBarrier _ ->
- 97 | Parsing_helper.internal_error "Barriers should not appear here (13)"
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Lock (_, _, _)|Unlock (_, _, _)|Open (_, _, _)|ReadAs (_, _, _)|
- Assign (_, _, _))
- File "reduction_helper.ml", lines 430-446, characters 23-68:
- 430 | .......................function
- 431 | ReplTag (o,_) -> print_string "!"; print_string (string_of_int o)
- 432 | | InputTag o -> print_string "i"; print_string (string_of_int o)
- 433 | | BeginEvent o -> print_string "b"; print_string (string_of_int o)
- 434 | | BeginFact -> print_string "bf"
- ...
- 443 | | OutputPTag o -> print_string "op"; print_string (string_of_int o)
- 444 | | InsertTag o -> print_string "it"; print_string (string_of_int o)
- 445 | | GetTag o -> print_string "gt"; print_string (string_of_int o)
- 446 | | GetTagElse o -> print_string "gte"; print_string (string_of_int o)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (SequenceTag|ReachTag|OpenTag _|AssignTag (_, _)|KnowledgeProgressTag _|
- ReadAsTag (_, _))
- + ocamlfind ocamldep -modules piauth.ml > piauth.ml.depends
- + ocamlfind ocamldep -modules funmap.ml > funmap.ml.depends
- + ocamlfind ocamldep -modules funmap.mli > funmap.mli.depends
- + ocamlfind ocamlc -c -g -annot -o funmap.cmi funmap.mli
- + ocamlfind ocamlopt -c -g -annot -o history.cmx history.ml
- + ocamlfind ocamldep -modules pievent.ml > pievent.ml.depends
- + ocamlfind ocamldep -modules pievent.mli > pievent.mli.depends
- + ocamlfind ocamlc -c -g -annot -o pievent.cmi pievent.mli
- + ocamlfind ocamldep -modules pitransl.ml > pitransl.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o funmap.cmx funmap.ml
- + ocamlfind ocamlopt -c -g -annot -o pievent.cmx pievent.ml
- + ocamlfind ocamldep -modules pisyntax.ml > pisyntax.ml.depends
- + /home/opam/.opam/default/bin/ocamllex.opt -q pilexer.mll
- + ocamlfind ocamldep -modules pilexer.ml > pilexer.ml.depends
- + /home/opam/.opam/default/bin/ocamlyacc piparser.mly
- + /home/opam/.opam/default/bin/ocamlyacc piparser.mly
- 10 shift/reduce conflicts.
- + ocamlfind ocamldep -modules piparser.mli > piparser.mli.depends
- + ocamlfind ocamlc -c -g -annot -o piparser.cmi piparser.mli
- + ocamlfind ocamlc -c -g -annot -o pilexer.cmo pilexer.ml
- + ocamlfind ocamldep -modules piparser.ml > piparser.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o piparser.cmx piparser.ml
- + ocamlfind ocamldep -modules rules.ml > rules.ml.depends
- + ocamlfind ocamldep -modules noninterf.ml > noninterf.ml.depends
- + ocamlfind ocamldep -modules noninterf.mli > noninterf.mli.depends
- + ocamlfind ocamlc -c -g -annot -o noninterf.cmi noninterf.mli
- + ocamlfind ocamldep -modules selfun.ml > selfun.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o noninterf.cmx noninterf.ml
- + ocamlfind ocamldep -modules weaksecr.ml > weaksecr.ml.depends
- + ocamlfind ocamldep -modules weaksecr.mli > weaksecr.mli.depends
- + ocamlfind ocamlc -c -g -annot -o weaksecr.cmi weaksecr.mli
- + ocamlfind ocamlopt -c -g -annot -o weaksecr.cmx weaksecr.ml
- + ocamlfind ocamlopt -c -g -annot -o selfun.cmx selfun.ml
- + ocamlfind ocamlopt -c -g -annot -o pilexer.cmx pilexer.ml
- + ocamlfind ocamlopt -c -g -annot -o rules.cmx rules.ml
- + ocamlfind ocamlopt -c -g -annot -o rules.cmx rules.ml
- File "rules.ml", lines 55-59, characters 67-7:
- 55 | ...................................................................begin
- 56 | match state_args with [left_state; right_state] ->
- 57 | let left_x, right_x = Misc.bisect other_args in
- 58 | [left_state] @ left_x @ [right_state] @ right_x
- 59 | end...........
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_
- File "rules.ml", lines 112-117, characters 6-9:
- 112 | ......begin match l_ns with FunApp(f,_) :: _ when f.f_cat = Tuple ->
- 113 | try
- 114 | let _ = reorganize_fun_app f l_ns in
- 115 | Parsing_helper.user_error "Conflict between an equivalence and the decomposition of data constructors:\nan equivalence applies to a fact which is also decomposable by data constructors.\n"
- 116 | with Not_found -> ()
- 117 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- All clauses in this pattern-matching are guarded.
- File "rules.ml", line 234, characters 14-50:
- 234 | (List.map2 (fun (Pred(p', _)) x -> Pred(p', x)) hyp l)
- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Out (_, _)
- File "rules.ml", lines 232-234, characters 8-57:
- 232 | ........let (Rule(_, _, hyp, _, _)) as hist_dec = History.get_rule_hist (RApplyFunc(f,chann)) in
- 233 | decompose_hyp_rec (hypl, nl+(List.length l)-1, (Resolution(hist_dec, nl, histl)))
- 234 | (List.map2 (fun (Pred(p', _)) x -> Pred(p', x)) hyp l)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Removed (_, _, _)|Any (_, _)|Empty _|HEquation (_, _, _, _)|
- Resolution (_, _, _)|TestUnifTrue (_, _))
- File "rules.ml", lines 723-728, characters 3-45:
- 723 | ...let (Rule(_,_,_,Pred(p',_), _)) as hist_dec = History.get_rule_hist (RApplyProj(f, n, chann)) in
- 724 | let concl' = Pred(p', first) in
- 725 | let hist'' = Resolution(hist, 0, hist_dec) in
- 726 | try
- 727 | tuple_dec hist'' concl'
- 728 | with Not_found -> put_clause concl' hist''...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Rule (_, _, _, Out (_, _), _)
- File "rules.ml", lines 838-843, characters 2-90:
- 838 | ..let (Rule(_, _, hyp, _, _)) as hist_dec = History.get_rule_hist (RElem(preds, p)) in
- 839 | let hist' = Resolution(hist_dec, n, hist) in
- 840 | let (l', hist'') = transform_hyp preds v hist' (n + List.length preds) l in
- 841 | ((List.map (function
- 842 | (Pred(p',_)) -> Pred(p', [t1])
- 843 | | Out _ -> Parsing_helper.internal_error "rules.ml: Pred expected") hyp) @ l', hist'')
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Removed (_, _, _)|Any (_, _)|Empty _|HEquation (_, _, _, _)|
- Resolution (_, _, _)|TestUnifTrue (_, _))
- + ocamlfind ocamldep -modules pitsyntax.ml > pitsyntax.ml.depends
- + ocamlfind ocamldep -modules simplify.ml > simplify.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o simplify.cmx simplify.ml
- + ocamlfind ocamlopt -c -g -annot -o simplify.cmx simplify.ml
- File "simplify.ml", lines 1188-1193, characters 7-38:
- 1188 | .......match catchs, tests, vars with
- 1189 | [],[],[] -> []
- 1190 | | (c::cs), ((Some t)::ts), (v::vs) ->
- 1191 | (v,c)::(t,Terms.true_term)::(constructUnifList cs ts vs)
- 1192 | | (c::cs), (None::ts), (v::vs) ->
- 1193 | (v,c)::(constructUnifList cs ts vs)..
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "simplify.ml", lines 1195-1202, characters 7-78:
- 1195 | .......match pats, catchs, tests with
- 1196 | [], [], [] -> proc
- 1197 | | (p::ps), (c::cs), (None::ts) ->
- 1198 | constructAssignProcess ps cs ts
- 1199 | (Let (p, c, proc, Nil, new_occurrence()))
- 1200 | | (p::ps), (c::cs), ((Some t)::ts) ->
- 1201 | constructAssignProcess ps cs ts
- 1202 | (Let (p, c, Test(t, proc, Nil, new_occurrence()), Nil, new_occurrence()))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- + ocamlfind ocamlopt -c -g -annot -o pisyntax.cmx pisyntax.ml
- + ocamlfind ocamlopt -c -g -annot -o pisyntax.cmx pisyntax.ml
- File "pisyntax.ml", lines 994-1016, characters 29-57:
- 994 | .............................function
- 995 | Nil -> ()
- 996 | | NamedProcess(_, _, p) -> set_max_used_phase p
- 997 | | Par(p1,p2) -> set_max_used_phase p1; set_max_used_phase p2
- 998 | | Repl (p,_) -> set_max_used_phase p
- ...
- 1013 | | AnnBarrier _ ->
- 1014 | Parsing_helper.internal_error "Annotated barriers should not occur in the initial process"
- 1015 | | Lock(_,p,_) | Unlock(_,p,_)
- 1016 | | Assign(_,p,_) | ReadAs(_,p,_) -> set_max_used_phase p
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Open (_, _, _)
- + ocamlfind ocamlopt -c -g -annot -o pitsyntax.cmx pitsyntax.ml
- + ocamlfind ocamlopt -c -g -annot -o pitsyntax.cmx pitsyntax.ml
- File "pitsyntax.ml", lines 1674-1922, characters 36-8:
- 1674 | ....................................match process with
- 1675 | | PNil -> Nil
- 1676 | | PPar(p1,p2) -> Par(check_process env p1, check_process env p2)
- 1677 | | PRepl p -> Repl(check_process env p, Terms.new_occurrence ())
- 1678 | | PTest(cond,p1,p2) ->
- ...
- 1919 | input_error ("the term is of type "^term_type.tname^" but the type "^cell_type.tname^" was expected") ext;
- 1920 | (cell, term)) terms cells term_list type_list in
- 1921 | Assign(pairs', check_process env p, Terms.new_occurrence())
- 1922 | )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- PBarrier (_, _, _)
- File "pitsyntax.ml", lines 3096-3107, characters 6-9:
- 3096 | ......begin
- 3097 | match tl with
- 3098 | [newl;newr] ->
- 3099 | if n > !Param.max_used_phase then
- 3100 | input_warning "nounif declaration for phase greater than used" ext;
- ...
- 3104 | input_error ("Arguments of reach2 should all be of type state") ext;
- 3105 | let reach2_n = Param.get_pred (ReachBin(if n = -1 then (!Param.max_used_phase) else n)) in
- 3106 | (reach2_n, [newl'; newr'])
- 3107 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, _)::(_, _)::(_, _)::_
- File "pitsyntax.ml", lines 3109-3122, characters 6-9:
- 3109 | ......begin
- 3110 | match tl with
- 3111 | [oldl;newl;oldr;newr] ->
- 3112 | if n > !Param.max_used_phase then
- 3113 | input_warning "nounif declaration for phase greater than used" ext;
- ...
- 3119 | input_error ("Arguments of seq2 should all be of type state") ext;
- 3120 | let seq2_n = Param.get_pred (SeqBin(if n = -1 then (!Param.max_used_phase) else n)) in
- 3121 | (seq2_n, [oldl'; newl'; oldr'; newr'])
- 3122 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, _)::(_, _)::(_, _)::(_, _)::(_, _)::_
- + ocamlfind ocamldep -modules reduction.ml > reduction.ml.depends
- + ocamlfind ocamldep -modules evaluation_helper.ml > evaluation_helper.ml.depends
- + ocamlfind ocamldep -modules evaluation_helper.mli > evaluation_helper.mli.depends
- + ocamlfind ocamlc -c -g -annot -o evaluation_helper.cmi evaluation_helper.mli
- + ocamlfind ocamlopt -c -g -annot -o evaluation_helper.cmx evaluation_helper.ml
- + ocamlfind ocamlopt -c -g -annot -o pitransl.cmx pitransl.ml
- + ocamlfind ocamlopt -c -g -annot -o reduction.cmx reduction.ml
- + ocamlfind ocamldep -modules pitranslweak.ml > pitranslweak.ml.depends
- + ocamlfind ocamldep -modules proswapper.ml > proswapper.ml.depends
- + ocamlfind ocamldep -modules reduction_bipro.ml > reduction_bipro.ml.depends
- + ocamlfind ocamldep -modules spassout.ml > spassout.ml.depends
- + ocamlfind ocamldep -modules syntax.ml > syntax.ml.depends
- + /home/opam/.opam/default/bin/ocamllex.opt -q lexer.mll
- + ocamlfind ocamldep -modules lexer.ml > lexer.ml.depends
- + /home/opam/.opam/default/bin/ocamlyacc parser.mly
- + ocamlfind ocamldep -modules parser.mli > parser.mli.depends
- + ocamlfind ocamlc -c -g -annot -o parser.cmi parser.mli
- + ocamlfind ocamlc -c -g -annot -o lexer.cmo lexer.ml
- + ocamlfind ocamldep -modules parser.ml > parser.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o parser.cmx parser.ml
- + ocamlfind ocamlopt -c -g -annot -o lexer.cmx lexer.ml
- + ocamlfind ocamldep -modules tsyntax.ml > tsyntax.ml.depends
- + ocamlfind ocamlopt -c -g -annot -o destructor.cmx destructor.ml
- + ocamlfind ocamlopt -c -g -annot -o piauth.cmx piauth.ml
- + ocamlfind ocamlopt -c -g -annot -o pitranslweak.cmx pitranslweak.ml
- + ocamlfind ocamlopt -c -g -annot -o pitranslweak.cmx pitranslweak.ml
- File "pitranslweak.ml", lines 127-132, characters 20-37:
- 127 | ....................match p.p_info with
- 128 | | [AttackerBin(i,t)] -> Attacker(i,t)
- 129 | | [MessBin(i,t)] -> Mess(i,t)
- 130 | | [TableBin(i)] -> Table(i)
- 131 | | [InputPBin(i)] -> InputP(i)
- 132 | | [OutputPBin(i)] -> OutputP(i)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- AttackerBin (_, _)::_::_
- + ocamlfind ocamlopt -c -g -annot -o proswapper.cmx proswapper.ml
- + ocamlfind ocamlopt -c -g -annot -o reduction_bipro.cmx reduction_bipro.ml
- + ocamlfind ocamlopt -c -g -annot -o spassout.cmx spassout.ml
- + ocamlfind ocamlopt -c -g -annot -o syntax.cmx syntax.ml
- + ocamlfind ocamlopt -c -g -annot -o tsyntax.cmx tsyntax.ml
- + ocamlfind ocamlopt -c -g -annot -o main.cmx main.ml
- + ocamlfind ocamlopt -c -g -annot -o main.cmx main.ml
- File "main.ml", line 339, characters 14-30:
- 339 | let s_up = String.uppercase s in
- ^^^^^^^^^^^^^^^^
- Alert deprecated: Stdlib.String.uppercase
- Use String.uppercase_ascii/StringLabels.uppercase_ascii instead.
- + ocamlfind ocamlopt -linkpkg -g -package str -package unix parsing_helper.cmx stringmap.cmx param.cmx debug.cmx misc.cmx terms.cmx termslinks.cmx display.cmx pitparser.cmx pitlexer.cmx pvqueue.cmx termsEq.cmx destructor.cmx reduction_helper.cmx evaluation_helper.cmx funmap.cmx history.cmx parser.cmx lexer.cmx noninterf.cmx pievent.cmx piparser.cmx pilexer.cmx weaksecr.cmx selfun.cmx rules.cmx pisyntax.cmx simplify.cmx pitsyntax.cmx pitransl.cmx reduction.cmx piauth.cmx pitranslweak.cmx proswapper.cmx reduction_bipro.cmx spassout.cmx syntax.cmx tsyntax.cmx main.cmx -o main.native
- ocamlbuild -use-ocamlfind main.byte
- + ocamlfind ocamlc -config
- + ocamlfind ocamlc -c -g -annot -o destructor.cmo destructor.ml
- + ocamlfind ocamlc -c -g -annot -o display.cmo display.ml
- + ocamlfind ocamlc -c -g -annot -o display.cmo display.ml
- File "display.ml", lines 37-38, characters 31-40:
- 37 | ...............................(t::vs) =
- 38 | if s == s' then t else find cells vs
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "display.ml", lines 37-38, characters 15-40:
- 37 | ...............((s',_)::cells) (t::vs) =
- 38 | if s == s' then t else find cells vs
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "display.ml", line 305, characters 21-44:
- 305 | let print_string = Pervasives.print_string
- ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: module Stdlib.Pervasives
- Use Stdlib instead.
-
- If you need to stay compatible with OCaml < 4.07, you can use the
- stdlib-shims library: https://github.com/ocaml/stdlib-shims
- File "display.ml", lines 1949-1994, characters 10-37:
- 1949 | ..........match proc with
- 1950 | | Nil ->
- 1951 | display_idcl CKeyword "0"
- 1952 | | Par _ ->
- 1953 | print_string "Parallel"
- ...
- 1991 | display_occ occ;
- 1992 | display_prefix_letfilter lb f
- 1993 | | NamedProcess(name, tl, p) ->
- 1994 | display_prefix_namedprocess name tl
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Lock (_, _, _)|Unlock (_, _, _)|Open (_, _, _)|ReadAs (_, _, _)|
- Assign (_, _, _))
- File "display.ml", lines 2441-2653, characters 2-15:
- 2441 | ..match lbl with
- 2442 | Rn _ ->
- 2443 | print_string "The attacker creates the new name ";
- 2444 | display_attacker_fact concl;
- 2445 | print_string ".";
- ...
- 2650 | display_hyp_basic hyp_num_list hl;
- 2651 | display_constra_list constra;
- 2652 | print_string ("Using the clause number " ^ (string_of_int n) ^ ",");
- 2653 | newline()
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Rread|Rwrite _)
- + ocamlfind ocamlc -c -g -annot -o history.cmo history.ml
- + ocamlfind ocamlc -c -g -annot -o param.cmo param.ml
- + ocamlfind ocamlc -c -g -annot -o parsing_helper.cmo parsing_helper.ml
- + ocamlfind ocamlc -c -g -annot -o piauth.cmo piauth.ml
- + ocamlfind ocamlc -c -g -annot -o pisyntax.cmo pisyntax.ml
- + ocamlfind ocamlc -c -g -annot -o pisyntax.cmo pisyntax.ml
- File "pisyntax.ml", lines 994-1016, characters 29-57:
- 994 | .............................function
- 995 | Nil -> ()
- 996 | | NamedProcess(_, _, p) -> set_max_used_phase p
- 997 | | Par(p1,p2) -> set_max_used_phase p1; set_max_used_phase p2
- 998 | | Repl (p,_) -> set_max_used_phase p
- ...
- 1013 | | AnnBarrier _ ->
- 1014 | Parsing_helper.internal_error "Annotated barriers should not occur in the initial process"
- 1015 | | Lock(_,p,_) | Unlock(_,p,_)
- 1016 | | Assign(_,p,_) | ReadAs(_,p,_) -> set_max_used_phase p
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Open (_, _, _)
- + ocamlfind ocamlc -c -g -annot -o pitransl.cmo pitransl.ml
- + ocamlfind ocamlc -c -g -annot -o pitranslweak.cmo pitranslweak.ml
- + ocamlfind ocamlc -c -g -annot -o pitranslweak.cmo pitranslweak.ml
- File "pitranslweak.ml", lines 127-132, characters 20-37:
- 127 | ....................match p.p_info with
- 128 | | [AttackerBin(i,t)] -> Attacker(i,t)
- 129 | | [MessBin(i,t)] -> Mess(i,t)
- 130 | | [TableBin(i)] -> Table(i)
- 131 | | [InputPBin(i)] -> InputP(i)
- 132 | | [OutputPBin(i)] -> OutputP(i)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- AttackerBin (_, _)::_::_
- + ocamlfind ocamlc -c -g -annot -o pitsyntax.cmo pitsyntax.ml
- + ocamlfind ocamlc -c -g -annot -o pitsyntax.cmo pitsyntax.ml
- File "pitsyntax.ml", lines 1674-1922, characters 36-8:
- 1674 | ....................................match process with
- 1675 | | PNil -> Nil
- 1676 | | PPar(p1,p2) -> Par(check_process env p1, check_process env p2)
- 1677 | | PRepl p -> Repl(check_process env p, Terms.new_occurrence ())
- 1678 | | PTest(cond,p1,p2) ->
- ...
- 1919 | input_error ("the term is of type "^term_type.tname^" but the type "^cell_type.tname^" was expected") ext;
- 1920 | (cell, term)) terms cells term_list type_list in
- 1921 | Assign(pairs', check_process env p, Terms.new_occurrence())
- 1922 | )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- PBarrier (_, _, _)
- File "pitsyntax.ml", lines 3096-3107, characters 6-9:
- 3096 | ......begin
- 3097 | match tl with
- 3098 | [newl;newr] ->
- 3099 | if n > !Param.max_used_phase then
- 3100 | input_warning "nounif declaration for phase greater than used" ext;
- ...
- 3104 | input_error ("Arguments of reach2 should all be of type state") ext;
- 3105 | let reach2_n = Param.get_pred (ReachBin(if n = -1 then (!Param.max_used_phase) else n)) in
- 3106 | (reach2_n, [newl'; newr'])
- 3107 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, _)::(_, _)::(_, _)::_
- File "pitsyntax.ml", lines 3109-3122, characters 6-9:
- 3109 | ......begin
- 3110 | match tl with
- 3111 | [oldl;newl;oldr;newr] ->
- 3112 | if n > !Param.max_used_phase then
- 3113 | input_warning "nounif declaration for phase greater than used" ext;
- ...
- 3119 | input_error ("Arguments of seq2 should all be of type state") ext;
- 3120 | let seq2_n = Param.get_pred (SeqBin(if n = -1 then (!Param.max_used_phase) else n)) in
- 3121 | (seq2_n, [oldl'; newl'; oldr'; newr'])
- 3122 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, _)::(_, _)::(_, _)::(_, _)::(_, _)::_
- + ocamlfind ocamlc -c -g -annot -o proswapper.cmo proswapper.ml
- + ocamlfind ocamlc -c -g -annot -o reduction.cmo reduction.ml
- + ocamlfind ocamlc -c -g -annot -o reduction_bipro.cmo reduction_bipro.ml
- + ocamlfind ocamlc -c -g -annot -package str -package unix -o reduction_helper.cmo reduction_helper.ml
- + ocamlfind ocamlc -c -g -annot -package str -package unix -o reduction_helper.cmo reduction_helper.ml
- File "reduction_helper.ml", lines 63-97, characters 28-73:
- 63 | ............................function
- 64 | Nil -> false
- 65 | | NamedProcess(_, _, p) -> occurs_var_proc v p
- 66 | | Par(p1,p2) -> (occurs_var_proc v p1) || (occurs_var_proc v p2)
- 67 | | Repl(p,_) -> occurs_var_proc v p
- ...
- 94 | (occurs_var_proc v p) || (occurs_var_proc v q)
- 95 | | Phase(_,p,_) -> occurs_var_proc v p
- 96 | | Barrier _ | AnnBarrier _ ->
- 97 | Parsing_helper.internal_error "Barriers should not appear here (13)"
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Lock (_, _, _)|Unlock (_, _, _)|Open (_, _, _)|ReadAs (_, _, _)|
- Assign (_, _, _))
- File "reduction_helper.ml", lines 430-446, characters 23-68:
- 430 | .......................function
- 431 | ReplTag (o,_) -> print_string "!"; print_string (string_of_int o)
- 432 | | InputTag o -> print_string "i"; print_string (string_of_int o)
- 433 | | BeginEvent o -> print_string "b"; print_string (string_of_int o)
- 434 | | BeginFact -> print_string "bf"
- ...
- 443 | | OutputPTag o -> print_string "op"; print_string (string_of_int o)
- 444 | | InsertTag o -> print_string "it"; print_string (string_of_int o)
- 445 | | GetTag o -> print_string "gt"; print_string (string_of_int o)
- 446 | | GetTagElse o -> print_string "gte"; print_string (string_of_int o)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (SequenceTag|ReachTag|OpenTag _|AssignTag (_, _)|KnowledgeProgressTag _|
- ReadAsTag (_, _))
- + ocamlfind ocamlc -c -g -annot -o rules.cmo rules.ml
- + ocamlfind ocamlc -c -g -annot -o rules.cmo rules.ml
- File "rules.ml", lines 55-59, characters 67-7:
- 55 | ...................................................................begin
- 56 | match state_args with [left_state; right_state] ->
- 57 | let left_x, right_x = Misc.bisect other_args in
- 58 | [left_state] @ left_x @ [right_state] @ right_x
- 59 | end...........
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_
- File "rules.ml", lines 112-117, characters 6-9:
- 112 | ......begin match l_ns with FunApp(f,_) :: _ when f.f_cat = Tuple ->
- 113 | try
- 114 | let _ = reorganize_fun_app f l_ns in
- 115 | Parsing_helper.user_error "Conflict between an equivalence and the decomposition of data constructors:\nan equivalence applies to a fact which is also decomposable by data constructors.\n"
- 116 | with Not_found -> ()
- 117 | end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- All clauses in this pattern-matching are guarded.
- File "rules.ml", line 234, characters 14-50:
- 234 | (List.map2 (fun (Pred(p', _)) x -> Pred(p', x)) hyp l)
- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Out (_, _)
- File "rules.ml", lines 232-234, characters 8-57:
- 232 | ........let (Rule(_, _, hyp, _, _)) as hist_dec = History.get_rule_hist (RApplyFunc(f,chann)) in
- 233 | decompose_hyp_rec (hypl, nl+(List.length l)-1, (Resolution(hist_dec, nl, histl)))
- 234 | (List.map2 (fun (Pred(p', _)) x -> Pred(p', x)) hyp l)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Removed (_, _, _)|Any (_, _)|Empty _|HEquation (_, _, _, _)|
- Resolution (_, _, _)|TestUnifTrue (_, _))
- File "rules.ml", lines 723-728, characters 3-45:
- 723 | ...let (Rule(_,_,_,Pred(p',_), _)) as hist_dec = History.get_rule_hist (RApplyProj(f, n, chann)) in
- 724 | let concl' = Pred(p', first) in
- 725 | let hist'' = Resolution(hist, 0, hist_dec) in
- 726 | try
- 727 | tuple_dec hist'' concl'
- 728 | with Not_found -> put_clause concl' hist''...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Rule (_, _, _, Out (_, _), _)
- File "rules.ml", lines 838-843, characters 2-90:
- 838 | ..let (Rule(_, _, hyp, _, _)) as hist_dec = History.get_rule_hist (RElem(preds, p)) in
- 839 | let hist' = Resolution(hist_dec, n, hist) in
- 840 | let (l', hist'') = transform_hyp preds v hist' (n + List.length preds) l in
- 841 | ((List.map (function
- 842 | (Pred(p',_)) -> Pred(p', [t1])
- 843 | | Out _ -> Parsing_helper.internal_error "rules.ml: Pred expected") hyp) @ l', hist'')
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Removed (_, _, _)|Any (_, _)|Empty _|HEquation (_, _, _, _)|
- Resolution (_, _, _)|TestUnifTrue (_, _))
- + ocamlfind ocamlc -c -g -annot -o selfun.cmo selfun.ml
- + ocamlfind ocamlc -c -g -annot -o simplify.cmo simplify.ml
- + ocamlfind ocamlc -c -g -annot -o simplify.cmo simplify.ml
- File "simplify.ml", lines 1188-1193, characters 7-38:
- 1188 | .......match catchs, tests, vars with
- 1189 | [],[],[] -> []
- 1190 | | (c::cs), ((Some t)::ts), (v::vs) ->
- 1191 | (v,c)::(t,Terms.true_term)::(constructUnifList cs ts vs)
- 1192 | | (c::cs), (None::ts), (v::vs) ->
- 1193 | (v,c)::(constructUnifList cs ts vs)..
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "simplify.ml", lines 1195-1202, characters 7-78:
- 1195 | .......match pats, catchs, tests with
- 1196 | [], [], [] -> proc
- 1197 | | (p::ps), (c::cs), (None::ts) ->
- 1198 | constructAssignProcess ps cs ts
- 1199 | (Let (p, c, proc, Nil, new_occurrence()))
- 1200 | | (p::ps), (c::cs), ((Some t)::ts) ->
- 1201 | constructAssignProcess ps cs ts
- 1202 | (Let (p, c, Test(t, proc, Nil, new_occurrence()), Nil, new_occurrence()))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- + ocamlfind ocamlc -c -g -annot -o spassout.cmo spassout.ml
- + ocamlfind ocamlc -c -g -annot -o syntax.cmo syntax.ml
- + ocamlfind ocamlc -c -g -annot -o terms.cmo terms.ml
- + ocamlfind ocamlc -c -g -annot -o terms.cmo terms.ml
- File "terms.ml", lines 908-910, characters 56-7:
- 908 | ........................................................begin
- 909 | match args with state::rest -> ([state], rest)
- 910 | end.................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "terms.ml", lines 910-913, characters 67-7:
- 910 | ...................................................................begin
- 911 | match Misc.bisect args with l_s::l_ns, r_s::r_ns ->
- 912 | ([l_s; r_s], (l_ns @ r_ns))
- 913 | end...........
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_::_, [])
- + ocamlfind ocamlc -c -g -annot -o termsEq.cmo termsEq.ml
- + ocamlfind ocamlc -c -g -annot -o tsyntax.cmo tsyntax.ml
- + ocamlfind ocamlc -c -g -annot -o misc.cmo misc.ml
- + ocamlfind ocamlc -c -g -annot -o misc.cmo misc.ml
- File "misc.ml", lines 26-31, characters 4-15:
- 26 | ....match (n, l) with
- 27 | | n, x::l when n > 0 ->
- 28 | let (l,r) = peel (n-1) l in
- 29 | (x::l, r)
- 30 | | 0, l ->
- 31 | ([], l)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (1, _)
- (However, some guarded clause may match this value.)
- + ocamlfind ocamlc -c -g -annot -o termslinks.cmo termslinks.ml
- + ocamlfind ocamlc -c -g -annot -o stringmap.cmo stringmap.ml
- + ocamlfind ocamlc -c -g -annot -o pitparser.cmo pitparser.ml
- + ocamlfind ocamlc -c -g -annot -o pvqueue.cmo pvqueue.ml
- + ocamlfind ocamlc -c -g -annot -o funmap.cmo funmap.ml
- + ocamlfind ocamlc -c -g -annot -o pievent.cmo pievent.ml
- + ocamlfind ocamlc -c -g -annot -o weaksecr.cmo weaksecr.ml
- + ocamlfind ocamlc -c -g -annot -o piparser.cmo piparser.ml
- + ocamlfind ocamlc -c -g -annot -o noninterf.cmo noninterf.ml
- + ocamlfind ocamlc -c -g -annot -o evaluation_helper.cmo evaluation_helper.ml
- + ocamlfind ocamlc -c -g -annot -o parser.cmo parser.ml
- + ocamlfind ocamlc -linkpkg -g -package str -package unix parsing_helper.cmo param.cmo debug.cmo misc.cmo terms.cmo termslinks.cmo display.cmo pitparser.cmo pitlexer.cmo pvqueue.cmo termsEq.cmo destructor.cmo stringmap.cmo reduction_helper.cmo history.cmo funmap.cmo pievent.cmo piparser.cmo pilexer.cmo noninterf.cmo weaksecr.cmo selfun.cmo rules.cmo pisyntax.cmo simplify.cmo pitsyntax.cmo pitransl.cmo evaluation_helper.cmo reduction.cmo piauth.cmo pitranslweak.cmo proswapper.cmo reduction_bipro.cmo spassout.cmo parser.cmo lexer.cmo syntax.cmo tsyntax.cmo main.cmo -o main.byte
- ocamlbuild -use-ocamlfind statveriftotex.native
- + ocamlfind ocamlc -config
- + ocamlfind ocamldep -modules statveriftotex.ml > statveriftotex.ml.depends
- + ocamlfind ocamldep -modules fileprint.ml > fileprint.ml.depends
- + /home/opam/.opam/default/bin/ocamllex.opt -q lexertotex.mll
- + ocamlfind ocamldep -modules lexertotex.ml > lexertotex.ml.depends
- + ocamlfind ocamlc -c -g -annot -o fileprint.cmo fileprint.ml
- + /home/opam/.opam/default/bin/ocamllex.opt -q pitlexertotex.mll
- + ocamlfind ocamldep -modules pitlexertotex.ml > pitlexertotex.ml.depends
- + ocamlfind ocamlc -c -g -annot -o lexertotex.cmo lexertotex.ml
- + ocamlfind ocamlc -c -g -annot -o pitlexertotex.cmo pitlexertotex.ml
- + ocamlfind ocamlc -c -g -annot -o statveriftotex.cmo statveriftotex.ml
- + ocamlfind ocamlc -c -g -annot -o statveriftotex.cmo statveriftotex.ml
- File "statveriftotex.ml", line 57, characters 12-28:
- 57 | let f_up = String.uppercase f in
- ^^^^^^^^^^^^^^^^
- Alert deprecated: Stdlib.String.uppercase
- Use String.uppercase_ascii/StringLabels.uppercase_ascii instead.
- + ocamlfind ocamlopt -c -g -annot -o fileprint.cmx fileprint.ml
- + ocamlfind ocamlopt -c -g -annot -o lexertotex.cmx lexertotex.ml
- + ocamlfind ocamlopt -c -g -annot -o pitlexertotex.cmx pitlexertotex.ml
- + ocamlfind ocamlopt -c -g -annot -o statveriftotex.cmx statveriftotex.ml
- + ocamlfind ocamlopt -c -g -annot -o statveriftotex.cmx statveriftotex.ml
- File "statveriftotex.ml", line 57, characters 12-28:
- 57 | let f_up = String.uppercase f in
- ^^^^^^^^^^^^^^^^
- Alert deprecated: Stdlib.String.uppercase
- Use String.uppercase_ascii/StringLabels.uppercase_ascii instead.
- + ocamlfind ocamlopt -linkpkg -g fileprint.cmx parsing_helper.cmx stringmap.cmx param.cmx piparser.cmx pilexer.cmx lexertotex.cmx pitparser.cmx pitlexer.cmx pitlexertotex.cmx statveriftotex.cmx -o statveriftotex.native
- make[1]: Leaving directory '/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2/src'
-> compiled statverif.1.97pl1.2
[statverif: make install]
+ /usr/bin/make "prefix=/home/opam/.opam/default" "install" (CWD=/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2)
- make -C src install
- make[1]: Entering directory '/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2/src'
- ocamlbuild -use-ocamlfind main.native
- + ocamlfind ocamlc -config
- ocamlbuild -use-ocamlfind main.byte
- + ocamlfind ocamlc -config
- ocamlbuild -use-ocamlfind statveriftotex.native
- + ocamlfind ocamlc -config
- mkdir -p /home/opam/.opam/default/bin
- install -m 755 _build/main.native /home/opam/.opam/default/bin/statverif
- install -m 755 _build/statveriftotex.native /home/opam/.opam/default/bin/statveriftotex
- make[1]: Leaving directory '/home/opam/.opam/default/.opam-switch/build/statverif.1.97pl1.2/src'
-> installed statverif.1.97pl1.2
=== STDERR ===
2026-06-24 11:17.30: OK: build statverif.1.97pl1.2 (runc: 31.1s, disk: 48KB)
2026-06-24 11:17.30: Job succeeded