   def appli([:primitive, fun_rep], vals) do
     apply_primitive(fun_rep, vals)
   end
-
   def appli([:non_primitive, fun_rep], vals) do
     apply_closure(fun_rep, vals)
   end

  defp short_circuit_helper([h|[]], table, _) do
    meaning(h, table)
  end

  defp short_circuit_helper([h|t], table, func) do
    result = meaning(h, table)


  defp lookup_in_entry_help(name, [], _, error_function) do
    error_function.(name)
  end
  defp lookup_in_entry_help(name, [name|_], [value|_], _) do
    value
  end
  defp lookup_in_entry_help(name, [_|keys], [_|values], error_function) do
    lookup_in_entry_help(name, keys, values, error_function)
  end
