anchor.diff:      end.
   
   expand_module(Type, Data, M, Opts, Ps) ->
  +    ?dbg("type ~p, data ~p, m ~p, opts ~p, ps ~p",
  +		[Type, Data, M, Opts, Ps]),
       OwnPfx = case Type of
   		 module ->
   		     {_, _, Pfx, _} = lists:keyfind(prefix,1,Data),
  
positive.code:     lists:flatten(Res).
  
  include_submodule(M, IOpts, Opts, Ps) ->
      File = case lists:keyfind(revision_date, 1, IOpts) of
  	       {'revision_date', _, D, _} ->
  		   <<M/binary, "@", D/binary, ".yang">>;
  
negative.code: 			 %% We have to guess, although we really should know.
  			 Mod;
  		    true ->
  			 ?dbg("Elem ~p,~nMod ~p,~n Ps ~p",  [Elem, ModR, Ps]),
  			 throw({unknown_prefix, [extension, L, Pfx, Extension]})
  		 end;
  	     #mod{prefix = Pfx} -> 
  		 Pfx
  	 end,
      [{{Mp,Extension},L,Arg, expand_elems_(Data, ModR, Ps)}
       | expand_elems_(T, ModR, Ps)];
  %% expand_elems_([{{ext,_,_},_,_,_} = Ext|T], ModR) ->
  %%     %% already expanded
  %%     [Ext| expand_elems_(T, ModR)];
  expand_elems_([{Elem,L,Name,Data} = Stmt|T], ModR, Ps) ->
      %%?dbg("Stmt ~p,~nMod ~p", [Stmt, ModR]),
      [{Elem,L,Name,fix_expanded_(expand_elems_(Data, ModR, Ps))}
       | expand_elems_(T, ModR, Ps)];
  expand_elems_([], _, _) ->
  