Build Log: lambda.0.1.7

Processing: [default: loading data] [lambda.0.1.7: http] [lambda.0.1.7: extract] -> retrieved lambda.0.1.7 (https://github.com/dakk/lambda/archive/v0.1.7.tar.gz) [lambda: dune build] + /home/opam/.opam/default/bin/dune "build" "-p" "lambda" "-j" "255" (CWD=/home/opam/.opam/default/.opam-switch/build/lambda.0.1.7) - (cd _build/default && /home/opam/.opam/default/bin/ocamlc.opt -w -40 -g -bin-annot -I src/.lambda.objs/byte -intf-suffix .ml -no-alias-deps -open Lambda -o src/.lambda.objs/byte/lambda__L.cmo -c -impl src/l.ml) - File "src/l.ml", lines 72-78, characters 23-64: - 72 | .......................match t with - 73 | Var y -> if x=y then t' else Var y - 74 | | App(t0,t1) -> App(subst x t' t0, subst x t' t1) - 75 | | Abs(y,t0) when y=x -> Abs(x,t0) - 76 | | Abs(y,t0) when y!=x && not (member y (fv t')) -> Abs(y, subst x t' t0) - 77 | | Abs(y,t0) when y!=x && member y (fv t') -> - 78 | let z = gensym() in Abs(z,subst x t' (subst z (Var y) t0)).. - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Abs _ - (However, some guarded clause may match this value.) - File "src/l.ml", lines 104-107, characters 53-81: - 104 | .....................................................match t with - 105 | Abs(x,t') -> Abs(x,reduce1 t') - 106 | | App(Abs(x,t0),t1) -> subst x t1 t0 - 107 | | App(t0,t1) -> if has_redex t0 then App(reduce1 t0,t1) else App(t0,reduce1 t1).. - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Var _ - File "src/l.ml", lines 122-128, characters 51-78: - 122 | ...................................................match t with - 123 | Var y -> if x=y then t' else Var y - 124 | | App(t0,t1) -> App(subst' x t' t0 (n'-1), subst' x t' t1 (n'-1)) - 125 | | Abs(y,t0) when y=x -> Abs(x,t0) - 126 | | Abs(y,t0) when y!=x && not (member y (fv t')) -> Abs(y, subst' x t' t0 (n'-1)) - 127 | | Abs(y,t0) when y!=x && member y (fv t') -> - 128 | let z = gensym() in Abs(z,subst' x t' (subst' z (Var y) t0 (n'-1)) (n'-1)) - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Abs _ - (However, some guarded clause may match this value.) - File "src/l.ml", lines 130-133, characters 69-97: - 130 | .....................................................................match t with - 131 | Abs(x,t') -> Abs(x,reduce1' t' (n'-1)) - 132 | | App(Abs(x,t0),t1) -> subst' x t1 t0 (n'-1) - 133 | | App(t0,t1) -> if has_redex t0 then App(reduce1' t0 (n'-1),t1) else App(t0,reduce1' t1 (n'-1)) - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Var _ - (cd _build/default && /home/opam/.opam/default/bin/ocamlopt.opt -w -40 -g -I src/.lambda.objs/byte -I src/.lambda.objs/native -intf-suffix .ml -no-alias-deps -open Lambda -o src/.lambda.objs/native/lambda__L.cmx -c -impl src/l.ml) - File "src/l.ml", lines 72-78, characters 23-64: - 72 | .......................match t with - 73 | Var y -> if x=y then t' else Var y - 74 | | App(t0,t1) -> App(subst x t' t0, subst x t' t1) - 75 | | Abs(y,t0) when y=x -> Abs(x,t0) - 76 | | Abs(y,t0) when y!=x && not (member y (fv t')) -> Abs(y, subst x t' t0) - 77 | | Abs(y,t0) when y!=x && member y (fv t') -> - 78 | let z = gensym() in Abs(z,subst x t' (subst z (Var y) t0)).. - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Abs _ - (However, some guarded clause may match this value.) - File "src/l.ml", lines 104-107, characters 53-81: - 104 | .....................................................match t with - 105 | Abs(x,t') -> Abs(x,reduce1 t') - 106 | | App(Abs(x,t0),t1) -> subst x t1 t0 - 107 | | App(t0,t1) -> if has_redex t0 then App(reduce1 t0,t1) else App(t0,reduce1 t1).. - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Var _ - File "src/l.ml", lines 122-128, characters 51-78: - 122 | ...................................................match t with - 123 | Var y -> if x=y then t' else Var y - 124 | | App(t0,t1) -> App(subst' x t' t0 (n'-1), subst' x t' t1 (n'-1)) - 125 | | Abs(y,t0) when y=x -> Abs(x,t0) - 126 | | Abs(y,t0) when y!=x && not (member y (fv t')) -> Abs(y, subst' x t' t0 (n'-1)) - 127 | | Abs(y,t0) when y!=x && member y (fv t') -> - 128 | let z = gensym() in Abs(z,subst' x t' (subst' z (Var y) t0 (n'-1)) (n'-1)) - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Abs _ - (However, some guarded clause may match this value.) - File "src/l.ml", lines 130-133, characters 69-97: - 130 | .....................................................................match t with - 131 | Abs(x,t') -> Abs(x,reduce1' t' (n'-1)) - 132 | | App(Abs(x,t0),t1) -> subst' x t1 t0 (n'-1) - 133 | | App(t0,t1) -> if has_redex t0 then App(reduce1' t0 (n'-1),t1) else App(t0,reduce1' t1 (n'-1)) - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Var _ - (cd _build/default && /home/opam/.opam/default/bin/ocamlc.opt -w -40 -g -bin-annot -I src/.lambda.objs/byte -intf-suffix .ml -no-alias-deps -open Lambda -o src/.lambda.objs/byte/lambda__Church.cmo -c -impl src/church.ml) - File "src/church.ml", lines 19-22, characters 21-20: - 19 | .....................match t with - 20 | App(Var f, inner) -> App(Var "f", convin inner) - 21 | | App(Var f, Var x) -> App(Var "f", Var "x") - 22 | | Var x -> Var "x" - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (App ((Abs _|App (_, _)), _)|Abs _) - File "src/church.ml", line 21, characters 4-21: - 21 | | App(Var f, Var x) -> App(Var "f", Var "x") - ^^^^^^^^^^^^^^^^^ - Warning 11: this match case is unused. - (cd _build/default && /home/opam/.opam/default/bin/ocamlopt.opt -w -40 -g -I src/.lambda.objs/byte -I src/.lambda.objs/native -intf-suffix .ml -no-alias-deps -open Lambda -o src/.lambda.objs/native/lambda__Church.cmx -c -impl src/church.ml) - File "src/church.ml", lines 19-22, characters 21-20: - 19 | .....................match t with - 20 | App(Var f, inner) -> App(Var "f", convin inner) - 21 | | App(Var f, Var x) -> App(Var "f", Var "x") - 22 | | Var x -> Var "x" - Warning 8: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (App ((Abs _|App (_, _)), _)|Abs _) - File "src/church.ml", line 21, characters 4-21: - 21 | | App(Var f, Var x) -> App(Var "f", Var "x") - ^^^^^^^^^^^^^^^^^ - Warning 11: this match case is unused. -> compiled lambda.0.1.7 -> installed lambda.0.1.7