Changeset 260 for trunk/thune/math.c
- Timestamp:
- 08/29/06 22:25:58 (2 years ago)
- Files:
-
- 1 modified
-
trunk/thune/math.c (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/thune/math.c
r249 r260 149 149 150 150 151 #ifdef LANG_RUNE 152 #define UR_CALL_P UR_CALL_PUB 153 #else 154 #define UR_CALL_P UR_CALL 155 #endif 156 151 157 // (number number -- sum) 152 UR_CALL ( uc_add )158 UR_CALL_P( uc_add ) 153 159 { 154 160 UR_S_DROP; … … 166 172 167 173 // (number number -- difference) 168 UR_CALL ( uc_sub )174 UR_CALL_P( uc_sub ) 169 175 { 170 176 UR_S_DROP; … … 182 188 183 189 // (number number -- product) 184 UR_CALL ( uc_mul )190 UR_CALL_P( uc_mul ) 185 191 { 186 192 UCell* res; … … 194 200 195 201 // (number number -- quotient) 196 UR_CALL ( uc_div )202 UR_CALL_P( uc_div ) 197 203 { 198 204 UCell* res;
