Changeset 282 for trunk/thune/math.c

Show
Ignore:
Timestamp:
09/24/06 04:43:27 (2 years ago)
Author:
krobillard
Message:

Rune - Mandel test works.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/thune/math.c

    r273 r282  
    2727extern unsigned long genrand_int32(); 
    2828extern double genrand_real2(); 
     29 
     30 
     31#ifdef LANG_RUNE 
     32#define UR_CALL_P   UR_CALL_PUB 
     33#else 
     34#define UR_CALL_P   UR_CALL 
     35#endif 
    2936 
    3037 
    … …  
    7885 
    7986// (val val -- logic) 
    80 UR_CALL( uc_gtQ ) 
     87UR_CALL_P( uc_gtQ ) 
    8188{ 
    8289    int logic = ur_greaterThan( ur_s_prev(tos), tos ); 
    … …  
    100107 
    101108// (val val -- logic) 
    102 UR_CALL( uc_ltQ ) 
     109UR_CALL_P( uc_ltQ ) 
    103110{ 
    104111    int logic = ur_lessThan( ur_s_prev(tos), tos ); 
    … …  
    149156 
    150157 
    151 #ifdef LANG_RUNE 
    152 #define UR_CALL_P   UR_CALL_PUB 
    153 #else 
    154 #define UR_CALL_P   UR_CALL 
    155 #endif 
    156  
    157158// (number number -- sum) 
    158159UR_CALL_P( uc_add )