Skip to content

Commit 6ba51a9

Browse files
committed
assertion was too strong
1 parent 8dbb27c commit 6ba51a9

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/runtime/runtime.ml

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -3466,10 +3466,10 @@ end = struct (* {{{ *)
34663466
if t == t' then orig
34673467
else Lam t'
34683468
(* deref *)
3469-
| UVar(r,ano) when !!r != C.dummy -> anomaly "faux: not fully derefd"
3470-
(* faux d (deref_uv ~to_:d r ano) *)
3471-
| AppUVar(r,args) when !!r != C.dummy -> anomaly "faux: not fully derefd"
3472-
(* faux d (deref_appuv ~to_:d r args) *)
3469+
| UVar(r,ano) when !!r != C.dummy ->
3470+
faux d (deref_uv ~to_:d r ano)
3471+
| AppUVar(r,args) when !!r != C.dummy ->
3472+
faux d (deref_appuv ~to_:d r args)
34733473
(* freeze *)
34743474
| AppUVar(r,args) when r.vardepth == 0 ->
34753475
let args = smart_map (faux d) args in

0 commit comments

Comments
 (0)