let is_calloc_function v = isFunctionType v.vtype && v.vname = name_of_calloc