static_project_filename

 project filename is preserved in this function.
 User can get/set by set_project_filename/get_projectfilename.

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function project_filename = static_project_filename(command, filename)
0002 % project filename is preserved in this function.
0003 % User can get/set by set_project_filename/get_projectfilename.
0004 %
0005 % Copyright (C) 2011, ATR All Rights Reserved.
0006 % License : New BSD License(see VBMEG_LICENSE.txt)
0007 
0008 mlock; % not to clear by clear command
0009 persistent preserved_filename;
0010 
0011 switch(command)
0012     case 'get'
0013          project_filename = preserved_filename;
0014     case 'set'
0015          preserved_filename = filename;
0016     otherwise
0017          error('static_project_filename(''get'' or ''set'', project_filename');
0018 end