replaces getf (obsolete) by exec
Allan CORNET [Wed, 13 May 2009 13:44:20 +0000 (15:44 +0200)]
49 files changed:
scilab/modules/cacsd/demos/pendulum/pendule.dem
scilab/modules/fileio/sci_gateway/c/sci_fullpath.c
scilab/modules/graphics/demos/fec/fec.ex1
scilab/modules/graphics/demos/fec/fec.ex2
scilab/modules/graphics/demos/fec/fec.ex4
scilab/modules/graphics/demos/misc/oscil.dem
scilab/modules/graphics/demos/surface/surfaces.dem
scilab/modules/gui/tests/unit_tests/checkbox.dia.ref
scilab/modules/gui/tests/unit_tests/checkbox.tst
scilab/modules/gui/tests/unit_tests/edit.dia.ref
scilab/modules/gui/tests/unit_tests/edit.tst
scilab/modules/gui/tests/unit_tests/frame.dia.ref
scilab/modules/gui/tests/unit_tests/frame.tst
scilab/modules/gui/tests/unit_tests/listbox.dia.ref
scilab/modules/gui/tests/unit_tests/listbox.tst
scilab/modules/gui/tests/unit_tests/popupmenu.dia.ref
scilab/modules/gui/tests/unit_tests/popupmenu.tst
scilab/modules/gui/tests/unit_tests/pushbutton.dia.ref
scilab/modules/gui/tests/unit_tests/pushbutton.tst
scilab/modules/gui/tests/unit_tests/radiobutton.dia.ref
scilab/modules/gui/tests/unit_tests/radiobutton.tst
scilab/modules/gui/tests/unit_tests/slider.dia.ref
scilab/modules/gui/tests/unit_tests/slider.tst
scilab/modules/gui/tests/unit_tests/text.dia.ref
scilab/modules/gui/tests/unit_tests/text.tst
scilab/modules/interpolation/help/en_US/linear_interpn.xml
scilab/modules/interpolation/help/en_US/splin3d.xml
scilab/modules/interpolation/help/pt_BR/linear_interpn.xml
scilab/modules/interpolation/help/pt_BR/splin3d.xml
scilab/modules/m2sci/help/en_US/mfile2sci.xml
scilab/modules/m2sci/help/fr_FR/mfile2sci.xml
scilab/modules/m2sci/macros/kernel/changevarname.sci
scilab/modules/m2sci/macros/kernel/funcall2sci.sci
scilab/modules/m2sci/tests/nonreg_tests/bug_683.dia.ref
scilab/modules/m2sci/tests/nonreg_tests/bug_683.tst
scilab/modules/optimization/macros/lmitool.sci
scilab/modules/optimization/macros/pencost.sci
scilab/modules/optimization/tests/unit_tests/colnew.dia.ref
scilab/modules/optimization/tests/unit_tests/colnew.tst
scilab/modules/scicos/demos/scicos.dem
scilab/modules/scicos/demos/scicos_learn.sci
scilab/modules/scicos/demos/scicos_play.sci
scilab/modules/scicos/demos/tut5
scilab/modules/scicos/macros/scicos_scicos/Addnewblock_.sci
scilab/modules/scicos/macros/scicos_scicos/CodeGeneration_.sci
scilab/modules/scicos/macros/scicos_scicos/buildnewblock.sci
scilab/modules/scicos/tests/unit_tests/scicos_tests.sci
scilab/modules/string/tests/unit_tests/fun2string.dia.ref
scilab/modules/string/tests/unit_tests/fun2string.tst

index d7d8a20..efc5947 100644 (file)
@@ -8,8 +8,8 @@
 mode(-1)
 path=get_absolute_file_path('pendule.dem');
 
-getf(path+'simulation.sci')
-getf(path+'graphics.sci')
+exec(path+'simulation.sci')
+exec(path+'graphics.sci')
 
 //disable displayed lines control
 display_props=lines(); lines(0)
index 55c7bc7..d6e278c 100644 (file)
@@ -37,10 +37,6 @@ int sci_fullpath(char *fname,unsigned long fname_len)
                /* Bug 3089 */
                relPath = cstk(l1);
 
