Attention une mise à jour du service Gitlab va être effectuée le mardi 30 novembre entre 17h30 et 18h00. Cette mise à jour va générer une interruption du service dont nous ne maîtrisons pas complètement la durée mais qui ne devrait pas excéder quelques minutes. Cette mise à jour intermédiaire en version 14.0.12 nous permettra de rapidement pouvoir mettre à votre disposition une version plus récente.

Commit f141283e authored by Jean-Christophe Filliâtre's avatar Jean-Christophe Filliâtre
Browse files

programs: variable substitution in program types now covers all variables

parent 167000e1
...@@ -236,10 +236,12 @@ end = struct ...@@ -236,10 +236,12 @@ end = struct
let rec subst_var ts s vs = let rec subst_var ts s vs =
let ty' = ty_inst ts vs.vs_ty in let ty' = ty_inst ts vs.vs_ty in
let vs' =
if ty_equal ty' vs.vs_ty then if ty_equal ty' vs.vs_ty then
s, vs vs
else else
let vs' = create_vsymbol (id_clone vs.vs_name) ty' in create_vsymbol (id_clone vs.vs_name) ty'
in
Mvs.add vs (t_var vs') s, vs' Mvs.add vs (t_var vs') s, vs'
and subst_post ts s ((v, q), ql) = and subst_post ts s ((v, q), ql) =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment