import source from 1.3.40
[external/swig.git] / Examples / chicken / constants / example.i
1 /* File : example.i */
2 %module example
3
4 /* A few preprocessor macros */
5
6 #define    ICONST      42
7 #define    FCONST      2.1828
8 #define    CCONST      'x'
9 #define    CCONST2     '\n'
10 #define    SCONST      "Hello World"
11 #define    SCONST2     "\"Hello World\""
12
13 /* This should work just fine */
14 #define    EXPR        ICONST + 3*(FCONST)
15
16 /* This shouldn't do anything */
17 #define    EXTERN      extern
18
19 /* Neither should this (BAR isn't defined) */
20 #define    FOO         (ICONST + BAR)
21
22 /* The following directives also produce constants.  Remember that
23    CHICKEN is normally case-insensitive, so don't rely on differing
24    case to differentiate variable names */
25
26 %constant int iconstX = 37;
27 %constant double fconstX = 3.14;