[biabduction] move SymOp module and remove dead variant

Summary: `SymOp` now can move to biabduction folder. Kill `FKrecursion_timeout` unused variant.

Reviewed By: jvillard

Differential Revision: D28930213

fbshipit-source-id: e9bb1d1e9
master
Nikos Gorogiannis 4 years ago committed by Facebook GitHub Bot
parent d5d9a9369a
commit dfd4dd44dd

@ -11,7 +11,6 @@ module F = Format
type failure_kind = type failure_kind =
| FKtimeout (** max time exceeded *) | FKtimeout (** max time exceeded *)
| FKsymops_timeout of int (** max symop's exceeded *) | FKsymops_timeout of int (** max symop's exceeded *)
| FKrecursion_timeout of int (** max recursion level exceeded *)
| FKcrash of string (** uncaught exception or failed assertion *) | FKcrash of string (** uncaught exception or failed assertion *)
(** failure that prevented biabduction analysis from finishing *) (** failure that prevented biabduction analysis from finishing *)
@ -51,7 +50,5 @@ let pp_failure_kind fmt = function
F.pp_print_string fmt "TIMEOUT" F.pp_print_string fmt "TIMEOUT"
| FKsymops_timeout symops -> | FKsymops_timeout symops ->
F.fprintf fmt "SYMOPS TIMEOUT (%d)" symops F.fprintf fmt "SYMOPS TIMEOUT (%d)" symops
| FKrecursion_timeout level ->
F.fprintf fmt "RECURSION TIMEOUT (%d)" level
| FKcrash msg -> | FKcrash msg ->
F.fprintf fmt "CRASH (%s)" msg F.fprintf fmt "CRASH (%s)" msg

@ -14,7 +14,6 @@ open! IStd
type failure_kind = type failure_kind =
| FKtimeout (** max time exceeded *) | FKtimeout (** max time exceeded *)
| FKsymops_timeout of int (** max symop's exceeded *) | FKsymops_timeout of int (** max symop's exceeded *)
| FKrecursion_timeout of int (** max recursion level exceeded *)
| FKcrash of string (** uncaught exception or failed assertion *) | FKcrash of string (** uncaught exception or failed assertion *)
val pp_failure_kind : Format.formatter -> failure_kind -> unit val pp_failure_kind : Format.formatter -> failure_kind -> unit

Loading…
Cancel
Save