diff options
| author | Vincent Laporte | 2018-11-07 11:34:57 +0000 |
|---|---|---|
| committer | Vincent Laporte | 2018-11-07 16:08:28 +0000 |
| commit | ce4d0cb7803a4eb7269026409979a0b046d35552 (patch) | |
| tree | 7c14a83ec4b2a32b6016516650d0f2772c70f3b6 /plugins/cc | |
| parent | 9b7a26bac18b5bac5fd5108eafbd32b8b0a20b7e (diff) | |
[CC plugin] Remove dead code
Diffstat (limited to 'plugins/cc')
| -rw-r--r-- | plugins/cc/ccalgo.ml | 3 | ||||
| -rw-r--r-- | plugins/cc/ccalgo.mli | 2 |
2 files changed, 0 insertions, 5 deletions
diff --git a/plugins/cc/ccalgo.ml b/plugins/cc/ccalgo.ml index f26ec0f401..a6f432b5bd 100644 --- a/plugins/cc/ccalgo.ml +++ b/plugins/cc/ccalgo.ml @@ -333,9 +333,6 @@ let get_representative uf i= let get_constructors uf i= uf.map.(i).constructors -let find_pac uf i pac = - PacMap.find pac (get_constructors uf i) - let rec find_oldest_pac uf i pac= try PacMap.find pac (get_constructors uf i) with Not_found -> diff --git a/plugins/cc/ccalgo.mli b/plugins/cc/ccalgo.mli index 4ebc6a135a..d52e83dc31 100644 --- a/plugins/cc/ccalgo.mli +++ b/plugins/cc/ccalgo.mli @@ -145,8 +145,6 @@ val tail_pac : pa_constructor -> pa_constructor val find : forest -> int -> int -val find_pac : forest -> int -> pa_constructor -> int - val find_oldest_pac : forest -> int -> pa_constructor -> int val term : forest -> int -> term |