Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Re-generate tclTomMath.h from tommath.h |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | core-8-6-branch |
Files: | files | file ages | folders |
SHA3-256: |
4853e832435e530031794b5f60d2995f |
User & Date: | jan.nijtmans 2024-04-12 15:12:45 |
Context
2024-04-12
| ||
15:14 | Since all tools are in utf-8 (actually: ascii), make that explicit check-in: b725630348 user: jan.nijtmans tags: core-8-6-branch | |
15:12 | Re-generate tclTomMath.h from tommath.h check-in: 4853e83243 user: jan.nijtmans tags: core-8-6-branch | |
2024-04-11
| ||
12:35 | Use Tcl_NewBooleanObj for booleans; we should say what we mean. Fix sentinels and type-casts. check-in: e75d7ff329 user: jan.nijtmans tags: core-8-6-branch | |
Changes
Changes to generic/tclTomMath.h.
︙ | ︙ | |||
73 74 75 76 77 78 79 80 81 82 | # endif #elif defined(MP_64BIT) /* for GCC only on supported platforms */ #ifndef MP_DIGIT_DECLARED typedef unsigned long long mp_digit; #define MP_DIGIT_DECLARED #endif typedef unsigned long private_mp_word __attribute__((mode(TI))); # define MP_DIGIT_BIT 60 #else | > > < < < | 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 | # endif #elif defined(MP_64BIT) /* for GCC only on supported platforms */ #ifndef MP_DIGIT_DECLARED typedef unsigned long long mp_digit; #define MP_DIGIT_DECLARED #endif #if defined(__GNUC__) typedef unsigned long private_mp_word __attribute__((mode(TI))); #endif # define MP_DIGIT_BIT 60 #else #ifndef MP_DIGIT_DECLARED typedef unsigned int mp_digit; #define MP_DIGIT_DECLARED #endif #ifndef MP_WORD_DECLARED #ifdef _WIN32 typedef unsigned __int64 private_mp_word; |
︙ | ︙ | |||
398 399 400 401 402 403 404 | uint64_t mp_get_mag_u64(const mp_int *a) MP_WUR; */ #endif /* unsigned long mp_get_mag_ul(const mp_int *a) MP_WUR; */ /* | | | 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 | uint64_t mp_get_mag_u64(const mp_int *a) MP_WUR; */ #endif /* unsigned long mp_get_mag_ul(const mp_int *a) MP_WUR; */ /* MP_DEPRECATED(mp_get_mag_u64) Tcl_WideUInt mp_get_mag_ull(const mp_int *a) MP_WUR; */ /* get integer, set integer (long) */ /* long mp_get_l(const mp_int *a) MP_WUR; */ /* |
︙ | ︙ | |||
423 424 425 426 427 428 429 | */ /* mp_err mp_init_ul(mp_int *a, unsigned long b) MP_WUR; */ /* get integer, set integer (Tcl_WideInt) */ /* | | | | > | > | | | | 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 | */ /* mp_err mp_init_ul(mp_int *a, unsigned long b) MP_WUR; */ /* get integer, set integer (Tcl_WideInt) */ /* MP_DEPRECATED(mp_get_i64) Tcl_WideInt mp_get_ll(const mp_int *a) MP_WUR; */ /* MP_DEPRECATED(mp_set_i64) void mp_set_ll(mp_int *a, Tcl_WideInt b); */ /* MP_DEPRECATED(mp_init_i64) mp_err mp_init_ll(mp_int *a, Tcl_WideInt b) MP_WUR; */ /* get integer, set integer (Tcl_WideUInt) */ /* #define mp_get_ull(a) (MP_DEPRECATED_PRAGMA("mp_get_ull() has been deprecated, use mp_get_u64()") ((Tcl_WideUInt)mp_get_ll(a))) */ /* MP_DEPRECATED(mp_set_u64) void mp_set_ull(mp_int *a, Tcl_WideUInt b); */ /* MP_DEPRECATED(mp_init_u64) mp_err mp_init_ull(mp_int *a, Tcl_WideUInt b) MP_WUR; */ /* set to single unsigned digit, up to MP_DIGIT_MAX */ /* void mp_set(mp_int *a, mp_digit b); */ /* mp_err mp_init_set(mp_int *a, mp_digit b) MP_WUR; */ /* get integer, set integer and init with integer (deprecated) */ /* MP_DEPRECATED(mp_get_mag_u32/mp_get_u32) unsigned long mp_get_int(const mp_int *a) MP_WUR; */ /* MP_DEPRECATED(mp_get_mag_ul/mp_get_ul) unsigned long mp_get_long(const mp_int *a) MP_WUR; */ /* MP_DEPRECATED(mp_get_mag_u64/mp_get_u64) Tcl_WideUInt mp_get_long_long(const mp_int *a) MP_WUR; */ /* MP_DEPRECATED(mp_set_ul) mp_err mp_set_int(mp_int *a, unsigned long b); */ /* MP_DEPRECATED(mp_set_ul) mp_err mp_set_long(mp_int *a, unsigned long b); */ |
︙ | ︙ | |||
486 487 488 489 490 491 492 493 494 495 496 497 498 499 | mp_err mp_init_copy(mp_int *a, const mp_int *b) MP_WUR; */ /* trim unused digits */ /* void mp_clamp(mp_int *a); */ /* export binary data */ /* MP_DEPRECATED(mp_pack) mp_err mp_export(void *rop, size_t *countp, int order, size_t size, int endian, size_t nails, const mp_int *op) MP_WUR; */ | > | 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 | mp_err mp_init_copy(mp_int *a, const mp_int *b) MP_WUR; */ /* trim unused digits */ /* void mp_clamp(mp_int *a); */ /* export binary data */ /* MP_DEPRECATED(mp_pack) mp_err mp_export(void *rop, size_t *countp, int order, size_t size, int endian, size_t nails, const mp_int *op) MP_WUR; */ |
︙ | ︙ | |||
539 540 541 542 543 544 545 | /* b = a/2 */ /* mp_err mp_div_2(const mp_int *a, mp_int *b) MP_WUR; */ /* a/3 => 3c + d == a */ /* | | | 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 | /* b = a/2 */ /* mp_err mp_div_2(const mp_int *a, mp_int *b) MP_WUR; */ /* a/3 => 3c + d == a */ /* MP_DEPRECATED(mp_div_d) mp_err mp_div_3(const mp_int *a, mp_int *c, mp_digit *d) MP_WUR; */ /* c = a * 2**b, implemented as c = a << b */ /* mp_err mp_mul_2d(const mp_int *a, int b, mp_int *c) MP_WUR; */ |
︙ | ︙ | |||
774 775 776 777 778 779 780 781 782 783 784 | */ /* c = [a, b] or (a*b)/(a, b) */ /* mp_err mp_lcm(const mp_int *a, const mp_int *b, mp_int *c) MP_WUR; */ /* finds one of the b'th root of a, such that |c|**b <= |a| * * returns error if a < 0 and b is even */ | > > > > > > > > > > > > > > > > > > > > > | > > > | | | | 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 | */ /* c = [a, b] or (a*b)/(a, b) */ /* mp_err mp_lcm(const mp_int *a, const mp_int *b, mp_int *c) MP_WUR; */ /* Integer logarithm to integer base */ /* mp_err mp_log_n(const mp_int *a, int base, int *c) MP_WUR; */ /* MP_DEPRECATED(mp_log_n) mp_err mp_log_u32(const mp_int *a, uint32_t base, uint32_t *c) MP_WUR; */ /* c = a**b */ /* mp_err mp_expt_n(const mp_int *a, int b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_expt_n) mp_err mp_expt_u32(const mp_int *a, uint32_t b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_expt_n) mp_err mp_expt_d(const mp_int *a, mp_digit b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_expt_n) mp_err mp_expt_d_ex(const mp_int *a, mp_digit b, mp_int *c, int fast) MP_WUR; */ /* finds one of the b'th root of a, such that |c|**b <= |a| * * returns error if a < 0 and b is even */ /* mp_err mp_root_n(const mp_int *a, int b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_root_n) mp_err mp_root_u32(const mp_int *a, uint32_t b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_root_n) mp_err mp_n_root(const mp_int *a, mp_digit b, mp_int *c) MP_WUR; */ /* MP_DEPRECATED(mp_root_n) mp_err mp_n_root_ex(const mp_int *a, mp_digit b, mp_int *c, int fast) MP_WUR; */ /* special sqrt algo */ /* mp_err mp_sqrt(const mp_int *arg, mp_int *ret) MP_WUR; */ |
︙ | ︙ | |||
1008 1009 1010 1011 1012 1013 1014 | MP_DEPRECATED(mp_prime_rand) mp_err mp_prime_random_ex(mp_int *a, int t, int size, int flags, private_mp_prime_callback cb, void *dat) MP_WUR; */ /* mp_err mp_prime_rand(mp_int *a, int t, int size, int flags) MP_WUR; */ | < < < < < < < < < < < < < < < < | 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 | MP_DEPRECATED(mp_prime_rand) mp_err mp_prime_random_ex(mp_int *a, int t, int size, int flags, private_mp_prime_callback cb, void *dat) MP_WUR; */ /* mp_err mp_prime_rand(mp_int *a, int t, int size, int flags) MP_WUR; */ /* ---> radix conversion <--- */ /* int mp_count_bits(const mp_int *a) MP_WUR; */ /* |
︙ | ︙ |