Add license header
Pierre Marechal [Fri, 15 Feb 2008 14:02:35 +0000 (14:02 +0000)]
21 files changed:
scilab/modules/functions/examples/demo.sce
scilab/modules/functions/examples/f.sci
scilab/modules/functions/examples/g.sci
scilab/modules/functions/macros/buildmacros.sce
scilab/modules/functions/macros/check_gateways.sci
scilab/modules/functions/macros/createfun.sci
scilab/modules/functions/macros/fun2string.sci
scilab/modules/functions/macros/genlib.sci
scilab/modules/functions/macros/genlib_old.sci
scilab/modules/functions/macros/get_function_path.sci
scilab/modules/functions/macros/get_profile.sci
scilab/modules/functions/macros/getd.sci
scilab/modules/functions/macros/head_comments.sci
scilab/modules/functions/macros/macrovar.sci
scilab/modules/functions/macros/plotprofile.sci
scilab/modules/functions/macros/profile.sci
scilab/modules/functions/macros/showprofile.sci
scilab/modules/functions/macros/warnobsolete.sci
scilab/modules/functions/scripts/buildmacros/buildmacros.sce
scilab/modules/functions/scripts/buildmacros/cleanmacros.sce
scilab/modules/functions/scripts/buildmacros/loadgenlib.sce

index d2ec143..5fb6b78 100644 (file)
@@ -1,6 +1,13 @@
-//============================
-// Allan CORNET 
-// INRIA 2007
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 //============================
 // Example How to do and use a librarie
 //============================
index e65e3d5..8c81be5 100644 (file)
@@ -1,7 +1,17 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 //============================
 // Example How to do a function
 //============================
+
 function [x]=f(y)
   x=y+10;
 endfunction
-//============================
\ No newline at end of file
index 6b295ea..56e6cfe 100644 (file)
@@ -1,7 +1,17 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 //============================
 // Example How to do a function
 //============================
+
 function [z]=g(x,y)
   z=x+y;
 endfunction
-//============================
\ No newline at end of file
index 606e3f6..df82353 100644 (file)
@@ -1,9 +1,16 @@
-//------------------------------------
-// Allan CORNET INRIA 2005
-//------------------------------------
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
+
 if (isdef('genlib') == %f) then
   exec(SCI+'/modules/functions/scripts/buildmacros/loadgenlib.sce');
 end
-//------------------------------------
+
 genlib('functionslib','SCI/modules/functions/macros',%f,%t);
-//------------------------------------
index beea9b8..fd7eaa9 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 //------------------------------------
 // Allan CORNET INRIA 2007
 //------------------------------------
index e63bdeb..46257ba 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2003-2008 - INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function %fun=createfun(t)
   //given t a string vector where first line gives the function calling
   //sequence and the following the function instructions, it returns et
index aa4c3c2..d46fcb4 100644 (file)
@@ -1,6 +1,15 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function txt=fun2string(fun,nam)
-// Copyright INRIA
-// Author Serge Steer  
+
 // form  syntax to scilab of a compiled function
 //%Parameters
 // lst   : list, represents the interpreted code of the Scilab function given by macr2lst
@@ -53,7 +62,6 @@ function txt=ins2sci(lst,ilst)
 // traduit un ensemble d'instructions debutant a l'adresse ilst de la
 // liste courante lst
 //!
-// Copyright INRIA
 // Author Serge Steer  
   nlst=size(lst)
   level;level(2)=0;
@@ -72,7 +80,6 @@ endfunction
 function txt=cla2sci(clause)
 // traduit une clause (if while for select)
 //!
-// Copyright INRIA
 // Author Serge Steer  
   typ=clause(1)
   txt=''
@@ -161,7 +168,6 @@ endfunction
 function [txt,ilst]=cod2sci(lst,ilst)
 //
 //!
-// Copyright INRIA
 // Author Serge Steer 
   nlst=size(lst)
   txt=''
@@ -307,7 +313,6 @@ function [txt,ilst]=cod2sci(lst,ilst)
 endfunction
 
 function [stk,txt,ilst]=exp2sci(lst,ilst)
-// Copyright INRIA
 // Author Serge Steer  
   nlst=size(lst)
   top=0
@@ -483,7 +488,6 @@ endfunction
 
 function [stk,top]=func2sci(op,stk)
 // translate all functions calls
-// Copyright INRIA
 // Author Serge Steer 
   lhs=evstr(op(4)) 
   rhs=max(evstr(op(3)) ,0)
@@ -518,7 +522,6 @@ function [stk,txt,top]=_m2sci()
 endfunction
 
 function [stk,txt,top]=_a2sci()
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);
@@ -530,7 +533,6 @@ endfunction
 
 function [stk,top,txt]=get2sci(nam,stk,top)
 // Translate the named variable acquisition
-// Copyright INRIA  
 // Author Serge Steer  
   txt=[]
   top=top+1
