anchor.diff:  collect_macro({['extend-module',_,Atts],_}, Mst) ->
       collect_attrs(Atts, Mst);
   collect_macro({['define-function',Name,_,Def],_}, Mst) ->
  -    %% Check for LFE-EXPAND-EXPORTED-MACRO.
  +    %% Check for user defined LFE-EXPAND-EXPORTED-MACRO.
       case {Name,function_arity(Def)} of
           {'LFE-EXPAND-EXPORTED-MACRO',3} ->
  -            Mst#umac{leem=true};
  +            Mst#umac{uleem=true};
           _ -> Mst                                %Ignore other functions
       end;
   collect_macro(_, Mst) -> Mst.                   %Ignore everything else
  
positive.code:            end,
      %% Get the macros to export as case clauses.
      LEEM = case lfe_env:fold_macros(Mfun, [], Env) of
                 [] -> empty_leum();              %No macros to export
                 Macs ->
                     %% Build case, flet and let.
                     Case = ['case',?NAMEVAR|Macs ++ [['_',?Q(no)]]],
  
negative.code: %% exported_macro(Name, State) -> true | false.
  
  add_exports(all, _) -> all;
  add_exports(_, [all]) -> all;                   %Note we get a list of macros!
  add_exports(Old, More) ->
      ordsets:union(Old, lists:usort(More)).
  
  