blob: e6ef184e1049c2a748a4463fcd29cf588a71a6fb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
function INIT_CreateDirs(FileInfo)
// function INIT_CreateDirs(FileInfo)
// -----------------------------------------------------------------
// Create directories.
//
// Input data:
// FileInfo: structure containing all info about SCI2C files.
//
// Output data:
// ---
//
// Status:
// 03-Jan-2008 -- Raffaele Nutricato: Author.
//
// Copyright 2008 Raffaele Nutricato.
// Contact: raffaele.nutricato@tiscali.it
// -----------------------------------------------------------------
// ------------------------------
// --- Check input arguments. ---
// ------------------------------
SCI2CNInArgCheck(argn(2),1,1);
// ---------------------------
// --- Create Directories. ---
// ---------------------------
// --- Main directories. ---
SCI2CCreateDir(FileInfo.WorkingDir);
SCI2CCreateDir(FileInfo.OutCCCodeDir);
// --- SCI2C Library. ---
SCI2CCreateDir(FileInfo.SCI2CLibDir);
SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnDir);
SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnFun);
SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnCls);
SCI2CCreateDir(FileInfo.SCI2CLibSCIFunListDir);
SCI2CCreateDir(FileInfo.SCI2CLibSCIFLFun);
SCI2CCreateDir(FileInfo.SCI2CLibSCIFLCls);
SCI2CCreateDir(FileInfo.SCI2CLibCAnnDir);
SCI2CCreateDir(FileInfo.SCI2CLibCAnnFun);
SCI2CCreateDir(FileInfo.SCI2CLibCAnnCls);
SCI2CCreateDir(FileInfo.SCI2CLibCFunListDir);
SCI2CCreateDir(FileInfo.SCI2CLibCFLFun);
SCI2CCreateDir(FileInfo.SCI2CLibCFLCls);
// --- USER2C Library. ---
SCI2CCreateDir(FileInfo.USER2CLibDir);
SCI2CCreateDir(FileInfo.USER2CLibSCIAnnDir);
SCI2CCreateDir(FileInfo.USER2CLibSCIAnnFun);
SCI2CCreateDir(FileInfo.USER2CLibSCIAnnCls);
SCI2CCreateDir(FileInfo.USER2CLibSCIFunListDir);
SCI2CCreateDir(FileInfo.USER2CLibSCIFLFun);
SCI2CCreateDir(FileInfo.USER2CLibSCIFLCls);
SCI2CCreateDir(FileInfo.USER2CLibCAnnDir);
SCI2CCreateDir(FileInfo.USER2CLibCAnnFun);
SCI2CCreateDir(FileInfo.USER2CLibCAnnCls);
SCI2CCreateDir(FileInfo.USER2CLibCFunListDir);
SCI2CCreateDir(FileInfo.USER2CLibCFLFun);
SCI2CCreateDir(FileInfo.USER2CLibCFLCls);
// --- Function List. ---
SCI2CCreateDir(FileInfo.FunctionList.MainDir);
SCI2CCreateDir(FileInfo.FunctionList.FunInfoDatDir);
endfunction
|