801 |
/* if (sizeof(mp_limb_t) != 4) { FEerror("fix for gmp",0);} */ |
/* if (sizeof(mp_limb_t) != 4) { FEerror("fix for gmp",0);} */ |
802 |
PUT4(l); |
PUT4(l); |
803 |
while (-- m >=0) { |
while (-- m >=0) { |
804 |
if (sizeof(unsigned long)==8) |
#if MP_LIMB_BYTES == 8 |
805 |
PUT8(*u); |
PUT8(*u); |
806 |
else if (sizeof(unsigned long)==4) |
#elif MP_LIMB_BYTES == 4 |
807 |
PUT4(*u); |
PUT4(*u); |
808 |
else |
#else |
809 |
FEerror("Fix for gmp",0); |
#error Bad MP_LIMB_BYTES |
810 |
|
#endif |
811 |
u++; |
u++; |
812 |
} |
} |
813 |
break;} |
break;} |
1286 |
|
|
1287 |
#endif |
#endif |
1288 |
while ( --j >=0) { |
while ( --j >=0) { |
1289 |
if (sizeof(unsigned long)==8) |
#if MP_LIMB_BYTES == 8 |
1290 |
GET8(*u); |
GET8(*u); |
1291 |
else if (sizeof(unsigned long)==4) |
#elif MP_LIMB_BYTES == 4 |
1292 |
GET4(*u); |
GET4(*u); |
1293 |
else |
#else |
1294 |
FEerror("Bad sizeof(unsigned long)",0); |
#error Bad MP_LIMB_BYTES |
1295 |
|
#endif |
1296 |
u++; |
u++; |
1297 |
} |
} |
1298 |
*loc=tem; return;} |
*loc=tem; return;} |