add translator & XML2modelica
[scilab.git] / scilab / modules / scicos / src / translator / translation / versiondate.ml
1 (*\r
2    *  Translator \r
3    *\r
4    *  Copyright (C) 2005 - 2007 Imagine S.A.\r
5    *  For more information or commercial use please contact us at www.amesim.com\r
6    *\r
7    *  This program is free software; you can redistribute it and/or\r
8    *  modify it under the terms of the GNU General Public License\r
9    *  as published by the Free Software Foundation; either version 2\r
10    *  of the License, or (at your option) any later version.\r
11    *\r
12    *  This program is distributed in the hope that it will be useful,\r
13    *  but WITHOUT ANY WARRANTY; without even the implied warranty of\r
14    *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
15    *  GNU General Public License for more details.\r
16    *\r
17    *  You should have received a copy of the GNU General Public License\r
18    *  along with this program; if not, write to the Free Software\r
19    *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.   \r
20    *\r
21    *  This file is a template file that will be transformed to versiondate.ml \r
22    *  using sed that will replace the values (AUTO_UPDATE_DATE and AUTO_UPDATE_REV) \r
23    *  of the variables auto_updated_date and auto_updated_rev with the actual SVN \r
24    *  last update date and version. \r
25    *\r
26    *  On computers that doesn't have svn grep or sed you can simply copy\r
27    *  this file to versiondate.ml and modify it if you like.\r
28    *  \r
29    *  Since this file is automatically transformed using a sed command\r
30    *  the lines which set the variables auto_updated_date and auto_updated_rev \r
31    *  must be kept as they are (unless you want to change the sed command). \r
32    *  AJN 20/02/2008.\r
33 *)\r
34 \r
35 let default_date = "2008-04-01"\r
36 \r
37 let auto_updated_date = "AUTO_UPDATE_DATE"\r
38 let auto_updated_rev = "AUTO_UPDATE_REV"\r
39 \r
40 let print_versiondate () =\r
41   if auto_updated_date = "AUTO_UPDATE_DATE" then\r
42     Printf.printf "Build date is not known (%s).\n" default_date\r
43   else\r
44     Printf.printf "%s.\n" auto_updated_date;\r
45   if auto_updated_rev = "AUTO_UPDATE_REV" then\r
46     Printf.printf ""\r
47   else\r
48     Printf.printf "%s.\n" auto_updated_rev;\r
49 \r