Name not found in smtencoding env

[mtzguido]

This file triggers it

FStar.Reflection.TermEq.fst.txt

[mtzguido]

Minimized:

module Bug

type comparator_for (t:Type) = x:t -> y:t -> int

val term_eq         : comparator_for int
let rec term_eq t1 t2 = 0

let t = term_eq

ASSERTION FAILURE: Name term_eq not found in the smtencoding env
F* may be in an inconsistent state.
Please file a bug report, ideally with a minimized version of the program that triggered the error.