let get_constant_value env uid =
        try
                Hashtbl.find env.constants uid
        with
                | Not_found -> raise (RuntimeError.InternalError ("Unable to get constant "^(string_of_int uid)))