anchor.diff:                   vcount=0,                      %Variable counter
                    func=[],                       %Current function
                    arity=[],                      %Arity for current function
  -                 fcount=0,                      %Local fun count
  -                 bitdefault,
  -                 bittypes
  +                 fcount=0			%Local fun count
                   }).
   
   %% module(Forms, CompileOptions)
  
positive.code: -record(expand, {module=[],                     %Module name
                   exports=[],                    %Exports
                   imports=[],                    %Imports
                   compile=[],                    %Compile flags
                   attributes=[],                 %Attributes
                   callbacks=[],                  %Callbacks
                   optional_callbacks=[] :: [fa()],  %Optional callbacks
  
negative.code: 
      %% Build initial expand record.
      St0 = #expand{exports=PreExp,
                    defined=PreExp
                   },
      %% Expand the functions.
      {Tfs,St1} = forms(Fs, define_functions(Fs, St0)),
      %% Get the correct list of exported functions.
      Exports = case member(export_all, Opts) of
                    true -> gb_sets:to_list(St1#expand.defined);
                    false -> St1#expand.exports
                end,
  