anchor.diff:          is_list(FormsOrBin) ->
               case Mode2 of
                   interpret ->
  -                    interpret(FormsOrBin, File, Args);
  +                    interpret(FormsOrBin, HasRecs, File, Args);
                   compile ->
                       case compile:forms(FormsOrBin, [report]) of
                           {ok, Module, BeamBin} ->
  
positive.code: 
  parse_and_run(File, Args, Options) ->
      CheckOnly = lists:member("s", Options),
      {Source, Module, FormsOrBin, Mode} = parse_file(File, CheckOnly),
      Mode2 =
          case lists:member("d", Options) of
              true  -> 
  
negative.code:             fatal(format_exception(Class, Reason))
      end.
  
  interpret(Forms, HasRecs,  File, Args) ->
      %% Basic validation before execution
      case erl_lint:module(Forms) of
  	{ok,Ws} ->
  	    report_warnings(Ws);
  	{error,Es,Ws} ->
  	    report_errors(Es),
  	    report_warnings(Ws),
  	    fatal("There were compilation errors.")
      end,
      %% Optionally expand records
      Forms2 =
  	case HasRecs of
  	    false -> Forms;
  	    true  -> erl_expand_records:module(Forms, [])
  	end,
      Dict = parse_to_dict(Forms2),
      ArgsA = erl_parse:abstract(Args, 0),
      Call = {call,0,{atom,0,main},[ArgsA]},
      try
  