anchor.diff:  
   -define(NODOC, []).                             %Empty documentation
   
  --record(umac, {mline=[],expm=[],env=[]}).
  -
   %% We need these variables to have a funny name.
   -define(NAMEVAR, '|- MACRO NAME -|').
   -define(ARGSVAR, '|- CALL ARGS -|').
  +
  +%% Define the macro data.
  +-record(umac, {mline=[],expm=[],env=[],
  +               leem=false,huf=false             %Do we have leem and huf?
  +              }).
   
   %% module(ModuleForms, CompState) -> {ModuleForms,CompState}.
   %% module(ModuleDef, ModuleForms, UmacState, CompState) ->
  
positive.code:     Exp = [export,['LFE-EXPAND-EXPORTED-MACRO',3],
             ['$handle_undefined_function',2]],
      Md1 = {['define-module',Name,Doc,Exp|Mdef],L},
      {[Md1|Fs1 ++ [{Umac,L}]],Cst}.
  
  collect_macros(Fs, Mst) ->
      lists:foldl(fun collect_macro/2, Mst, Fs).
  
negative.code: 
  add_huf(L, [{['define-function','$handle_undefined_function',Doc,Def],Lf}=F|Fs]) ->
      case function_arity(Def) of
          2 -> [{make_huf(Doc, Def),Lf}|Fs];      %Found the right $huf
          _ -> [F|add_huf(L, Fs)]
      end;
  add_huf(L, [F|Fs]) ->
  