summaryrefslogtreecommitdiff
path: root/acse.erl
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-10-28 20:10:53 +0100
committerDimitri Sokolyuk <demon@dim13.org>2015-10-28 20:10:53 +0100
commit5ab97ed6bef0406b68f01b79a702ca9aa88c1912 (patch)
tree60fc45dd857b94f64e45f65afe69700f88c8b502 /acse.erl
parentbc998d4dd2f030f5ed6c3e65d222a70f9edd15f2 (diff)
Unify
Diffstat (limited to 'acse.erl')
-rw-r--r--acse.erl10
1 files changed, 6 insertions, 4 deletions
diff --git a/acse.erl b/acse.erl
index 110f530..e8f0d70 100644
--- a/acse.erl
+++ b/acse.erl
@@ -4,7 +4,7 @@
-include("CSTA-application-context-information-csta3.hrl").
-export([associate/0, release/0]).
--export([decode/1, check/1]).
+-export([decode/1, dispatch/1]).
ui() ->
{ok, UI} = 'CSTA-application-context-information-csta3':encode(
@@ -24,10 +24,12 @@ release() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}).
decode(Msg) -> 'ACSE-1':decode('ACSE-apdu', Msg).
-check({aare, #'AARE-apdu'{result = Result}}) ->
+dispatch({aare, #'AARE-apdu'{result = Result}}) ->
case Result of
accepted -> ok;
_ -> error
end;
-check({rlre, _}) -> ok;
-check({abrt, _}) -> error.
+
+dispatch({rlre, _}) -> ok;
+
+dispatch({abrt, _}) -> error.