From 001d672798fd0ed8d1f5a0d919170b51839614a5 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Wed, 28 Oct 2015 13:50:27 +0100 Subject: Shorten names --- acse.erl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'acse.erl') diff --git a/acse.erl b/acse.erl index 1ba1cf5..84b923c 100644 --- a/acse.erl +++ b/acse.erl @@ -3,24 +3,24 @@ -include("ACSE-1.hrl"). -include("CSTA-application-context-information-csta3.hrl"). --export([associate_request/0, release_request/0]). +-export([associate/0, release/0]). -export([decode/1, accepted/1]). -user_information() -> +ui() -> {ok, UI} = 'CSTA-application-context-information-csta3':encode( 'ACSEUserInformationForCSTA', {newDefinition, #'NewACSEUserInformationForCSTA'{cSTAVersion = [versionFive]}}), {'single-ASN1-type', UI}. -associate_request() -> +associate() -> 'ACSE-1':encode('ACSE-apdu', {aarq, #'AARQ-apdu'{ 'protocol-version' = [version1], 'application-context-name' = {1, 3, 12, 0, 218}, 'user-information' = [#'EXTERNAL'{ 'direct-reference' = {1, 3, 12, 0, 285, 200}, - encoding = user_information()}]}}). + encoding = ui()}]}}). -release_request() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}). +release() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}). decode(Msg) -> 'ACSE-1':decode('ACSE-apdu', Msg). -- cgit v1.2.3