blob: 14feb3c286ac88e0d13d5d8d0d0638ae8904dd34 (
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
|
// This file is released into the public domain
mprintf("Start Scilab 2 C module\n");
etc_tlbx = get_absolute_file_path("scilab2c.start");
etc_tlbx = getshortpathname(etc_tlbx);
root_tlbx = strncpy( etc_tlbx, length(etc_tlbx)-length('\etc\') );
//Load functions library
// =============================================================================
pathmacros = pathconvert( root_tlbx ) + 'macros'+ filesep();
mprintf("\tLoad macros\n");
sci2c_mainlib = lib(pathmacros);
sci2c_ASTManagementlib = lib(pathmacros + "ASTManagement" + filesep());
sci2c_CCodeGenerationlib = lib(pathmacros + "CCodeGeneration" + filesep());
sci2c_ErrorMessageslib = lib(pathmacros + "ErrorMessages" + filesep());
sci2c_FunAnnotationlib = lib(pathmacros + "FunctionAnnotation" + filesep());
sci2c_FunListlib = lib(pathmacros + "FunctionList" + filesep());
sci2c_GenFunctionslib = lib(pathmacros + "GeneralFunctions" + filesep());
sci2c_SymbolTablelib = lib(pathmacros + "SymbolTable" + filesep());
sci2c_ToolInitlib = lib(pathmacros + "ToolInitialization" + filesep());
sci2c_finDeps = lib(pathmacros + "findDeps" + filesep());
clear pathmacros;
// Load and add help chapter
// =============================================================================
if or(getscilabmode() == ["NW";"STD"]) then
mprintf("\tLoad help\n");
path_addchapter = pathconvert(root_tlbx+"/jar");
if isdir(path_addchapter) then
add_help_chapter("Scilab 2 C", path_addchapter, %F);
clear add_help_chapter path_addchapter
end
end
// Add demos
// =============================================================================
if or(getscilabmode() == ["NW";"STD"]) then
mprintf("\tLoad demos\n");
pathdemos = pathconvert(root_tlbx + "/demos/scilab2c.dem.gateway.sce",%f,%t);
add_demo(gettext("Scilab2C"),pathdemos);
clear pathdemos ;
end
mprintf("\tVersion: "+getScilab2cVersion()+"\n");
global SCI2CHOME
SCI2CHOME = root_tlbx;
clear SCI2CHOME;
// =============================================================================
clear root_tlbx;
clear etc_tlbx;
|
