Changeset 794463 in git for kernel/longrat.cc
 Timestamp:
 Mar 14, 2011, 5:01:43 PM (12 years ago)
 Branches:
 (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
 Children:
 1cf7b9bbd183bcd5847750fc6d151b0c10cd0b98
 Parents:
 60dcbbcf58b25703c21825b7ca27f49816799c04
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

kernel/longrat.cc
r60dcbbc r794463 1038 1038 j=l; 1039 1039 } while (l!=0L); 1040 return INT_TO_SR(i); 1040 if (i==POW_2_28) 1041 result=nlRInit(POW_2_28); 1042 else 1043 result=INT_TO_SR(i); 1044 nlTest(result); 1045 return result; 1041 1046 } 1042 1047 if (((!(SR_HDL(a) & SR_INT))&&(a>s<2)) … … 1044 1049 if (SR_HDL(a) & SR_INT) 1045 1050 { 1046 unsigned long t=mpz_gcd_ui(NULL,b>z,ABS(SR_TO_INT(a))); 1047 return INT_TO_SR(t); 1051 LONG aa=ABS(SR_TO_INT(a)); 1052 unsigned long t=mpz_gcd_ui(NULL,b>z,(long)aa); 1053 if (t==POW_2_28) 1054 result=nlRInit(POW_2_28); 1055 else 1056 result=INT_TO_SR(t); 1057 nlTest(result); 1048 1058 } 1049 1059 else 1050 1060 if (SR_HDL(b) & SR_INT) 1051 1061 { 1052 unsigned long t=mpz_gcd_ui(NULL,a>z,ABS(SR_TO_INT(b))); 1053 return INT_TO_SR(t); 1062 LONG bb=ABS(SR_TO_INT(b)); 1063 unsigned long t=mpz_gcd_ui(NULL,a>z,(long)bb); 1064 if (t==POW_2_28) 1065 result=nlRInit(POW_2_28); 1066 else 1067 result=INT_TO_SR(t); 1068 nlTest(result); 1054 1069 } 1055 1070 else … … 1063 1078 #endif 1064 1079 result=nlShort3(result); 1065 }1066 nlTest(result);1080 nlTest(result); 1081 } 1067 1082 return result; 1068 1083 }
Note: See TracChangeset
for help on using the changeset viewer.