-#ifdef _MSC_VER
-#else
-#endif
-
                if( get_full_path( fullpath, relPath, PATH_MAX*4 ) != NULL )
                {
                        char *Output=NULL;
index 379fb57..0acce24 100644 (file)
@@ -8,7 +8,7 @@
 
 mode(0)
 path=get_absolute_file_path('fec.ex1');
-getf(path+'fec_demo.sci');
+exec(path+'fec_demo.sci');
 xbasc();
 xset("colormap",jetcolormap(128));
 new_style = get("figure_style")=="new";
index e15f0bf..401529b 100644 (file)
@@ -12,7 +12,7 @@
 mode(0);
 
 path=get_absolute_file_path('fec.ex2');
-getf(path+'fec_demo.sci');
+exec(path+'fec_demo.sci');
 
 curFig             = scf(100001);
 clf(curFig,"reset");
index 585fb17..9db6469 100644 (file)
@@ -9,7 +9,7 @@
 mode(0);
 
 path=get_absolute_file_path('fec.ex4');
-getf(path+'fec_demo.sci');
+exec(path+'fec_demo.sci');
 
 curFig             = scf(100001);
 clf(curFig,"reset");
index c232b99..e09d254 100644 (file)
@@ -22,7 +22,7 @@
 // 
    l=10; r=1000; c=0.000001; e=10; pe1=0.002; pe2=0.0001;
 // 
-   getf('SCI/demos/misc/oscil.sci')
+   exec('SCI/demos/misc/oscil.sci')
    halt()
 // initialization : 
 // --------------   
index 7430182..97511b7 100644 (file)
@@ -24,8 +24,8 @@ demolist=['Surface with holes 1','xbasc();showinstr(hole3d);hole3d();';
          'Black Hole','xbasc();showinstr(bh);bh(50);';
          'Riemann surface (n=2)','xbasc();showinstr(cplxroot);cplxroot(2,20,130,45);']
 
-getf(path+'Macros.sci');
-getf(path+'surfaces.sci');
+exec(path+'Macros.sci');
+exec(path+'surfaces.sci');
 
 while %t then
   num=x_choose(demolist(:,1),'Surface demos (From Euler)');
index 99b2c48..4398385 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java checkboxes
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("checkbox");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "checkbox");
index 6092b7c..fa06057 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("checkbox");
 
 // Default relief value
index 6df7bc3..1a9ac5e 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java edits
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("edit");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "edit");
index 111a4f2..26dce1c 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("edit");
 
 // Default relief value
index 9d1e8ae..261ee6a 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java frames
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("frame");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "frame");
index bbe70fa..0a62893 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("frame");
 
 // Default relief value
index 87ef9b3..6fe1079 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java listbox
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("listbox");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "listbox");
index 7f06a89..f88c6e9 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("listbox");
 
 // Default relief value
index 1116275..a67e2df 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java popupmenu
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("popupmenu");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "popupmenu");
index d7ab98d..021a01b 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("popupmenu");
 
 // Default relief value
index 21e0535..1ae3c57 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java pushbuttons
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("pushbutton");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "pushbutton");
index ed9ebf4..4d410e5 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("pushbutton");
 
 // Default relief value
index 8de3fce..3f4c80c 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java radiobuttons
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("radiobutton");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "radiobutton");
index 9799a64..2080ffb 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("radiobutton");
 
 // Default relief value
index b11fa12..e2af8f9 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java slider
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("slider");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "slider");
index c2be125..66d2b0b 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("slider");
 
 // Default relief value
index 917a506..3f4f498 100644 (file)
@@ -7,7 +7,7 @@
 // Unitary tests for Scilab Java texts
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("text");
 // Default relief value
 h = uicontrol("parent", scf(), "style", "text");
index b0f199f..7c1902b 100644 (file)
@@ -9,7 +9,7 @@
 
 // Exec tests common to all uicontrols
 clear uicontrol_generic_test
