From 5a6df738a3019b34f2f47c8da7db6f84994570cd Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Fri, 30 Oct 2015 12:24:12 +0100 Subject: Use macros --- src/rose.erl | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) (limited to 'src/rose.erl') diff --git a/src/rose.erl b/src/rose.erl index 78cfb14..441fa05 100644 --- a/src/rose.erl +++ b/src/rose.erl @@ -2,6 +2,7 @@ -export([decode/1, invoke/2, dispatch/1]). +-include("opcodes.hrl"). -include("Remote-Operations-Generic-ROS-PDUs.hrl"). decode(Data) -> @@ -20,17 +21,17 @@ invoke(Op, {ok, Data}) -> dispatch({invoke, #'Invoke'{invokeId = Id, opcode = Op, argument = Data}}) -> counter:set(Id), case Op of - {local, 21} -> + ?EVENT -> ok; - {local, 51} -> + ?ESCAPE -> {ok, Esc} = escape:decode(Data), io:format("Esc ~p~n", [Esc]), ok; - {local, 71} -> + ?MONITOR -> ok; - {local, 74} -> + ?SNAPSHOT -> ok; - {local, 211} -> + ?STATUS -> io:format("Status: ~p~n", [status:value(Data)]), return(Id, Op, status:encode()); _ -> @@ -53,7 +54,7 @@ dispatch({reject, #'Reject'{invokeId = Id, problem = Problem}}) -> dispatch(#'ReturnResult_result'{opcode = Op, result = Data}) -> case Op of - {local, 74} -> + ?SNAPSHOT -> {ok, Status} = snapshot:decode(Data), io:format("Result: ~p~n", [Status]); _ -> -- cgit v1.2.3