anchor.diff:  
   
   compile_file(File, GC, SC) ->
  -    %% broken erlang comppiler isn't
  -    %% reentrant, can only have one erlanf compiler at a time running 
  +    put(yfile,yaws:to_list(File)),
  +    %% broken erlang compiler isn't
  +    %% reentrant, can only have one erlang compiler at a time running 
       global:trans({yaws, self()},
   		 fun() ->
   			 ?Debug("Compile ~s~n", [File]),
  
positive.code:     ?Debug("Writing outout file~s~n", [OutFile]),
      {ok, Out} = file:open(OutFile, [write]),
      ok = io:format(Out, "-module(~s).~n-compile(export_all).~n~n", [Module]),
      io:format(Out, "%%~n%% code at line ~w from file ~s~n%%~n",
  	      [Line, C#comp.infile]),
  
  
negative.code: comp_err(C, _LineNo, NumChars, Err) ->
      case Err of
  	[{_FileName, [ {Line0, Mod, E} |_]} |_] when integer(Line0) ->
  	    Line = Line0 + C#comp.startline - 10,
  	    ?Debug("XX ~p~n", [{_LineNo, Line0}]),
  	    Str = io_lib:format("~s:~w:~n ~s\n", 
  				[C#comp.infile, Line,
  