… | |
… | |
23 | */ |
23 | */ |
24 | #ifndef STANDALONE /* If used as standalone interpreter */ |
24 | #ifndef STANDALONE /* If used as standalone interpreter */ |
25 | # define STANDALONE 1 |
25 | # define STANDALONE 1 |
26 | #endif |
26 | #endif |
27 | |
27 | |
28 | #define USE_STRCASECMP 1 |
|
|
29 | #ifndef USE_STRLWR |
|
|
30 | # define USE_STRLWR 1 |
|
|
31 | #endif |
|
|
32 | #define SCHEME_EXPORT static |
28 | #define SCHEME_EXPORT static |
33 | |
29 | |
34 | #if USE_NO_FEATURES |
30 | #if USE_NO_FEATURES |
35 | # define USE_MULTIPLICITY 0 |
31 | # define USE_MULTIPLICITY 0 |
36 | # define USE_MATH 0 |
32 | # define USE_MATH 0 |
… | |
… | |
105 | |
101 | |
106 | #ifndef USE_PRINTF |
102 | #ifndef USE_PRINTF |
107 | # define USE_PRINTF 1 |
103 | # define USE_PRINTF 1 |
108 | #endif |
104 | #endif |
109 | |
105 | |
110 | #ifndef USE_STRLWR |
106 | #ifndef USE_IGNORECASE |
111 | # define USE_STRLWR 1 |
107 | # define USE_IGNORECASE 1 |
112 | #endif |
|
|
113 | |
|
|
114 | #ifndef INLINE |
|
|
115 | # define INLINE inline |
|
|
116 | #endif |
108 | #endif |
117 | |
109 | |
118 | #ifndef SHOW_ERROR_LINE /* Show error line in file */ |
110 | #ifndef SHOW_ERROR_LINE /* Show error line in file */ |
119 | # define SHOW_ERROR_LINE 1 |
111 | # define SHOW_ERROR_LINE 1 |
|
|
112 | #endif |
|
|
113 | |
|
|
114 | #if !USE_REAL |
|
|
115 | # undef USE_MATH |
|
|
116 | # define USE_MATH 0 |
120 | #endif |
117 | #endif |
121 | |
118 | |
122 | #if USE_MULTIPLICITY |
119 | #if USE_MULTIPLICITY |
123 | # define SCHEME_V sc |
120 | # define SCHEME_V sc |
124 | # define SCHEME_P scheme *SCHEME_V |
121 | # define SCHEME_P scheme *SCHEME_V |