Mise à jour terminée. Pour connaître les apports de la version 13.8.4 par rapport à notre ancienne version vous pouvez lire les "Release Notes" suivantes :
https://about.gitlab.com/releases/2021/02/11/security-release-gitlab-13-8-4-released/
https://about.gitlab.com/releases/2021/02/05/gitlab-13-8-3-released/

Commit 14889667 authored by Leon Gondelman's avatar Leon Gondelman

coercions for '=': a temporary solution for x:63 = 0

parent 4c99984c
......@@ -344,7 +344,6 @@ let dterm tuc ?loc node =
end with Not_found ->
Loc.error ?loc:dt.dt_loc FmlaExpected end
| None -> dt
and dterm_node loc node =
let mk_dty ty = { dt_node = node; dt_dty = ty; dt_loc = loc } in
match node with
......@@ -356,6 +355,12 @@ let dterm tuc ?loc node =
mk_dty (Some dty_int)
| DTconst (Number.ConstReal _) ->
mk_dty (Some dty_real)
| DTapp (ls, dtl) when ls_equal ls ps_equ ->
let dtyl, dty = specialize_ls ls in
let dtl = dty_unify_app_map ls dterm_expected (List.rev dtl) dtyl in
{ dt_node = DTapp (ls, dtl);
dt_dty = dty;
dt_loc = loc }
| DTapp (ls, dtl) ->
let dtyl, dty = specialize_ls ls in
{ dt_node = DTapp (ls, dty_unify_app_map ls dterm_expected dtl dtyl);
......
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