+ if
+ (try ignore (req#param "constraints"); false
+ with Http_types.Param_not_found _ -> true) &&
+ (req#param "advanced" = "no") && (req#path = "/hint")
+ then
+ let dbd =
+ match mqi_handle.MQIConn.pgc with
+ | MQIConn.MySQL_C conn -> conn
+ | _ -> assert false
+ in
+ let results = List.map snd (Match_concl.cmatch dbd term') in
+ send_results results ~id_to_uris:id_to_uris' req outchan
+ else