let eval_local_var x = 
    try Hashtbl.find local_vars x 
    with _ -> 
      complain_soft(); 
      if !_pe then epf "{Unbound variable: `%s'}\n%!" (snippet x 15);
      failwith "Unbound variable"