Bisect report

File: source.ml (return to index)

Statistics: |
kind |  | coverage
--- | --- | ---
binding |  | 3 / 3 (100%)
sequence |  | 5 / 5 (100%)
for |  | 1 / 1 (100%)
if/then |  | 0 / 0 (-%)
try |  | 0 / 0 (-%)
while |  | 0 / 0 (-%)
match/function |  | 2 / 2 (100%)
kind |  | coverage
--- | --- | ---
class expression |  | 0 / 0 (-%)
class initializer |  | 0 / 0 (-%)
class method |  | 0 / 0 (-%)
class value |  | 0 / 0 (-%)
toplevel expression |  | 0 / 0 (-%)
lazy operator |  | 2 / 2 (100%)

Source:
`
000001| let inf = (*[2]*)ref 0
000002| let sup = (*[2]*)ref 3
000003|
000004| let args = [
000005| (*[2]*)("-inf", (Arg.Set_int inf), "inferior bound") ;
000006| ("-sup", (Arg.Set_int sup), "superior bound")
000007| ]
000008|
000009| let kind = function
000010| | x when (*[9]*)x > 9 || (*[7]*)x < 0 -> (*[2]*)print_endline "not a digit"
000011| | _ -> (*[7]*)print_endline "digit"
000012|
000013| let print x =
000014| (*[9]*)print_int x;
000015| (*[9]*)print_newline ()
000016|
000017| let () =
000018| (*[2]*)Arg.parse args ignore "report test";
000019| (*[2]*)for i = !inf to !sup do
000020| (*[9]*)kind i;
000021| (*[9]*)print i
000022| done
`
Legend:
some code - line containing no point
some code - line containing only visited points
some code - line containing only unvisited points
some code - line containing both visited and unvisited points