aboutsummaryrefslogtreecommitdiffstats
path: root/lib/runtime_tools/src/inviso_autostart_server.erl
diff options
context:
space:
mode:
authorKenneth Lundin <[email protected]>2010-08-24 14:36:59 +0200
committerKenneth Lundin <[email protected]>2010-08-24 14:36:59 +0200
commitaa03d31406cc9dd1e9b0e7b335189abac5208fcd (patch)
treea4ca9161dd89c0c22fc728d1b500dc7699212d1d /lib/runtime_tools/src/inviso_autostart_server.erl
parentbdfd2aaa1d402b3dd393a7820432f8f76e248ee1 (diff)
downloadotp-aa03d31406cc9dd1e9b0e7b335189abac5208fcd.tar.gz
otp-aa03d31406cc9dd1e9b0e7b335189abac5208fcd.tar.bz2
otp-aa03d31406cc9dd1e9b0e7b335189abac5208fcd.zip
patch from user regarding inviso_autostart_server in runtime_tools
OTP-8783
Diffstat (limited to 'lib/runtime_tools/src/inviso_autostart_server.erl')
-rw-r--r--lib/runtime_tools/src/inviso_autostart_server.erl12
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/runtime_tools/src/inviso_autostart_server.erl b/lib/runtime_tools/src/inviso_autostart_server.erl
index 5af96e4e39..1e352822f4 100644
--- a/lib/runtime_tools/src/inviso_autostart_server.erl
+++ b/lib/runtime_tools/src/inviso_autostart_server.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2006-2009. All Rights Reserved.
+%% Copyright Ericsson AB 2006-2010. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -84,7 +84,7 @@ init(ArgsFromConfig) ->
case get_tracerdata_opts(ArgsFromConfig) of
{ok,TracerData} -> % Otherwise we can not start a trace!
case inviso_rt:init_tracing(TracerData) of
- {ok,_} -> % Ok, tracing has been initiated.
+ {ok,_Response} -> % Ok, tracing has been initiated.
case get_cmdfiles_opts(ArgsFromConfig) of
{ok,CmdFiles} -> % List of cmd-files.
Bindings=get_initialbindings_opts(ArgsFromConfig),
@@ -164,11 +164,11 @@ interpret_cmd_files([{FileName,LocalBindings}|Rest],GlobalBindings,Translations,
Bindings=join_local_and_global_vars(LocalBindings,GlobalBindings),
interpret_cmd_files_1(FileName,Bindings,Translations,Dbg),
interpret_cmd_files(Rest,GlobalBindings,Translations,Dbg);
-interpret_cmd_files([FileName|Rest],GlobalBindings,Translations,Dbg) ->
- interpret_cmd_files_1(FileName,GlobalBindings,Translations,Dbg),
- interpret_cmd_files(Rest,GlobalBindings,Translations,Dbg);
interpret_cmd_files([],_,_,_) -> % Done, return nothing significant!
- true.
+ true;
+interpret_cmd_files(FileName,GlobalBindings,Translations,Dbg) ->
+ interpret_cmd_files_1(FileName,GlobalBindings,Translations,Dbg).
+% interpret_cmd_files(Rest,GlobalBindings,Translations,Dbg).
%% This is "inline" inviso calls.
interpret_cmd_files_1({inviso,F,Args},Bindings,Translations,Dbg) ->