Character = $a
TabCharacter = $\t
TabCharacterDecimal = $\011
TextWithDollar = "This is just a normal text with a $ in the middle"
StringStart = $"
Backslash = $\\
ListStart = $[
ListEnd = $]
SpaceChar = $
fun_takes_literal($a) -> ok.
fun_takes_literal_list([$a|Rest]) -> ok.
fun_takes_literal_binary(<<$a, Rest/binary>>) -> ok.
convert_escape_sequence(<<$\\, Escaped, Rest/binary>>) ->
C = case Escaped of
$b -> $\b;
$f -> $\f;
$n -> $\n;
$r -> $\r;
$t -> $\t;
$" -> $";
$\\ -> $\\;
_ -> error
end