anchor.diff:  
   c([F], Eenv, Benv) -> c([F,[]], Eenv, Benv);
   c([F,Os], Eenv, _) ->
  -    Name = lfe_eval:eval(F, Eenv),		%Evaluate arguments
  -    Opts = lfe_eval:eval(Os, Eenv),
  +    Name = lfe_eval:expr(F, Eenv),		%Evaluate arguments
  +    Opts = lfe_eval:expr(Os, Eenv),
       Loadm = fun (Mod) ->
   		    Base = filename:basename(Name, ".lfe"),
   		    code:purge(Mod),
  
positive.code:     Imps1 = foldl(Fun, Imps0, Fs),
      St#slurp{imps=store(Mod, Imps1, St#slurp.imps)}.
  
  %% safe_fetch(Key, Dict, Default) -> Value.
  
  safe_fetch(Key, D, Def) ->
  
negative.code:     macroexpand_1(S, Eenv, Benv);
  eval_internal(['macroexpand-all',S], Eenv, Benv) ->
      macroexpand_all(S, Eenv, Benv);
  eval_internal([set|Args], Eenv, Benv) ->	%Set variables in shell
      set(Args, Eenv, Benv);
  eval_internal(_, _, _) -> no.			%Not an internal function
  
  %% c(Args, EvalEnv, BaseEnv) -> {yes,Res,Env}.
  