X-Git-Url: http://gitweb.scilab.org/?p=scilab.git;a=blobdiff_plain;f=scilab%2Fmodules%2Fscicos%2Fmacros%2Fscicos_scicos%2Fupdate_scs_m.sci;h=7388f600ef05fb3e489bdac6813a244d255f537e;hp=c0b69f67e5b5b6b9cde20162bc61a7e49f361ee1;hb=caf5f7fbf7ab55d815fc94d2acc0e0b7a547fa56;hpb=3ff3ccf497ece13c6f459414ecb2a89ca55dea84 diff --git a/scilab/modules/scicos/macros/scicos_scicos/update_scs_m.sci b/scilab/modules/scicos/macros/scicos_scicos/update_scs_m.sci index c0b69f6..7388f60 100644 --- a/scilab/modules/scicos/macros/scicos_scicos/update_scs_m.sci +++ b/scilab/modules/scicos/macros/scicos_scicos/update_scs_m.sci @@ -52,7 +52,7 @@ function scs_m_new = update_scs_m(scs_m,version) sprops = scs_m.props; T = getfield(1,scs_m.props); - T_txt = []; + T_txt = ""; for j=2:size(T,2) T_txt = T_txt + strsubst(T(1,j),"title","Title") + ... "=" + "sprops." + T(1,j); @@ -86,7 +86,7 @@ function scs_m_new = update_scs_m(scs_m,version) case "graphics" then ogra = o.graphics; G = getfield(1,ogra); - G_txt = []; + G_txt = ""; for l=2:size(G,2) G_txt = G_txt + G(1,l) + ... "=" + "ogra." + G(1,l); @@ -103,7 +103,7 @@ function scs_m_new = update_scs_m(scs_m,version) case "model" then omod = o.model; M = getfield(1,o.model); - M_txt = []; + M_txt = ""; for l=2:size(M,2) M_txt = M_txt + M(1,l) + ... "=" + "omod." + M(1,l); @@ -142,7 +142,7 @@ function scs_m_new = update_scs_m(scs_m,version) case "Link" then T = getfield(1,o); - T_txt = []; + T_txt = ""; for k=2:size(T,2) T_txt = T_txt + T(1,k) + ... "=" + "o." + T(1,k); @@ -161,14 +161,14 @@ function scs_m_new = update_scs_m(scs_m,version) scicos_graphics(),scicos_model()," ","TEXT_f") T = getfield(1,o); - T_txt = []; + T_txt = ""; for k=2:size(T,2) select T(k) //*********** graphics **********// case "graphics" then ogra = o.graphics; G = getfield(1,ogra); - G_txt = []; + G_txt = ""; for l=2:size(G,2) G_txt = G_txt + G(1,l) + ... "=" + "ogra." + G(1,l); @@ -183,24 +183,7 @@ function scs_m_new = update_scs_m(scs_m,version) //************* model ***********// case "model" then - omod = o.model; - M = getfield(1,o.model); - M_txt = []; - for l=2:size(M,2) - M_txt = M_txt + M(1,l) + ... - "=" + "omod." + M(1,l); - if l<>size(M,2) then - M_txt = M_txt + ","; - end - end - M_txt = "omod=scicos_model(" + M_txt + ")"; - execstr(M_txt) - //******** super block case ********// - if omod.sim=="super"|omod.sim=="csuper" then - rpar=update_scs_m(omod.rpar,version) - omod.rpar=rpar - end - o_new.model = omod; + // ignored by the MVC //*******************************// //************* other ***********//