anchor.diff:      end.
   
   to_expr_var(V, L, Vt, St) ->
  -    Var = case find(V, Vt) of
  +    Var = case orddict:find(V, Vt) of
   	      {ok,V1} -> V1;
   	      error -> V
   	  end,
  
positive.code: %% Purpose : Lisp Flavoured Erlang translator.
  
  %%% Translate LFE code to/from vanilla Erlang AST.
  
  -module(lfe_trans).
  
  
negative.code: 
  from_lit_list(Es) -> [ from_lit(E) || E <- Es ].
  
  -record(to, {vc=0				%Variable counter
  	    }).
  
  to_expr(E, L) ->
      {Le,_} = to_expr(E, L, orddict:new(), #to{}),
      Le.
  
  %% to_expr(Expr, LineNumber, VarTable, State) -> {Expr,State}.
  