anchor.diff:      %% Fun is a symbol which is either a known BIF or function.
       Call = fun (Cas, En, Li, Sta) ->
                      Ar = length(Cas),
  +                   Ann = line_file_anno(Li, Sta),
                      case get_fbinding(Fun, Ar, En) of
                          {yes,M,F} ->                %Import
  -                           {c_call(c_atom(M), c_atom(F), Cas, [Li]),Sta};
  +                           {c_call(c_atom(M), c_atom(F), Cas, Ann),Sta};
                          {yes,Name} ->
                              %% Might have been renamed, use real function name.
  -                           Ann = [L,{file,Sta#cg.file}],
                              {c_apply(c_fname(Name, Ar), Cas, Ann),Sta}
                      end
              end,
  
positive.code:     Call = fun (Cas, Env, L, St) ->
                     Ar = length(Cas),
                     {yes,M,F} = get_gbinding(Fun, Ar, Env),
                     {c_call(c_atom(M), c_atom(F), Cas, [L]),St}
             end,
      comp_gargs(As, Call, Env, L, St);
  comp_gexpr(Symb, _, _, St) when is_atom(Symb) ->
  
negative.code: %%  Build a general failure clause. No line number in the clause, but
  %%  append the line number and file name to the annotation.
  
  fail_clause(Pats, Arg, Fann, L, St) ->
      Ann = line_file_anno(L, St),
      c_clause(Pats, c_atom(true),
               c_primop(c_atom(match_fail), [Arg], Fann ++ Ann),
               [compiler_generated]).             %It is compiler generated
  