update inbox list
This commit is contained in:
60
vendor/scrivo/highlight.php/test/detect/erlang/default.txt
vendored
Normal file
60
vendor/scrivo/highlight.php/test/detect/erlang/default.txt
vendored
Normal file
@@ -0,0 +1,60 @@
|
||||
-module(ssh_cli).
|
||||
|
||||
-behaviour(ssh_channel).
|
||||
|
||||
-include("ssh.hrl").
|
||||
%% backwards compatibility
|
||||
-export([listen/1, listen/2, listen/3, listen/4, stop/1]).
|
||||
|
||||
if L =/= [] -> % If L is not empty
|
||||
sum(L) / count(L);
|
||||
true ->
|
||||
error
|
||||
end.
|
||||
|
||||
%% state
|
||||
-record(state, {
|
||||
cm,
|
||||
channel
|
||||
}).
|
||||
|
||||
-spec foo(integer()) -> integer().
|
||||
foo(X) -> 1 + X.
|
||||
|
||||
test(Foo)->Foo.
|
||||
|
||||
init([Shell, Exec]) ->
|
||||
{ok, #state{shell = Shell, exec = Exec}};
|
||||
init([Shell]) ->
|
||||
false = not true,
|
||||
io:format("Hello, \"~p!~n", [atom_to_list('World')]),
|
||||
{ok, #state{shell = Shell}}.
|
||||
|
||||
concat([Single]) -> Single;
|
||||
concat(RList) ->
|
||||
EpsilonFree = lists:filter(
|
||||
fun (Element) ->
|
||||
case Element of
|
||||
epsilon -> false;
|
||||
_ -> true
|
||||
end
|
||||
end,
|
||||
RList),
|
||||
case EpsilonFree of
|
||||
[Single] -> Single;
|
||||
Other -> {concat, Other}
|
||||
end.
|
||||
|
||||
union_dot_union({union, _}=U1, {union, _}=U2) ->
|
||||
union(lists:flatten(
|
||||
lists:map(
|
||||
fun (X1) ->
|
||||
lists:map(
|
||||
fun (X2) ->
|
||||
concat([X1, X2])
|
||||
end,
|
||||
union_to_list(U2)
|
||||
)
|
||||
end,
|
||||
union_to_list(U1)
|
||||
))).
|
||||
Reference in New Issue
Block a user