@@ -538,7 +540,6 @@ function [stk,top,txt]=get2sci(nam,stk,top)
 endfunction
 
 function [stk,top]=sci_gener(nam)
-// Copyright INRIA  
 // Author Serge Steer  
   RHS=[]
   for k=1:rhs
@@ -560,7 +561,6 @@ function [stk,top]=sci_gener(nam)
 endfunction
 
 function [stk,txt,top]=_c2sci()
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   m=evstr(op(3));n=evstr(op(4))
@@ -622,7 +622,6 @@ function [stk,txt,top]=_c2sci()
 endfunction
 
 function opstable()
-// Copyright INRIA
 // Author Serge Steer  
   quote=''''
   logics=['==','<','>','<=','>=','<>']
@@ -665,7 +664,6 @@ endfunction
 
 function [stk,top]=num2sci(val,stk)
 // traduit la definition d'un nombre
-// Copyright INRIA
 // Author Serge Steer  
   top=top+1
   stk(top)=list(val,'0')
@@ -681,20 +679,17 @@ function [stk,txt,top]=_log2sci()
 endfunction
 
 function txt=rhsargs(args)
-// Copyright INRIA
 // Author Serge Steer  
   txt='('+strcat(args,', ')+')'
 endfunction
 
 function txt=lhsargs(args)
-// Copyright INRIA
 // Author Serge Steer  
   txt='['+strcat(args,', ')+']'
 endfunction
 
 function [stk,txt,top]=_p2sci()
 // ^
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);
@@ -709,7 +704,6 @@ function [stk,txt,top]=_p2sci()
 endfunction
 
 function [txt]=indentsci(txt)
-// Copyright INRIA
 // Author Serge Steer  
   k=find(txt<>'')
   if k<>[] then
@@ -724,7 +718,6 @@ function lst=mmodlst(lst)
 // [[a,b],c]
 // [[a;b];c]
 // to a single one  whenever possible 
-// Copyright INRIA
 // Author Serge Steer  
   void=['0','0','0','0']
   nlst=size(lst);top=0
@@ -820,7 +813,6 @@ endfunction
 
 function [stk,txt,top]=_02sci()
 // translate .'
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top)
@@ -830,7 +822,6 @@ endfunction
 
 function [stk,txt,top]=_52sci()
 // generate code for ~
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top)
@@ -840,7 +831,6 @@ endfunction
 
 function [stk,txt,top]=_d2sci()
 // ./
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);top=top-1;
@@ -853,7 +843,6 @@ endfunction
 
 function [stk,txt,top]=_e2sci()
 // generate code for extraction
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   rhs=maxi(0,abs(evstr(op(3)))-1)
@@ -897,7 +886,6 @@ endfunction
 
 function [stk,txt,top]=_g2sci()
 // Generate code for |
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);
@@ -909,7 +897,6 @@ endfunction
 
 function [stk,txt,top]=_h2sci()
 // Generate code for  &
-// Copyright INRIA
 // Author Serge Steer  
   s2=stk(top);s1=stk(top-1);
   txt=[]
@@ -924,7 +911,6 @@ endfunction
 
 function [stk,txt,top]=_i2sci()
 // Generate code for insertion
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   rhs=abs(evstr(op(3)))-2
@@ -970,7 +956,6 @@ endfunction
 
 function [stk,txt,top]=_imp2sci()
 //code for 1:n
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   if op(3)=='2' then
@@ -984,7 +969,6 @@ endfunction
 
 function [stk,txt,top]=_j2sci()
 // Generates code for .^
-// Copyright INRIA
 // Author Serge Steer  
 
   s2=stk(top);s1=stk(top-1);
@@ -1002,7 +986,6 @@ endfunction
 
 function [stk,txt,top]=_l2sci()
 //  \
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);top=top-1;
@@ -1016,7 +999,6 @@ endfunction
 
 function [stk,txt,top]=_q2sci()
 //  .\
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);top=top-1;
@@ -1028,7 +1010,6 @@ endfunction
 
 function [stk,txt,top]=_r2sci()
 //  /
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top);s1=stk(top-1);top=top-1;
@@ -1042,7 +1023,6 @@ endfunction
 
 function [stk,txt,top]=_s2sci()
 // Generates code for substraction and sign change -
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top)
@@ -1059,7 +1039,6 @@ endfunction
 
 function [stk,txt,top]=_t2sci()
 // Generates code for transposition
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s2=stk(top)
@@ -1069,7 +1048,6 @@ endfunction
 
 function [stk,txt,top]=_x2sci()
 // Generates code for .*  
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s1=stk(top-1)
@@ -1085,7 +1063,6 @@ function [stk,txt,top]=_x2sci()
 endfunction
 
 function t=catcode(a,b)
-// Copyright INRIA
 // Author Serge Steer  
 
   if a==[] then 
@@ -1098,7 +1075,6 @@ function t=catcode(a,b)
 endfunction
 
 function T=splitexp(t)
-// Copyright INRIA
 // Author Serge Steer  
   T=[]
   for i=1:size(t,'*')
@@ -1118,7 +1094,6 @@ function T=splitexp(t)
 endfunction
 
 function [stk,txt,top]=_u2sci()
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s1=stk(top-1)
@@ -1135,7 +1110,6 @@ endfunction
 
 function [stk,txt,top]=_k2sci()
 //generates code for .*.
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s1=stk(top-1)
@@ -1152,7 +1126,6 @@ endfunction
 
 function [stk,txt,top]=_v2sci()
 //generates code for /.
-// Copyright INRIA
 // Author Serge Steer  
   
   txt=[]
@@ -1170,7 +1143,6 @@ endfunction
 
 function [stk,txt,top]=_y2sci()
 //generates code for ./.
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s1=stk(top-1)
@@ -1187,7 +1159,6 @@ endfunction
 
 function [stk,txt,top]=_z2sci()
 //generates code for .\.
-// Copyright INRIA
 // Author Serge Steer  
 
   txt=[]
@@ -1205,7 +1176,6 @@ endfunction
 
 function [stk,txt,top]=_w2sci()
 //generates code for .\
-// Copyright INRIA
 // Author Serge Steer  
   txt=[]
   s1=stk(top-1)
index bc06ced..be24192 100644 (file)
@@ -1,7 +1,17 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+// Copyright (C) ENPC
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function genlib(nam,path,force,verbose,names)
        
        // get all .sci files in the specified directory
-       // Copyright Inria/Enpc
        
        if exists('force','local')==0 then force = %f,end
        if exists('verbose','local')==0 then verbose = %f,end
index 89fa429..f249e9e 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2006-2008 - INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function genlib_old(nam,path,force,verbose,names)
 // Similar to genlib.
 // This function is only for compatibilty for old toolboxes where 
index a77d388..7dd7fc7 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function path=get_function_path(name)
 libname=whereis(name)
 if libname==[] then
index 6de340d..dcc3a5e 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function count=get_profile(lst,ilst)
 count=[]
 ops=0
index fcc5346..e72c929 100644 (file)
@@ -1,6 +1,16 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+// Copyright (C) ENPC
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function getd(path)
 // get all .sci files in the specified directory
-// Copyright INRIA/Enpc 
   
   [lhs,rhs]=argn(0)
   if rhs<=0 then path='./',end
index 5a97b21..e273584 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2004-2008 - INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function head_comments(name,%paths)
 //displays the first comments of a function
   if exists('%paths')==0 then %paths='./',end
index 46d8258..fdecfc8 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 1992-2008 - INRIA - Serge STEER <serge.steer@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function vars=macrovar(macro)
 // Returns in a list the set of varibles used by a macro
 //    mac  : macro
@@ -8,8 +18,6 @@ function vars=macrovar(macro)
 //           called : macros called
 //           locals : local variables
 //!
-//origin S Steer inria 1992
-// Copyright INRIA
 if type(macro)==11 then comp(macro),end
 if type(macro)<>13 then error(gettext("Argument to macrovars must be a macro!")),end
 lst=macr2lst(macro);
index 3e2c98d..5505226 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function plotprofile(fun) 
   
   sep="="
index 471ddef..349b9be 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function count=profile(fun)
 if type(fun)==13 then
   lst=macr2lst(fun)
index 509a73d..233eb91 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 function showprofile(fun)
 lst=macr2lst(fun)
 count=profile(lst)
index 15be489..ed2bbf6 100644 (file)
@@ -1,3 +1,13 @@
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - INRIA - Bruno JOFRET <bruno.jofret@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 //
 //  -*- Scilab -*-
 //
@@ -7,8 +17,6 @@
 // Started on  Thu Feb 14 10:33:50 2008 bruno
 // Last update Thu Feb 14 11:06:16 2008 bruno
 //
-// Copyright INRIA 2008
-//
 
 // This function is to warn user that he's using a deprecated function
 
index e183f43..469c9eb 100644 (file)
@@ -1,9 +1,17 @@
-// ------------------------------------
-// Allan CORNET
-// INRIA 2006
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2006-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 // ------------------------------------
 //warning('off'); // disable warnings
 // ------------------------------------
+
 if (isdef('genlib') == %f) then
   exec(SCI+'/modules/functions/scripts/buildmacros/loadgenlib.sce');
 end
index 572e563..2482597 100644 (file)
@@ -1,7 +1,13 @@
-// ------------------------------------
-// Allan CORNET
-// INRIA 2006
-// ------------------------------------
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2006-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 lines(0);
 
 CurrentDirectory=pwd();
index ceac56e..cbc54a6 100644 (file)
@@ -1,9 +1,16 @@
-// ------------------------------------
-// Allan CORNET
-// INRIA 2007
-// ------------------------------------
+
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2007-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+
 // Warning : order !!
 // list of  : filename , module
+
 listmacrostoload = ['fileparts','fileio';
   'getshell','core';
   'pathconvert','fileio';