summaryrefslogtreecommitdiff
path: root/cmdiface.erl
diff options
context:
space:
mode:
authorJoe Zhao <ztuowen@gmail.com>2014-06-09 20:24:43 +0800
committerJoe Zhao <ztuowen@gmail.com>2014-06-09 20:24:43 +0800
commit9adcb32af31d22a046881f5d690d068e232be773 (patch)
treecb18e4a25e1313946326cfbfe23b6f2d6aed288b /cmdiface.erl
parent6b768801841204ad2a173470201dbcc98bbd9aa6 (diff)
downloadlocal-9adcb32af31d22a046881f5d690d068e232be773.tar.gz
local-9adcb32af31d22a046881f5d690d068e232be773.tar.bz2
local-9adcb32af31d22a046881f5d690d068e232be773.zip
Comments & maintenance
Diffstat (limited to 'cmdiface.erl')
-rw-r--r--cmdiface.erl8
1 files changed, 4 insertions, 4 deletions
diff --git a/cmdiface.erl b/cmdiface.erl
index 3113c03..b44e0f4 100644
--- a/cmdiface.erl
+++ b/cmdiface.erl
@@ -21,7 +21,7 @@ reg_feedbackOps(Addr,Name,T,MsgReq,MsgRes,To) ->
fun () ->
rsbusserv ! {devicemon,comm,Addr,[]}
end,
- Pid = spawn(?MODULE,res_manip,[Init,Exit,To]),
+ Pid = spawn(?MODULE,res_manip,[Init,Exit,To,[0,Addr,MsgReq]]),
Call =
fun () ->
Pid ! rsbusserv:rsbusreq(Addr,MsgRes)
@@ -32,10 +32,10 @@ invoke_cmd(Addr,Name,MsgReq) ->
io:format("Command: ~p ~n",[Name]),
rsbusserv! {devicemon,comm,Addr,MsgReq}.
-res_manip(Init,Exit,To) ->
+res_manip(Init,Exit,To,Pre) ->
Init(),
receive
- {stat,_Type,Stat} -> To ! {self(),comm,Stat};
- {error,_Cause} -> ok
+ {stat,Type,Msg} -> To ! {self(),comm,Pre++[Type]++Msg};
+ {error,_Reason} -> ok
end,
Exit(). \ No newline at end of file