unix commands added.
git-svn-id: https://www.dynare.org/svn/dynare/trunk@2698 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
ced9fc0d2a
commit
b181e6c0af
|
@ -1,4 +1,4 @@
|
||||||
function fMessageStatus(prtfrc, njob, waitbarString, waitbarTitle, Local, MasterName, DyMo)
|
function fMessageStatus(prtfrc, njob, waitbarString, waitbarTitle, Parallel, MasterName, DyMo)
|
||||||
|
|
||||||
% Copyright (C) 2009 Dynare Team
|
% Copyright (C) 2009 Dynare Team
|
||||||
%
|
%
|
||||||
|
@ -19,14 +19,14 @@ function fMessageStatus(prtfrc, njob, waitbarString, waitbarTitle, Local, Master
|
||||||
|
|
||||||
global funcName
|
global funcName
|
||||||
|
|
||||||
if nargin<4,
|
if nargin<5,
|
||||||
Local=1;
|
Parallel.Local=1;
|
||||||
end
|
end
|
||||||
|
|
||||||
save(['comp_status_',funcName,int2str(njob)],'prtfrc','njob','waitbarString','waitbarTitle');
|
save(['comp_status_',funcName,int2str(njob)],'prtfrc','njob','waitbarString','waitbarTitle');
|
||||||
if Local==0,
|
if Parallel.Local==0,
|
||||||
if isunix,
|
if isunix,
|
||||||
% copyfile(['comp_status_',funcName,int2str(njob),'.mat'],['\\',MasterName,'\',DyMo(1),'$\',DyMo(4:end),'\']);
|
system(['scp comp_status_',funcName,int2str(njob),'.mat ',Parallel.user,'@',MasterName,':',DyMo]);
|
||||||
else
|
else
|
||||||
copyfile(['comp_status_',funcName,int2str(njob),'.mat'],['\\',MasterName,'\',DyMo(1),'$\',DyMo(4:end),'\']);
|
copyfile(['comp_status_',funcName,int2str(njob),'.mat'],['\\',MasterName,'\',DyMo(1),'$\',DyMo(4:end),'\']);
|
||||||
end
|
end
|
||||||
|
|
Loading…
Reference in New Issue