-getf("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
+exec("SCI/modules/gui/tests/unit_tests/uicontrol_generic_test.sci");
 uicontrol_generic_test("text");
 
 // Default relief value
index fd214ec..e7ec29e 100644 (file)
@@ -238,7 +238,7 @@ xselect()
 // example 4 : trilinear interpolation (see splin3d help
 //             page which have the same example with
 //             tricubic spline interpolation)
-getf("SCI/demos/interp/interp_demo.sci") 
+exec("SCI/demos/interp/interp_demo.sci") 
 func =  "v=(x-0.5).^2 + (y-0.5).^3 + (z-0.5).^2";
 deff("v=f(x,y,z)",func);
 n = 5; 
index 5fa92d8..dad7de7 100644 (file)
@@ -128,7 +128,7 @@ er = max(abs(vp_exact - vp_interp))
 //            same example with trilinear interpolation)
 // =============================================================================
 
-getf("SCI/modules/interpolation/demos/interp_demo.sci")
+exec("SCI/modules/interpolation/demos/interp_demo.sci")
 func =  "v=(x-0.5).^2 + (y-0.5).^3 + (z-0.5).^2";
 deff("v=f(x,y,z)",func);
 n = 5; 
index de06841..e0abf8d 100644 (file)
@@ -225,7 +225,7 @@ xselect()
 // exemplo 4 : interpolação trilinear (ver ajuda de splin3d
 //             que tem os mesmos exemplos com
 //             interpolação por spline tricúbico)
-getf("SCI/demos/interp/interp_demo.sci") 
+exec("SCI/demos/interp/interp_demo.sci") 
 func =  "v=(x-0.5).^2 + (y-0.5).^3 + (z-0.5).^2";
 deff("v=f(x,y,z)",func);
 n = 5; 
index 66d9281..667b97b 100644 (file)
@@ -125,7 +125,7 @@ er = max(abs(vp_exact - vp_interp))
 //            mesmo exemplo com interpolação trilinear)
 // =============================================================================
 
-getf("SCI/modules/interpolation/demos/interp_demo.sci")
+exec("SCI/modules/interpolation/demos/interp_demo.sci")
 func =  "v=(x-0.5).^2 + (y-0.5).^3 + (z-0.5).^2";
 deff("v=f(x,y,z)",func);
 n = 5; 
index fb16511..56957eb 100644 (file)
@@ -178,7 +178,7 @@ mfile2sci(TMPDIR+'/rot90.m',TMPDIR)
 // Show the new code
 write(%io(2),read(TMPDIR+'/rot90.sci',-1,1,'(a)'))
 // get it into scilab
-getf(TMPDIR+'/rot90.sci')
+exec(TMPDIR+'/rot90.sci')
 // Execute it
 m=rand(4,2);rot90(m,1)
  
index 8412b68..c6ea8df 100644 (file)
@@ -178,7 +178,7 @@ mfile2sci(TMPDIR+'/rot90.m',TMPDIR)
 // Affichage du code
 write(%io(2),read(TMPDIR+'/rot90.sci',-1,1,'(a)'))
 // get it into scilab
-getf(TMPDIR+'/rot90.sci')
+exec(TMPDIR+'/rot90.sci')
 // Exécution du code
 m=rand(4,2);rot90(m,1)
  
index 02864ad..e3593b8 100644 (file)
@@ -29,7 +29,7 @@ else
 end
 
 // Compilation
-getf(fun);
+exec(fun);
 var=who('get');
 indvar=find(var==funname);
 funvect=var(indvar(1):-1:1);
index 940b75c..777133f 100644 (file)
@@ -50,9 +50,9 @@ elseif res_path==[] then
   sci_equiv=default_trad(mtlb_expr)  
 else
   sci_tmpfile =pathconvert(TMPDIR)+pathconvert(fnam)+"sci_"+funname+".sci"
-  tmpierr=execstr("getf(sci_tmpfile)","errcatch");errclear();
+  tmpierr=execstr("exec(sci_tmpfile)","errcatch");errclear();
   sci_file=res_path+"sci_"+funname+".sci"
-  ierr=execstr("getf(sci_file)","errcatch");errclear(); 
+  ierr=execstr("exec(sci_file)","errcatch");errclear(); 
   if tmpierr==0 then 
     execstr("[sci_equiv]=sci_"+mtlb_expr.name+"(mtlb_expr)");  
   // If a translation function exists
@@ -76,7 +76,7 @@ else
         res=mfile2sci(path,res_path,%F,%T)
       end
       if res==1 then
-        getf(sci_file)
+        exec(sci_file)
        ierr=execstr("[sci_equiv]=sci_"+mtlb_expr.name+"(mtlb_expr)","errcatch");
        if ierr<>0 then
          error(msprintf(gettext("Error while executing : [sci_equiv]=sci_%s(mtlb_expr)."),mtlb_expr.name));
index 67bceb1..70ba527 100644 (file)
@@ -76,8 +76,8 @@ mfile2sci(MFILE2,TMPDIR);
 // Load functions into Scilab
 SCIFILE1=TMPDIR+"/test_cell1.sci";
 SCIFILE2=TMPDIR+"/test_cell2.sci";
-getf(SCIFILE1);
-getf(SCIFILE2);
+exec(SCIFILE1);
+exec(SCIFILE2);
 // Exec functions
 [ce1,ce2] = test_cell1(23);
 [ce3,ce4] = test_cell1([1 2]);
index 32e94be..deb6ed2 100644 (file)
@@ -43,8 +43,8 @@ mfile2sci(MFILE2,TMPDIR);
 SCIFILE1=TMPDIR+"/test_cell1.sci";
 SCIFILE2=TMPDIR+"/test_cell2.sci";
 
-getf(SCIFILE1);
-getf(SCIFILE2);
+exec(SCIFILE1);
+exec(SCIFILE2);
 
 // Exec functions
 [ce1,ce2] = test_cell1(23);
index 2884b2e..38fba24 100644 (file)
@@ -184,7 +184,7 @@ messagebox([gettext('Welcome to LMITOOL');'      ';'   ';
         if RHS==0|RHS==1 then
           txtdo = ['    To solve your problem, you need to ';
               '1- load your functions using the command:';
-              '   getf('''+fname'+''')';
+              '   exec('''+fname'+''')';
               '2- Define '+DNAME+' and call function '+PROBNAME+' as follows:';
               '  '+'['+XNAME+']='+PROBNAME+'('+DNAME+')';
               '           Good luck! ';
@@ -196,7 +196,7 @@ messagebox([gettext('Welcome to LMITOOL');'      ';'   ';
           txtdo = [gettext('    To solve your problem, you need to ');
               gettext('1- edit file ')+fname
               gettext('2- load (and compile) your functions:');
-              '   getf('''+fname'+''')';
+              '   exec('''+fname'+''')';
               gettext('3- Define ')+DNAME+gettext(' and call ')+PROBNAME+gettext(' function:');
               '  '+'['+XNAME+']='+PROBNAME+'('+DNAME+')';
               gettext('To check the result, use [LME,LMI,OBJ]=')+PROBNAME+'_eval(list('+XNAME+'))']
index 080f5a9..a06fb88 100644 (file)
@@ -51,7 +51,7 @@ function [fpen,gpen,ind]=pencost(x,ind,fncts,ne,nc,cpen);
 //              1,0,x(2)]')
 //
 // 2-call scilab's optim function (after loading pencost.sci (this file));
-// getf('pencost.sci','c') 
+// exec('pencost.sci','c') 
 // ne=0;nc=2;x0=[4;7];
 // penalizing constant cpen=100;
 // [f,x]=optim(list(pencost,myproblem,ne,nc,cpen),x0)
index c01162f..0f52b61 100644 (file)
@@ -4,7 +4,7 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-getf(SCI+'/modules/differential_equations/tests/unit_tests/bvode_tst.sci');
+exec(SCI+'/modules/differential_equations/tests/unit_tests/bvode_tst.sci');
 [z,zf]=col1();
 if maxi(abs(z-zf))>1.e-5 then bugmes();quit;end
 [z,zf]=col2(0);
index a0e02d2..1bf8fc8 100644 (file)
@@ -5,7 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-getf(SCI+'/modules/differential_equations/tests/unit_tests/bvode_tst.sci');
+exec(SCI+'/modules/differential_equations/tests/unit_tests/bvode_tst.sci');
 
 
 [z,zf]=col1();
index 41bdbf2..cd54898 100644 (file)
@@ -80,7 +80,7 @@ while %t do
   case         'bouncing balls' then
     scicos('SCI/modules/scicos/demos/bounce.cosf');
 //  case 'Live demo' then
-//    getf('SCI/modules/scicos/demos/scicos_play.sci','n')
+//    exec('SCI/modules/scicos/demos/scicos_play.sci','n')
 //    scicos_play('SCI/modules/scicos/demos/live.dat')
   case 'sound demo' then  
     scicos('SCI/modules/scicos/demos/sound.cosf');
@@ -130,7 +130,7 @@ while %t do
        end
       end
       str='SCI/modules/scicos/demos/tut'+string(n)
-      getf('SCI/modules/scicos/demos/scicos_play.sci')
+      exec('SCI/modules/scicos/demos/scicos_play.sci')
       scicos_play(str)
       chdir(dirr)
     end
index 06b91f9..77786a8 100644 (file)
@@ -26,7 +26,7 @@ x_mdia=funptr('x_mdialog');clearfun('x_mdialog');newfun('x_mdialog1',x_mdia);
 c_cho=funptr('tk_choose');clearfun('tk_choose');newfun('tk_choose1',c_cho);
 xgetf=funptr('xgetfile');clearfun('xgetfile');newfun('xgetfile1',xgetf);
 //these function are redefined below
-getf SCI/demos/scicos/dialogs_learn.sci
+exec('SCI/demos/scicos/dialogs_learn.sci')
 tk_getfile=xgetfile
 tk_savefile=xgetfile
 tk_getcolor=getcolor
index 54bc062..a5e52e5 100644 (file)
@@ -56,7 +56,7 @@ names=[
     'do_exit'
     'x_matrix']
 for k=1:size(names,'r')
-  getf(get_function_path(names(k)))
+  exec(get_function_path(names(k)))
 end
 
 
@@ -150,7 +150,7 @@ deff('Comment_()',..
 
 
 
-getf('SCI/demos/scicos/dialogs_play.sci')
+exec('SCI/demos/scicos/dialogs_play.sci')
 execstr('tk_getfile=xgetfile')
 execstr('tk_savefile=xgetfile')
 tk_getcolor=getcolor
index f7d8d2f..eabc84f 100644 (file)
@@ -6,7 +6,7 @@
   We start with an empty diagram and before launching scicos,
   we load toto.sci (the block created in the previous tutorial):
   
-  getf toto.sci
+  exec toto.sci
   scicos
   
   o //OK
index 43379f7..54ef18b 100644 (file)
@@ -24,7 +24,7 @@ function Addnewblock_()
     [scs_m,%fct]=do_addnew(scs_m)
     if %fct<>[] then 
       if %fct<>emptystr() then
-       getf(%fct),  // requires loading function
+       exec(%fct),  // requires loading function
       end
     end
 endfunction
index 9dc80d5..b4a1f6d 100644 (file)
@@ -1565,7 +1565,7 @@ function  [ok,XX,alreadyran,flgcdgen,szclkINTemp,freof] = do_compile_superblock4
 
   if ok then
     //load the gui function
-    getf(rpat+'/'+rdnom+'_c.sci');
+    exec(rpat+'/'+rdnom+'_c.sci');
     //Change diagram superblock to new generated block
     XX=update_block(XX);
     execstr(rdnom+'_c=resume('+rdnom+'_c)')
index e5cf19a..09c3a86 100644 (file)
@@ -450,7 +450,7 @@ function SCode=gen_loader(blknam,for_link)
          'link(fileso,blknam,''c'');'
          '//** Load the gui function';
          'if fileinfo(DIR+blknam+''_c.sci'')<>[] then'
-         '  getf(DIR+blknam+''_c.sci'');'
+         '  exec(DIR+blknam+''_c.sci'');'
          'end']
 
   SCode=[SCode;
index 20d4764..4c12fe0 100644 (file)
@@ -144,15 +144,15 @@ endfunction
 function r=check_set_ports()
   r=%f
   funcprot(0)
-  getf('SCI/modules/scicos/macros/scicos_scicos/setvalue.sci')
+  exec('SCI/modules/scicos/macros/scicos_scicos/setvalue.sci')
   getvalue=setvalue;
   alreadyran=%f;  %scicos_prob=%f
   for i=1:nb
     if and(Blocs(i)~=["SUPER_f" "func_block" "scifunc_block" "GENERAL_f" "SOM_f" "CURV_f" "LOOKUP_f"]) then 
       if Blocs(i)=='fortran_block'|Blocs(i)=='c_block' then
-       getf('SCI/modules/scicos_blocks/macros/'+Blocs(i)+'.sci')
+       exec('SCI/modules/scicos_blocks/macros/'+Blocs(i)+'.sci')
       else
-       getf('SCI/modules/scicos_blocks/macros/'+Blocs(i)+'.sci')
+       exec('SCI/modules/scicos_blocks/macros/'+Blocs(i)+'.sci')
       end
       execstr('gui='+Blocs(i))
       o=gui('define');
index 96fe692..cbe6aac 100644 (file)
@@ -103,14 +103,14 @@ ref=["function []=foo()";
      "  z = 3;";
      "endfunction"];
 if or(fun2string(foo,'foo')<>ref) then bugmes();quit;end
-// with getf
+// with exec
 // ------------
 ref=["function []=foo()";
      "  y = 1";
      "  z = 3;";
      "endfunction"];
 mputl(ref,TMPDIR+'/foo.sci');
-getf(TMPDIR+'/foo.sci')
+exec(TMPDIR+'/foo.sci')
 if or(fun2string(foo,'foo')<>ref) then bugmes();quit;end
 // with nested functions
 // ---------------------
index 89f0d14..f30d42d 100644 (file)
@@ -105,14 +105,14 @@ ref=["function []=foo()";
      "endfunction"];
 if or(fun2string(foo,'foo')<>ref) then pause,end
 
-// with getf
+// with exec
 // ------------
 ref=["function []=foo()";
      "  y = 1";
      "  z = 3;";
      "endfunction"];
 mputl(ref,TMPDIR+'/foo.sci');
-getf(TMPDIR+'/foo.sci')
+exec(TMPDIR+'/foo.sci')
 if or(fun2string(foo,'foo')<>ref) then pause,end
 
 // with nested functions