unix commands added.

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2698 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
ratto 2009-05-27 10:28:28 +00:00
parent ced9fc0d2a
commit b181e6c0af
1 changed files with 5 additions and 5 deletions

View File

@ -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
%
@ -19,14 +19,14 @@ function fMessageStatus(prtfrc, njob, waitbarString, waitbarTitle, Local, Master
global funcName
if nargin<4,
Local=1;
if nargin<5,
Parallel.Local=1;
end
save(['comp_status_',funcName,int2str(njob)],'prtfrc','njob','waitbarString','waitbarTitle');
if Local==0,
if Parallel.Local==0,
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
copyfile(['comp_status_',funcName,int2str(njob),'.mat'],['\\',MasterName,'\',DyMo(1),'$\',DyMo(4:end),'\']);
end