File: runme.sci

package info (click to toggle)
swig 4.4.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 45,980 kB
  • sloc: cpp: 54,284; ansic: 29,022; java: 17,595; python: 12,734; cs: 10,421; ruby: 7,263; yacc: 6,501; makefile: 5,860; javascript: 5,538; sh: 5,422; perl: 4,246; php: 3,733; ml: 2,198; tcl: 2,015; lisp: 1,448; xml: 115
file content (36 lines) | stat: -rw-r--r-- 936 bytes parent folder | download | duplicates (10)
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
lines(0);
ilib_verbose(0);
ierr = exec('loader.sce', 'errcatch');
if ierr <> 0 then
  disp(lasterror());
  exit(ierr);
end
example_Init();

printf("\nTest enums\n");
printf("*** color ***\n");
printf("    RED_get()    = %i\n", RED_get());
printf("    BLUE_get()   = %i\n", BLUE_get());
printf("    GREEN_get()  = %i\n", GREEN_get());

printf("\n*** Foo::speed ***\n")
printf("    Foo_IMPULSE   = %i\n", Foo_IMPULSE_get());
printf("    Foo_WARP      = %i\n", Foo_WARP_get());
printf("    Foo_LUDICROUS = %i\n", Foo_LUDICROUS_get());

printf("\nTest enums as argument of functions\n");

enum_test(RED_get(), Foo_IMPULSE_get());
enum_test(BLUE_get(), Foo_WARP_get());
enum_test(GREEN_get(), Foo_LUDICROUS_get());
enum_test(1234, 5678);

printf("\nTest enums as argument of class methods\n");

f = new_Foo();
Foo_enum_test(f, Foo_IMPULSE_get());
Foo_enum_test(f, Foo_WARP_get());
Foo_enum_test(f, Foo_LUDICROUS_get());
delete_Foo(f);

exit