Mercurial > fem-fenics-eugenio
annotate post_install.m @ 140:d94b16927632
Delete useless file fter installation.
author | gedeone-octave <marcovass89@hotmail.it> |
---|---|
date | Mon, 09 Sep 2013 22:31:37 +0200 |
parents | 547763139e1a |
children | 22de20d78e27 |
rev | line source |
---|---|
59
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
1 |
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
2 function post_install (desc) |
127
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
3 |
59
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
4 private = fullfile (desc.dir, "private"); |
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
5 [status, msg] = mkdir (private); |
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
6 if (status != 1) |
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
7 error ("couldn't create private directory: %s", msg); |
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
8 endif |
127
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
9 [status, msg, msgid] = movefile ('./src/*.h', private, 'f'); |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
10 if (status != 1) |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
11 error ("couldn't copy file: %s", msg); |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
12 endif |
123
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
13 |
140
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
14 status = movefile ('./inst/generate_lhs.m', private, 'f'); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
15 status += movefile ('./inst/generate_rhs.m', private, 'f'); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
16 status += movefile ('./inst/generate_fs.m', private, 'f'); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
17 status += movefile ('./inst/generate_fun.m', private, 'f'); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
18 status += movefile ('./inst/generate_makefile.m', private, 'f'); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
19 if (status != 5) |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
20 error ("couldn't copy file: %s", msg); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
21 endif |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
22 |
123
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
23 func = fullfile (desc.dir, "@function"); |
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
24 [status, msg] = mkdir (func); |
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
25 if (status != 1) |
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
26 error ("couldn't create @function directory: %s", msg); |
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
27 endif |
31fb4c16dcb0
Polymorphism for the feavl() applied to objevt of type function.
gedeone-octave <marcovass89@hotmail.it>
parents:
83
diff
changeset
|
28 |
128
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
29 mesh = fullfile (desc.dir, "@mesh"); |
130
cea41875feb9
Fix error but still doesn't remove the file.
gedeone-octave <marcovass89@hotmail.it>
parents:
128
diff
changeset
|
30 [status, msg] = mkdir (mesh); |
128
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
31 if (status != 1) |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
32 error ("couldn't create @function directory: %s", msg); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
33 endif |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
34 |
127
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
35 [status, msg, msgid] = movefile ('./src/feval.oct', func, 'f'); |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
36 if (status != 1) |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
37 error ("couldn't copy file: %s", msg); |
64776e1f0530
Copy new function for polymorphism.
gedeone-octave <marcovass89@hotmail.it>
parents:
123
diff
changeset
|
38 endif |
128
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
39 |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
40 [status, msg, msgid] = movefile ('./src/save.oct', func, 'f'); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
41 if (status != 1) |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
42 error ("couldn't copy file: %s", msg); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
43 endif |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
44 |
135 | 45 new_name = fullfile (func, 'plot.oct'); |
128
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
46 [status, msg, msgid] = movefile ('./src/plot_func.oct', new_name, 'f'); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
47 if (status != 1) |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
48 error ("couldn't copy file: %s", msg); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
49 endif |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
50 |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
51 new_name = fullfile (mesh, 'plot.oct'); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
52 [status, msg, msgid] = movefile ('./src/plot_mesh.oct', new_name, 'f'); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
53 if (status != 1) |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
54 error ("couldn't copy file: %s", msg); |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
55 endif |
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
56 |
140
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
57 file = cstrcat (desc.archprefix, filesep, octave_config_info ("canonical_host_type"), |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
58 "-", octave_config_info ("api_version"), filesep, "feval.oct"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
59 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
60 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
61 file = cstrcat (desc.archprefix, filesep, octave_config_info ("canonical_host_type"), |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
62 "-", octave_config_info ("api_version"), filesep, "save.oct"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
63 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
64 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
65 file = cstrcat (desc.archprefix, filesep, octave_config_info ("canonical_host_type"), |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
66 "-", octave_config_info ("api_version"), filesep, "plot_mesh.oct"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
67 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
68 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
69 file = cstrcat (desc.archprefix, filesep, octave_config_info ("canonical_host_type"), |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
70 "-", octave_config_info ("api_version"), filesep, "plot_func.oct"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
71 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
72 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
73 file = cstrcat (desc.archprefix, filesep, "generate_lhs.m"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
74 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
75 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
76 file = cstrcat (desc.archprefix, filesep, "generate_rhs.m"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
77 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
78 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
79 file = cstrcat (desc.archprefix, filesep, "generate_fun.m"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
80 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
81 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
82 file = cstrcat (desc.archprefix, filesep, "generate_fs.m"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
83 [err, msg] = unlink (file); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
84 |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
85 file = cstrcat (desc.archprefix, filesep, "generate_makefile.m"); |
d94b16927632
Delete useless file fter installation.
gedeone-octave <marcovass89@hotmail.it>
parents:
135
diff
changeset
|
86 [err, msg] = unlink (file); |
128
d3c29e38e5d2
New naming convention adopted and Polymorphism for plot and save.
gedeone-octave <marcovass89@hotmail.it>
parents:
127
diff
changeset
|
87 |
59
65aa84962d38
Script for post installation process.
gedeone-octave <marco.vassallo@outlook.com>
parents:
diff
changeset
|
88 endfunction |