jeltz/heptagon
1
0
Fork 0
Code Issues Pull requests Releases Activity

This case is unused

Browse source
This commit is contained in:
Cédric Pasteur 2010-07-07 17:03:36 +02:00
parent 0712378133
commit d594ace895
1 changed files with 0 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
compiler/minils/analysis/clocking.ml
View file

@ -126,9 +126,6 @@ let rec typing h e =
| None -> new_var()
| Some(reset) -> typ_of_name h reset
in (List.iter (expect h (Ck ck_r)) e_list; skeleton ck_r e.e_ty)
| Ecall(_, e_list, Some(reset)) ->
let ck_r = typ_of_name h reset
in (List.iter (expect h (Ck ck_r)) e_list; skeleton ck_r e.e_ty)
| Ewhen (e, c, n) ->
let ck_n = typ_of_name h n
in (expect h (skeleton ck_n e.e_ty) e;