anchor.diff:  %% other than new lines
   only_nls([]) ->
       true;
  -only_nls(["\n"|Rem]) ->
  +only_nls([$\n|Rem]) ->
       only_nls(Rem);
  -only_nls(["\r","\n"|Rem]) ->
  +only_nls([$\r, $\n|Rem]) ->
       only_nls(Rem);
   only_nls([_|_Rem]) ->
       false.
  
positive.code: expand([{command,Command} | Rem], Out, SelfRef, Defs, IncFile, IncDir, check_all, Err, War, L, FN) ->
      case pp_command(Command, Rem, Defs, IncDir, Err, War, L, FN) of
  	{define, Rem2, Defs2, Err2, War2, Nl} -> 
  	    Out2 = [lists:duplicate(Nl,$\n)|Out],
  	    expand(Rem2, Out2, SelfRef, Defs2, IncFile, IncDir, check_all, Err2, War2, L+Nl, FN);
  
  	{undef, Rem2, Defs2, Err2, War2, Nl} -> 
  	    Out2 = [lists:duplicate(Nl,$\n)|Out],
  	    expand(Rem2, Out2, SelfRef, Defs2, IncFile, IncDir, check_all, Err2, War2, L+Nl, FN);
  
  	{{include, ok}, FileName, FileCont, Rem2, Nl, Err2, War2} ->
  
negative.code: 	    IncFile2 = [FN2|IF],
  	    expand(Rem2, Out2, SelfRef, Defs, IncFile2, IncDir, check_all, Err, War, L2, FN2);
  	{{line, error}, {_Removed, Rem2, Nl}, Err2} ->
  	    Out2 = lists:duplicate(Nl,$\n) ++ Out,
  	    expand(Rem2, Out2, SelfRef, Defs, IncFile, IncDir, check_all, [Err2|Err], War, L+Nl, FN);
  
  	hash_mark ->
  