मैं बस किसी को उम्मीद है कि वास्तव में एक समझदार संस्करण के लिए यहाँ छोड़ दूँगा। फिलहाल इस पर कोई अच्छा जवाब नहीं आ रहा है ...
defmodule Util do
def typeof(self) do
cond do
is_float(self) -> "float"
is_number(self) -> "number"
is_atom(self) -> "atom"
is_boolean(self) -> "boolean"
is_binary(self) -> "binary"
is_function(self) -> "function"
is_list(self) -> "list"
is_tuple(self) -> "tuple"
true -> "idunno"
end
end
end
पूर्णता की खातिर, मामलों की जांच करें:
cases = [
1.337,
1337,
:'1337',
true,
<<1, 3, 3, 7>>,
(fn(x) -> x end),
{1, 3, 3, 7}
]
Enum.each cases, fn(case) ->
IO.puts (inspect case) <> " is a " <> (Util.typeof case)
end
यहाँ प्रोटोकॉल के साथ एक समाधान है; मुझे यकीन नहीं है कि अगर वे तेज हैं (मुझे यकीन है कि वे सभी प्रकारों पर एक लूप नहीं कर रहे हैं), लेकिन यह बहुत बदसूरत है (और नाजुक; यदि वे एक मूल प्रकार या नाम जोड़ते हैं या हटाते हैं, तो यह इसे तोड़ देगा)।
defprotocol Typeable, do: def typeof(self)
defimpl Typeable, for: Atom, do: def typeof(_), do: "Atom"
defimpl Typeable, for: BitString, do: def typeof(_), do: "BitString"
defimpl Typeable, for: Float, do: def typeof(_), do: "Float"
defimpl Typeable, for: Function, do: def typeof(_), do: "Function"
defimpl Typeable, for: Integer, do: def typeof(_), do: "Integer"
defimpl Typeable, for: List, do: def typeof(_), do: "List"
defimpl Typeable, for: Map, do: def typeof(_), do: "Map"
defimpl Typeable, for: PID, do: def typeof(_), do: "PID"
defimpl Typeable, for: Port, do: def typeof(_), do: "Port"
defimpl Typeable, for: Reference, do: def typeof(_), do: "Reference"
defimpl Typeable, for: Tuple, do: def typeof(_), do: "Tuple"
IO.puts Typeable.typeof "Hi"
IO.puts Typeable.typeof :ok