Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
Download

Testing latest pari + WASM + node.js... and it works?! Wow.

28495 views
License: GPL3
ubuntu2004
1
#line 2 "../src/kernel/gmp/int.h"
2
/* Copyright (C) 2000 The PARI group.
3
4
This file is part of the PARI/GP package.
5
6
PARI/GP is free software; you can redistribute it and/or modify it under the
7
terms of the GNU General Public License as published by the Free Software
8
Foundation; either version 2 of the License, or (at your option) any later
9
version. It is distributed in the hope that it will be useful, but WITHOUT
10
ANY WARRANTY WHATSOEVER.
11
12
Check the License for details. You should have received a copy of it, along
13
with the package; see the file 'COPYING'. If not, write to the Free Software
14
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */
15
16
#define int_MSW(x) ((x)+lgefint((x))-1)
17
/*x being a t_INT, return a pointer to the most significant word of x.*/
18
19
#define int_LSW(x) ((x)+2)
20
/*x being a t_INT, return a pointer to the least significant word of x.*/
21
22
#define int_precW(x) ((x)-1)
23
/*x pointing to a mantissa word, return the previous (less significant)
24
* mantissa word.*/
25
26
#define int_nextW(x) ((x)+1)
27
/*x pointing to a mantissa word, return the next (more significant) mantissa
28
* word.*/
29
30
#define int_W(x,l) ((x)+2+(l))
31
/*x being a t_INT, return a pointer to the l-th least significant word of x.*/
32
33
#define int_W_lg(x,l,lx) ((x)+2+(l))
34
/*x being a t_INT, return a pointer to the l-th least significant word of x,
35
* assuming lgefint(x) = lx.*/
36
37
#define PARI_KERNEL_GMP
38
/*This macro should not be used in libpari itself.*/
39
40