osl/source/int.c

81  * this function prints in a human readable fashion the precision
82  * corresponding to the "precision" parameter.
83  * \param[in] file      The file where to print the precision.
84  * \param[in] precision The precision to print.
86 void osl_int_dump_precision(FILE * file, int precision) {
88   switch (precision) {
101       fprintf(file, "unknown precision %d", precision);
106 int osl_int_sizeof(int precision) {
107   switch (precision) {
120       OSL_error("unknown precision");
125 void * osl_int_address(int precision, void * base, int offset) {
126   switch (precision) {
139       OSL_error("unknown precision");
144 void osl_int_init(int precision, void * value_base, int value_offset) {
145   void * value = osl_int_address(precision, value_base, value_offset);
147   switch (precision) {
163       OSL_error("unknown precision");
168 void * osl_int_malloc(int precision) {
171   switch (precision) {
188       OSL_error("unknown precision");
191   osl_int_init(precision, value, 0);
199 void osl_int_assign(int precision,
202   void * val1 = osl_int_address(precision, val1_base, val1_offset);
203   void * val2 = osl_int_address(precision, val2_base, val2_offset);
205   switch (precision) {
221       OSL_error("unknown precision");
229 void osl_int_set_si(int precision, void * value_base, int value_offset,
231   void * value = osl_int_address(precision, value_base, value_offset);
233   switch (precision) {
249       OSL_error("unknown precision");
257 int osl_int_get_si(int precision, void * value_base, int value_offset) {
258   void * value = osl_int_address(precision, value_base, value_offset);
260   switch (precision) {
273       OSL_error("unknown precision");
281 void osl_int_init_set_si(int precision,
283   void * value = osl_int_address(precision, value_base, value_offset);
285   switch (precision) {
301       OSL_error("unknown precision");
309 void osl_int_clear(int precision, void * value_base, int value_offset) {
310   void * value = osl_int_address(precision, value_base, value_offset);
312   switch (precision) {
328       OSL_error("unknown precision");
333 void osl_int_free(int precision, void * value_base, int value_offset) {
334   void * value = osl_int_address(precision, value_base, value_offset);
336   osl_int_clear(precision, value_base, value_offset);
345  * \param precision    The precision of the integer.
349 void osl_int_print(FILE * file, int precision,
353   osl_int_sprint(string, precision, value_base, value_offset);
363  * \param precision    The precision of the integer.
367 void osl_int_sprint(char * string, int precision,
369   void * value = osl_int_address(precision, value_base, value_offset);
371   switch (precision) {
391       OSL_error("unknown precision");
402 void osl_int_sprint_txt(char * string, int precision,
404   void * value = osl_int_address(precision, value_base, value_offset);
406   switch (precision) {
426       OSL_error("unknown precision");
431 void osl_int_sread(char ** string, int precision,
433   void * value = osl_int_address(precision, value_base, value_offset);
436   switch (precision) {
461       OSL_error("unknown precision");
477 void osl_int_increment(int precision,
480   void * result = osl_int_address(precision, result_base, result_offset);
481   void * value  = osl_int_address(precision, value_base, value_offset);
483   switch (precision) {
499       OSL_error("unknown precision");
507 void osl_int_decrement(int precision,
510   void * result = osl_int_address(precision, result_base, result_offset);
511   void * value  = osl_int_address(precision, value_base, value_offset);
513   switch (precision) {
533       OSL_error("unknown precision");
541 void osl_int_add(int precision,
545   void * result = osl_int_address(precision, result_base, result_offset);
546   void * val1   = osl_int_address(precision, val1_base, val1_offset);
547   void * val2   = osl_int_address(precision, val2_base, val2_offset);
549   switch (precision) {
566       OSL_error("unknown precision");
574 void osl_int_add_si(int precision,
577   void * result = osl_int_address(precision, result_base, result_offset);
578   void * value  = osl_int_address(precision, value_base, value_offset);
580   switch (precision) {
600       OSL_error("unknown precision");
608 void osl_int_mul(int precision,
612   void * result = osl_int_address(precision, result_base, result_offset);
613   void * val1   = osl_int_address(precision, val1_base, val1_offset);
614   void * val2   = osl_int_address(precision, val2_base, val2_offset);
616   switch (precision) {
633       OSL_error("unknown precision");
641 void osl_int_mul_si(int precision,
644   void * result = osl_int_address(precision, result_base, result_offset);
645   void * value  = osl_int_address(precision, value_base, value_offset);
647   switch (precision) {
663       OSL_error("unknown precision");
671 void osl_int_sub(int precision,
675   void * result = osl_int_address(precision, result_base, result_offset);
676   void * val1   = osl_int_address(precision, val1_base, val1_offset);
677   void * val2   = osl_int_address(precision, val2_base, val2_offset);
679   switch (precision) {
696       OSL_error("unknown precision");
704 void osl_int_oppose(int precision,
707   void * result = osl_int_address(precision, result_base, result_offset);
708   void * value  = osl_int_address(precision, value_base, value_offset);
710   switch (precision) {
726       OSL_error("unknown precision");
739 int osl_int_eq(int precision,
742   void * val1 = osl_int_address(precision, val1_base, val1_offset);
743   void * val2 = osl_int_address(precision, val2_base, val2_offset);
745   switch (precision) {
758       OSL_error("unknown precision");
766 int osl_int_ne(int precision,
769   return !osl_int_eq(precision,
778 int osl_int_pos(int precision, void * value_base, int value_offset) {
779   void * value = osl_int_address(precision, value_base, value_offset);
781   switch (precision) {
794       OSL_error("unknown precision");
802 int osl_int_neg(int precision, void * value_base, int value_offset) {
803   void * value = osl_int_address(precision, value_base, value_offset);
805   switch (precision) {
818       OSL_error("unknown precision");
826 int osl_int_zero(int precision, void * value_base, int value_offset) {
827   void * value = osl_int_address(precision, value_base, value_offset);
829   switch (precision) {
842       OSL_error("unknown precision");
850 int osl_int_one(int precision, void * value_base, int value_offset) {
851   void * value = osl_int_address(precision, value_base, value_offset);
853   switch (precision) {
866       OSL_error("unknown precision");
874 int osl_int_mone(int precision, void * value_base, int value_offset) {
875   void * value = osl_int_address(precision, value_base, value_offset);
877   switch (precision) {
890       OSL_error("unknown precision");
898 int osl_int_divisible(int precision,
901   void * val1 = osl_int_address(precision, val1_base, val1_offset);
902   void * val2 = osl_int_address(precision, val2_base, val2_offset);
904   switch (precision) {
917       OSL_error("unknown precision");