1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
// =============================================================================
// Allan CORNET - DIGITEO - 2009
// This file is released into the public domain
// =============================================================================
files=['sci_call_scifunc.c'];
ilib_build('callscifunc',['call_scifunc','sci_call_scifunc'],files,[]);
// =============================================================================
exec loader.sce;
// =============================================================================
function r = scilabfoo(x,y)
r = x + y;
endfunction
// =============================================================================
v = call_scifunc(30,12,scilabfoo);
disp('result : ' + string(v));
v = call_scifunc(300,120,scilabfoo);
disp('result : ' + string(v));
// =============================================================================
ulink();
// =============================================================================
|
