18 lines
505 B
Scilab
18 lines
505 B
Scilab
lines(0);
|
|
ilib_verbose(0);
|
|
ierr = exec('loader.sce', 'errcatch');
|
|
if ierr <> 0 then
|
|
disp(lasterror());
|
|
exit(ierr);
|
|
end
|
|
example_Init();
|
|
|
|
printf("\nTest constants\n");
|
|
printf("ICONST = %i (should be 42)\n", ICONST);
|
|
printf("FCONST = %5.4f (should be 2.1828)\n", FCONST);
|
|
printf("SCONST = ''%s'' (should be ''Hello World'')\n", SCONST);
|
|
printf("EXPR = %5.4f (should be 48.5484)\n", EXPR);
|
|
printf("iconst = %i (should be 37)\n", iconst);
|
|
printf("fconst = %3.2f (should be 3.14)\n", fconst);
|
|
|
|
exit
|