anchor.diff:  
   trans_macro_body([], Ts0) ->
       Ts1 = trans_qm(Ts0),
  +    %% io:format("parse: ~p\n",[Ts1 ++ [{dot,0}]]),
       {ok,[E]} = erl_parse:parse_exprs(Ts1 ++ [{dot,0}]),
  +    %% io:format("result: ~p\n",[E]),
       [?BQ(lfe_trans:from_expr(E))];
   trans_macro_body(As, Ts0) ->
       Ts1 = trans_qm(Ts0),
  
positive.code: -ifdef(NEW_REC_CORE).
  parse_hrl_file(Fs, Ms, St0) ->
      {As,Lfs,St1} = trans_forms(Fs, St0),
      {Lms,St2} = trans_macros(Ms, St1),
      {ok,[['extend-module',[],As]] ++ Lfs ++ Lms,St2}.
  -else.
  
negative.code:         {'EXIT',_} ->                           %Something went wrong
              {As,Lfs,add_warning({notrans_function,Name,Arity}, St)}
      end;
  trans_form({error,E}, As, Lfs, #mac{errors=Es}=St) ->
      %% Assume the error is in the right format, {Line,Mod,Err}.
      {As,Lfs,St#mac{errors=Es ++ [E]}};
  trans_form(_, As, Lfs, St) ->                   %Ignore everything else
      {As,Lfs,St}.
  
  