Linux heracles.o2switch.net 4.18.0-553.62.1.lve.el8.x86_64 #1 SMP Mon Jul 21 17:50:35 UTC 2025 x86_64
/
opt
/
alt
/
ruby21
/
share
/
doc
/
ruby
/
capi
/
html
/
d1
/
dcc
/
//opt/alt/ruby21/share/doc/ruby/capi/html/d1/dcc/bignum_8c_source.html
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/> <meta http-equiv="X-UA-Compatible" content="IE=9"/> <meta name="generator" content="Doxygen 1.8.14"/> <meta name="viewport" content="width=device-width, initial-scale=1"/> <title>Ruby: bignum.c Source File</title> <link href="../../tabs.css" rel="stylesheet" type="text/css"/> <script type="text/javascript" src="../../jquery.js"></script> <script type="text/javascript" src="../../dynsections.js"></script> <link href="../../doxygen.css" rel="stylesheet" type="text/css" /> </head> <body> <div id="top"><!-- do not remove this div, it is closed by doxygen! --> <div id="titlearea"> <table cellspacing="0" cellpadding="0"> <tbody> <tr style="height: 56px;"> <td id="projectalign" style="padding-left: 0.5em;"> <div id="projectname">Ruby  <span id="projectnumber">2.1.10p492(2016-04-01revision54464)</span> </div> </td> </tr> </tbody> </table> </div> <!-- end header part --> <!-- Generated by Doxygen 1.8.14 --> <script type="text/javascript" src="../../menudata.js"></script> <script type="text/javascript" src="../../menu.js"></script> <script type="text/javascript"> /* @license magnet:?xt=urn:btih:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */ $(function() { initMenu('../../',false,false,'search.php','Search'); }); /* @license-end */</script> <div id="main-nav"></div> </div><!-- top --> <div class="header"> <div class="headertitle"> <div class="title">bignum.c</div> </div> </div><!--header--> <div class="contents"> <a href="../../d1/dcc/bignum_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/**********************************************************************</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="comment"></span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="comment"> bignum.c -</span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="comment"></span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="comment"> $Author: nagachika $</span></div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment"> created at: Fri Jun 10 00:48:55 JST 1994</span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment"></span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment"> Copyright (C) 1993-2007 Yukihiro Matsumoto</span></div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment"></span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment">**********************************************************************/</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span> </div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="preprocessor">#include "<a class="code" href="../../de/de6/ruby_2ruby_8h.html">ruby/ruby.h</a>"</span></div><div class="line"><a name="l00013"></a><span class="lineno"> 13</span> <span class="preprocessor">#include "<a class="code" href="../../db/dd5/thread_8h.html">ruby/thread.h</a>"</span></div><div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="preprocessor">#include "<a class="code" href="../../d8/d3c/util_8h.html">ruby/util.h</a>"</span></div><div class="line"><a name="l00015"></a><span class="lineno"> 15</span> <span class="preprocessor">#include "<a class="code" href="../../db/dde/internal_8h.html">internal.h</a>"</span></div><div class="line"><a name="l00016"></a><span class="lineno"> 16</span> </div><div class="line"><a name="l00017"></a><span class="lineno"> 17</span> <span class="preprocessor">#ifdef HAVE_STRINGS_H</span></div><div class="line"><a name="l00018"></a><span class="lineno"> 18</span> <span class="preprocessor">#include <strings.h></span></div><div class="line"><a name="l00019"></a><span class="lineno"> 19</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="preprocessor">#include <math.h></span></div><div class="line"><a name="l00021"></a><span class="lineno"> 21</span> <span class="preprocessor">#include <float.h></span></div><div class="line"><a name="l00022"></a><span class="lineno"> 22</span> <span class="preprocessor">#include <ctype.h></span></div><div class="line"><a name="l00023"></a><span class="lineno"> 23</span> <span class="preprocessor">#ifdef HAVE_IEEEFP_H</span></div><div class="line"><a name="l00024"></a><span class="lineno"> 24</span> <span class="preprocessor">#include <ieeefp.h></span></div><div class="line"><a name="l00025"></a><span class="lineno"> 25</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00026"></a><span class="lineno"> 26</span> <span class="preprocessor">#include <assert.h></span></div><div class="line"><a name="l00027"></a><span class="lineno"> 27</span> </div><div class="line"><a name="l00028"></a><span class="lineno"> 28</span> <span class="preprocessor">#if defined(HAVE_LIBGMP) && defined(HAVE_GMP_H)</span></div><div class="line"><a name="l00029"></a><span class="lineno"> 29</span> <span class="preprocessor">#define USE_GMP</span></div><div class="line"><a name="l00030"></a><span class="lineno"> 30</span> <span class="preprocessor">#include <gmp.h></span></div><div class="line"><a name="l00031"></a><span class="lineno"> 31</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00032"></a><span class="lineno"> 32</span> </div><div class="line"><a name="l00033"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91"> 33</a></span> <span class="preprocessor">#define RB_BIGNUM_TYPE_P(x) RB_TYPE_P((x), T_BIGNUM)</span></div><div class="line"><a name="l00034"></a><span class="lineno"> 34</span> </div><div class="line"><a name="l00035"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049"> 35</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>;</div><div class="line"><a name="l00036"></a><span class="lineno"><a class="line" href="../../d9/d2d/sprintf_8c.html#a8f14b025e8bf5b70997841c99f74c03f"> 36</a></span> <span class="keyword">const</span> <span class="keywordtype">char</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8f14b025e8bf5b70997841c99f74c03f">ruby_digitmap</a>[] = <span class="stringliteral">"0123456789abcdefghijklmnopqrstuvwxyz"</span>;</div><div class="line"><a name="l00037"></a><span class="lineno"> 37</span> </div><div class="line"><a name="l00038"></a><span class="lineno"> 38</span> <span class="preprocessor">#ifndef SIZEOF_BDIGIT_DBL</span></div><div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="preprocessor"># if SIZEOF_INT*2 <= SIZEOF_LONG_LONG</span></div><div class="line"><a name="l00040"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5"> 40</a></span> <span class="preprocessor"># define SIZEOF_BDIGIT_DBL SIZEOF_LONG_LONG</span></div><div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="preprocessor"># else</span></div><div class="line"><a name="l00042"></a><span class="lineno"> 42</span> <span class="preprocessor"># define SIZEOF_BDIGIT_DBL SIZEOF_LONG</span></div><div class="line"><a name="l00043"></a><span class="lineno"> 43</span> <span class="preprocessor"># endif</span></div><div class="line"><a name="l00044"></a><span class="lineno"> 44</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00045"></a><span class="lineno"> 45</span> </div><div class="line"><a name="l00046"></a><span class="lineno"> 46</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_bdigit_dbl, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>) == <a class="code" href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5">SIZEOF_BDIGIT_DBL</a>);</div><div class="line"><a name="l00047"></a><span class="lineno"> 47</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_bdigit_dbl_signed, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>) == <a class="code" href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5">SIZEOF_BDIGIT_DBL</a>);</div><div class="line"><a name="l00048"></a><span class="lineno"> 48</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_bdigit, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> <= <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>));</div><div class="line"><a name="l00049"></a><span class="lineno"> 49</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_bdigit_and_dbl, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>*2 <= <a class="code" href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5">SIZEOF_BDIGIT_DBL</a>);</div><div class="line"><a name="l00050"></a><span class="lineno"> 50</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(bdigit_signedness, 0 < (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-1);</div><div class="line"><a name="l00051"></a><span class="lineno"> 51</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(bdigit_dbl_signedness, 0 < (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)-1);</div><div class="line"><a name="l00052"></a><span class="lineno"> 52</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(bdigit_dbl_signed_signedness, 0 > (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)-1);</div><div class="line"><a name="l00053"></a><span class="lineno"> 53</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(rbignum_embed_len_max, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a> <= (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1e9518f6a85315c95ed1a7530e6feee7">RBIGNUM_EMBED_LEN_MASK</a> >> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5625e120c7e075fe2e1ce77caa598951">RBIGNUM_EMBED_LEN_SHIFT</a>));</div><div class="line"><a name="l00054"></a><span class="lineno"> 54</span> </div><div class="line"><a name="l00055"></a><span class="lineno"> 55</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l00056"></a><span class="lineno"> 56</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_long_and_sizeof_bdigit, SIZEOF_LONG % <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == 0);</div><div class="line"><a name="l00057"></a><span class="lineno"> 57</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00058"></a><span class="lineno"> 58</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a>(sizeof_long_and_sizeof_bdigit, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> % SIZEOF_LONG == 0);</div><div class="line"><a name="l00059"></a><span class="lineno"> 59</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00060"></a><span class="lineno"> 60</span> </div><div class="line"><a name="l00061"></a><span class="lineno"> 61</span> <span class="preprocessor">#ifdef WORDS_BIGENDIAN</span></div><div class="line"><a name="l00062"></a><span class="lineno"> 62</span> <span class="preprocessor"># define HOST_BIGENDIAN_P 1</span></div><div class="line"><a name="l00063"></a><span class="lineno"> 63</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00064"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe"> 64</a></span> <span class="preprocessor"># define HOST_BIGENDIAN_P 0</span></div><div class="line"><a name="l00065"></a><span class="lineno"> 65</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00066"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e"> 66</a></span> <span class="preprocessor">#define ALIGNOF(type) ((int)offsetof(struct { char f1; type f2; }, f2))</span></div><div class="line"><a name="l00067"></a><span class="lineno"> 67</span> <span class="comment">/* (!LSHIFTABLE(d, n) ? 0 : (n)) is same as n but suppress a warning, C4293, by Visual Studio. */</span></div><div class="line"><a name="l00068"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6b49d90c74cbca6d1fd3eee6628e7781"> 68</a></span> <span class="preprocessor">#define LSHIFTABLE(d, n) ((n) < sizeof(d) * CHAR_BIT)</span></div><div class="line"><a name="l00069"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a7ecc9b03313c487ddc335601c28b1b7f"> 69</a></span> <span class="preprocessor">#define LSHIFTX(d, n) (!LSHIFTABLE(d, n) ? 0 : ((d) << (!LSHIFTABLE(d, n) ? 0 : (n))))</span></div><div class="line"><a name="l00070"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e"> 70</a></span> <span class="preprocessor">#define CLEAR_LOWBITS(d, numbits) ((d) & LSHIFTX(~((d)*0), (numbits)))</span></div><div class="line"><a name="l00071"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be"> 71</a></span> <span class="preprocessor">#define FILL_LOWBITS(d, numbits) ((d) | (LSHIFTX(((d)*0+1), (numbits))-1))</span></div><div class="line"><a name="l00072"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79"> 72</a></span> <span class="preprocessor">#define POW2_P(x) (((x)&((x)-1))==0)</span></div><div class="line"><a name="l00073"></a><span class="lineno"> 73</span> </div><div class="line"><a name="l00074"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d"> 74</a></span> <span class="preprocessor">#define BDIGITS(x) (RBIGNUM_DIGITS(x))</span></div><div class="line"><a name="l00075"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1"> 75</a></span> <span class="preprocessor">#define BITSPERDIG (SIZEOF_BDIGITS*CHAR_BIT)</span></div><div class="line"><a name="l00076"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c"> 76</a></span> <span class="preprocessor">#define BIGRAD ((BDIGIT_DBL)1 << BITSPERDIG)</span></div><div class="line"><a name="l00077"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ab39ada1dbad36d23741fe8085bb0bfc2"> 77</a></span> <span class="preprocessor">#define BIGRAD_HALF ((BDIGIT)(BIGRAD >> 1))</span></div><div class="line"><a name="l00078"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db"> 78</a></span> <span class="preprocessor">#define BDIGIT_MSB(d) (((d) & BIGRAD_HALF) != 0)</span></div><div class="line"><a name="l00079"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303"> 79</a></span> <span class="preprocessor">#define BIGUP(x) LSHIFTX(((x) + (BDIGIT_DBL)0), BITSPERDIG)</span></div><div class="line"><a name="l00080"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe"> 80</a></span> <span class="preprocessor">#define BIGDN(x) RSHIFT((x),BITSPERDIG)</span></div><div class="line"><a name="l00081"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73"> 81</a></span> <span class="preprocessor">#define BIGLO(x) ((BDIGIT)((x) & BDIGMAX))</span></div><div class="line"><a name="l00082"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6"> 82</a></span> <span class="preprocessor">#define BDIGMAX ((BDIGIT)(BIGRAD-1))</span></div><div class="line"><a name="l00083"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a0156e0a09bfff4c802111626efc876d2"> 83</a></span> <span class="preprocessor">#define BDIGIT_DBL_MAX (~(BDIGIT_DBL)0)</span></div><div class="line"><a name="l00084"></a><span class="lineno"> 84</span> </div><div class="line"><a name="l00085"></a><span class="lineno"> 85</span> <span class="preprocessor">#if SIZEOF_BDIGITS == 2</span></div><div class="line"><a name="l00086"></a><span class="lineno"> 86</span> <span class="preprocessor"># define swap_bdigit(x) swap16(x)</span></div><div class="line"><a name="l00087"></a><span class="lineno"> 87</span> <span class="preprocessor">#elif SIZEOF_BDIGITS == 4</span></div><div class="line"><a name="l00088"></a><span class="lineno"> 88</span> <span class="preprocessor"># define swap_bdigit(x) swap32(x)</span></div><div class="line"><a name="l00089"></a><span class="lineno"> 89</span> <span class="preprocessor">#elif SIZEOF_BDIGITS == 8</span></div><div class="line"><a name="l00090"></a><span class="lineno"> 90</span> <span class="preprocessor"># define swap_bdigit(x) swap64(x)</span></div><div class="line"><a name="l00091"></a><span class="lineno"> 91</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00092"></a><span class="lineno"> 92</span> </div><div class="line"><a name="l00093"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312"> 93</a></span> <span class="preprocessor">#define BIGZEROP(x) (RBIGNUM_LEN(x) == 0 || \</span></div><div class="line"><a name="l00094"></a><span class="lineno"> 94</span> <span class="preprocessor"> (BDIGITS(x)[0] == 0 && \</span></div><div class="line"><a name="l00095"></a><span class="lineno"> 95</span> <span class="preprocessor"> (RBIGNUM_LEN(x) == 1 || bigzero_p(x))))</span></div><div class="line"><a name="l00096"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d"> 96</a></span> <span class="preprocessor">#define BIGSIZE(x) (RBIGNUM_LEN(x) == 0 ? (size_t)0 : \</span></div><div class="line"><a name="l00097"></a><span class="lineno"> 97</span> <span class="preprocessor"> BDIGITS(x)[RBIGNUM_LEN(x)-1] ? \</span></div><div class="line"><a name="l00098"></a><span class="lineno"> 98</span> <span class="preprocessor"> (size_t)(RBIGNUM_LEN(x)*SIZEOF_BDIGITS - nlz(BDIGITS(x)[RBIGNUM_LEN(x)-1])/CHAR_BIT) : \</span></div><div class="line"><a name="l00099"></a><span class="lineno"> 99</span> <span class="preprocessor"> rb_absint_size(x, NULL))</span></div><div class="line"><a name="l00100"></a><span class="lineno"> 100</span> </div><div class="line"><a name="l00101"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e"> 101</a></span> <span class="preprocessor">#define BIGDIVREM_EXTRA_WORDS 1</span></div><div class="line"><a name="l00102"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa"> 102</a></span> <span class="preprocessor">#define roomof(n, m) ((long)(((n)+(m)-1) / (m)))</span></div><div class="line"><a name="l00103"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308"> 103</a></span> <span class="preprocessor">#define bdigit_roomof(n) roomof(n, SIZEOF_BDIGITS)</span></div><div class="line"><a name="l00104"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517"> 104</a></span> <span class="preprocessor">#define BARY_ARGS(ary) ary, numberof(ary)</span></div><div class="line"><a name="l00105"></a><span class="lineno"> 105</span> </div><div class="line"><a name="l00106"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa096f4faaf8c4a1f90e4ca68f53d28cb"> 106</a></span> <span class="preprocessor">#define BARY_ADD(z, x, y) bary_add(BARY_ARGS(z), BARY_ARGS(x), BARY_ARGS(y))</span></div><div class="line"><a name="l00107"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa99de588906902bc3a4255b72254d9b1"> 107</a></span> <span class="preprocessor">#define BARY_SUB(z, x, y) bary_sub(BARY_ARGS(z), BARY_ARGS(x), BARY_ARGS(y))</span></div><div class="line"><a name="l00108"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af9bebc3d4ee972ff7419afa73acb49e1"> 108</a></span> <span class="preprocessor">#define BARY_SHORT_MUL(z, x, y) bary_short_mul(BARY_ARGS(z), BARY_ARGS(x), BARY_ARGS(y))</span></div><div class="line"><a name="l00109"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a9159c5991b021101e23d94963ce19ddd"> 109</a></span> <span class="preprocessor">#define BARY_DIVMOD(q, r, x, y) bary_divmod(BARY_ARGS(q), BARY_ARGS(r), BARY_ARGS(x), BARY_ARGS(y))</span></div><div class="line"><a name="l00110"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#abc18250a1bf9ee93cc6257153ded1ccc"> 110</a></span> <span class="preprocessor">#define BARY_ZERO_P(x) bary_zero_p(BARY_ARGS(x))</span></div><div class="line"><a name="l00111"></a><span class="lineno"> 111</span> </div><div class="line"><a name="l00112"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5e43bbb0b5abb7127a5e65b3f8a650fc"> 112</a></span> <span class="preprocessor">#define RBIGNUM_SET_NEGATIVE_SIGN(b) RBIGNUM_SET_SIGN(b, 0)</span></div><div class="line"><a name="l00113"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af07b703574484fb572c0cc3408173a38"> 113</a></span> <span class="preprocessor">#define RBIGNUM_SET_POSITIVE_SIGN(b) RBIGNUM_SET_SIGN(b, 1)</span></div><div class="line"><a name="l00114"></a><span class="lineno"> 114</span> </div><div class="line"><a name="l00115"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c"> 115</a></span> <span class="preprocessor">#define bignew(len,sign) bignew_1(rb_cBignum,(len),(sign))</span></div><div class="line"><a name="l00116"></a><span class="lineno"> 116</span> </div><div class="line"><a name="l00117"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c"> 117</a></span> <span class="preprocessor">#define BDIGITS_ZERO(ptr, n) do { \</span></div><div class="line"><a name="l00118"></a><span class="lineno"> 118</span> <span class="preprocessor"> BDIGIT *bdigitz_zero_ptr = (ptr); \</span></div><div class="line"><a name="l00119"></a><span class="lineno"> 119</span> <span class="preprocessor"> size_t bdigitz_zero_n = (n); \</span></div><div class="line"><a name="l00120"></a><span class="lineno"> 120</span> <span class="preprocessor"> while (bdigitz_zero_n) { \</span></div><div class="line"><a name="l00121"></a><span class="lineno"> 121</span> <span class="preprocessor"> *bdigitz_zero_ptr++ = 0; \</span></div><div class="line"><a name="l00122"></a><span class="lineno"> 122</span> <span class="preprocessor"> bdigitz_zero_n--; \</span></div><div class="line"><a name="l00123"></a><span class="lineno"> 123</span> <span class="preprocessor"> } \</span></div><div class="line"><a name="l00124"></a><span class="lineno"> 124</span> <span class="preprocessor">} while (0)</span></div><div class="line"><a name="l00125"></a><span class="lineno"> 125</span> </div><div class="line"><a name="l00126"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12"> 126</a></span> <span class="preprocessor">#define BARY_TRUNC(ds, n) do { \</span></div><div class="line"><a name="l00127"></a><span class="lineno"> 127</span> <span class="preprocessor"> while (0 < (n) && (ds)[(n)-1] == 0) \</span></div><div class="line"><a name="l00128"></a><span class="lineno"> 128</span> <span class="preprocessor"> (n)--; \</span></div><div class="line"><a name="l00129"></a><span class="lineno"> 129</span> <span class="preprocessor"> } while (0)</span></div><div class="line"><a name="l00130"></a><span class="lineno"> 130</span> </div><div class="line"><a name="l00131"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5abddc95277ae9fc652190608e53e28c"> 131</a></span> <span class="preprocessor">#define KARATSUBA_BALANCED(xn, yn) ((yn)/2 < (xn))</span></div><div class="line"><a name="l00132"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad16689892f192aecebbce697c4409d45"> 132</a></span> <span class="preprocessor">#define TOOM3_BALANCED(xn, yn) (((yn)+2)/3 * 2 < (xn))</span></div><div class="line"><a name="l00133"></a><span class="lineno"> 133</span> </div><div class="line"><a name="l00134"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a17b66a15a998788405dc38045e09216c"> 134</a></span> <span class="preprocessor">#define GMP_MUL_DIGITS 20</span></div><div class="line"><a name="l00135"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2"> 135</a></span> <span class="preprocessor">#define KARATSUBA_MUL_DIGITS 70</span></div><div class="line"><a name="l00136"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aba4a162b1237a6a25e6e8b31af64b53c"> 136</a></span> <span class="preprocessor">#define TOOM3_MUL_DIGITS 150</span></div><div class="line"><a name="l00137"></a><span class="lineno"> 137</span> </div><div class="line"><a name="l00138"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a26761962ce3cba5c8938c3ad2dff914e"> 138</a></span> <span class="preprocessor">#define GMP_DIV_DIGITS 20</span></div><div class="line"><a name="l00139"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a608bd1c9d1d6da4baf95633eb21ca662"> 139</a></span> <span class="preprocessor">#define GMP_BIG2STR_DIGITS 20</span></div><div class="line"><a name="l00140"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#acdee5f53dc750ff2ae604232a6389031"> 140</a></span> <span class="preprocessor">#define GMP_STR2BIG_DIGITS 20</span></div><div class="line"><a name="l00141"></a><span class="lineno"> 141</span> </div><div class="line"><a name="l00142"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420"> 142</a></span> <span class="keyword">typedef</span> void (<a class="code" href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420">mulfunc_t</a>)(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn);</div><div class="line"><a name="l00143"></a><span class="lineno"> 143</span> </div><div class="line"><a name="l00144"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984"> 144</a></span> <span class="keyword">static</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420">mulfunc_t</a> <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>;</div><div class="line"><a name="l00145"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7"> 145</a></span> <span class="keyword">static</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420">mulfunc_t</a> <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>;</div><div class="line"><a name="l00146"></a><span class="lineno"> 146</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> <a class="code" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> y);</div><div class="line"><a name="l00147"></a><span class="lineno"> 147</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7a2b8c90e640fa26f4870d8a359552d9">bary_divmod</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keywordtype">size_t</span> qn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *rds, <span class="keywordtype">size_t</span> rn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn);</div><div class="line"><a name="l00148"></a><span class="lineno"> 148</span> </div><div class="line"><a name="l00149"></a><span class="lineno"> 149</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33">bigmul0</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y);</div><div class="line"><a name="l00150"></a><span class="lineno"> 150</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee">bary_mul_toom3</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn);</div><div class="line"><a name="l00151"></a><span class="lineno"> 151</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b">bignew_1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <span class="keywordtype">long</span> len, <span class="keywordtype">int</span> sign);</div><div class="line"><a name="l00152"></a><span class="lineno"> 152</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x);</div><div class="line"><a name="l00153"></a><span class="lineno"> 153</span> </div><div class="line"><a name="l00154"></a><span class="lineno"> 154</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x);</div><div class="line"><a name="l00155"></a><span class="lineno"> 155</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *divp, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *modp);</div><div class="line"><a name="l00156"></a><span class="lineno"> 156</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(<span class="keywordtype">int</span> base, <span class="keywordtype">int</span> power_level, <span class="keywordtype">size_t</span> *numdigits_ret);</div><div class="line"><a name="l00157"></a><span class="lineno"> 157</span> </div><div class="line"><a name="l00158"></a><span class="lineno"> 158</span> <span class="preprocessor">#if SIZEOF_BDIGITS <= SIZEOF_INT</span></div><div class="line"><a name="l00159"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39"> 159</a></span> <span class="keyword">static</span> <span class="keywordtype">int</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x) { <span class="keywordflow">return</span> <a class="code" href="../../db/dde/internal_8h.html#a323735ad9240b9de4b0175594eed2de4">nlz_int</a>((<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)x) - (SIZEOF_INT-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>; }</div><div class="line"><a name="l00160"></a><span class="lineno"> 160</span> <span class="preprocessor">#elif SIZEOF_BDIGITS <= SIZEOF_LONG</span></div><div class="line"><a name="l00161"></a><span class="lineno"> 161</span> <span class="keyword">static</span> <span class="keywordtype">int</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x) { <span class="keywordflow">return</span> <a class="code" href="../../db/dde/internal_8h.html#afd3155042d9d7d93dfc9d3a81aba612a">nlz_long</a>((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)x) - (SIZEOF_LONG-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>; }</div><div class="line"><a name="l00162"></a><span class="lineno"> 162</span> <span class="preprocessor">#elif SIZEOF_BDIGITS <= SIZEOF_LONG_LONG</span></div><div class="line"><a name="l00163"></a><span class="lineno"> 163</span> <span class="keyword">static</span> <span class="keywordtype">int</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x) { <span class="keywordflow">return</span> nlz_long_long((<span class="keywordtype">unsigned</span> LONG_LONG)x) - (SIZEOF_LONG_LONG-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>; }</div><div class="line"><a name="l00164"></a><span class="lineno"> 164</span> <span class="preprocessor">#elif SIZEOF_BDIGITS <= SIZEOF_INT128_T</span></div><div class="line"><a name="l00165"></a><span class="lineno"> 165</span> <span class="keyword">static</span> <span class="keywordtype">int</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x) { <span class="keywordflow">return</span> nlz_int128((uint128_t)x) - (SIZEOF_INT128_T-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>; }</div><div class="line"><a name="l00166"></a><span class="lineno"> 166</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00167"></a><span class="lineno"> 167</span> </div><div class="line"><a name="l00168"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707"> 168</a></span> <span class="preprocessor">#define U16(a) ((uint16_t)(a))</span></div><div class="line"><a name="l00169"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad"> 169</a></span> <span class="preprocessor">#define U32(a) ((uint32_t)(a))</span></div><div class="line"><a name="l00170"></a><span class="lineno"> 170</span> <span class="preprocessor">#ifdef HAVE_UINT64_T</span></div><div class="line"><a name="l00171"></a><span class="lineno"> 171</span> <span class="preprocessor">#define U64(a,b) (((uint64_t)(a) << 32) | (b))</span></div><div class="line"><a name="l00172"></a><span class="lineno"> 172</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00173"></a><span class="lineno"> 173</span> <span class="preprocessor">#ifdef HAVE_UINT128_T</span></div><div class="line"><a name="l00174"></a><span class="lineno"> 174</span> <span class="preprocessor">#define U128(a,b,c,d) (((uint128_t)U64(a,b) << 64) | U64(c,d))</span></div><div class="line"><a name="l00175"></a><span class="lineno"> 175</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00176"></a><span class="lineno"> 176</span> </div><div class="line"><a name="l00177"></a><span class="lineno"> 177</span> <span class="comment">/* The following scirpt, maxpow.rb, generates the tables follows.</span></div><div class="line"><a name="l00178"></a><span class="lineno"> 178</span> <span class="comment"></span></div><div class="line"><a name="l00179"></a><span class="lineno"> 179</span> <span class="comment">def big(n, bits)</span></div><div class="line"><a name="l00180"></a><span class="lineno"> 180</span> <span class="comment"> ns = []</span></div><div class="line"><a name="l00181"></a><span class="lineno"> 181</span> <span class="comment"> ((bits+31)/32).times {</span></div><div class="line"><a name="l00182"></a><span class="lineno"> 182</span> <span class="comment"> ns << sprintf("0x%08x", n & 0xffff_ffff)</span></div><div class="line"><a name="l00183"></a><span class="lineno"> 183</span> <span class="comment"> n >>= 32</span></div><div class="line"><a name="l00184"></a><span class="lineno"> 184</span> <span class="comment"> }</span></div><div class="line"><a name="l00185"></a><span class="lineno"> 185</span> <span class="comment"> "U#{bits}(" + ns.reverse.join(",") + ")"</span></div><div class="line"><a name="l00186"></a><span class="lineno"> 186</span> <span class="comment">end</span></div><div class="line"><a name="l00187"></a><span class="lineno"> 187</span> <span class="comment">def values(ary, width, indent)</span></div><div class="line"><a name="l00188"></a><span class="lineno"> 188</span> <span class="comment"> lines = [""]</span></div><div class="line"><a name="l00189"></a><span class="lineno"> 189</span> <span class="comment"> ary.each {|e|</span></div><div class="line"><a name="l00190"></a><span class="lineno"> 190</span> <span class="comment"> lines << "" if !ary.last.empty? && width < (lines.last + e + ", ").length</span></div><div class="line"><a name="l00191"></a><span class="lineno"> 191</span> <span class="comment"> lines.last << e + ", "</span></div><div class="line"><a name="l00192"></a><span class="lineno"> 192</span> <span class="comment"> }</span></div><div class="line"><a name="l00193"></a><span class="lineno"> 193</span> <span class="comment"> lines.map {|line| " " * indent + line.chomp(" ") + "\n" }.join</span></div><div class="line"><a name="l00194"></a><span class="lineno"> 194</span> <span class="comment">end</span></div><div class="line"><a name="l00195"></a><span class="lineno"> 195</span> <span class="comment">[16,32,64,128].each {|bits|</span></div><div class="line"><a name="l00196"></a><span class="lineno"> 196</span> <span class="comment"> max = 2**bits-1</span></div><div class="line"><a name="l00197"></a><span class="lineno"> 197</span> <span class="comment"> exps = []</span></div><div class="line"><a name="l00198"></a><span class="lineno"> 198</span> <span class="comment"> nums = []</span></div><div class="line"><a name="l00199"></a><span class="lineno"> 199</span> <span class="comment"> 2.upto(36) {|base|</span></div><div class="line"><a name="l00200"></a><span class="lineno"> 200</span> <span class="comment"> exp = 0</span></div><div class="line"><a name="l00201"></a><span class="lineno"> 201</span> <span class="comment"> n = 1</span></div><div class="line"><a name="l00202"></a><span class="lineno"> 202</span> <span class="comment"> while n * base <= max</span></div><div class="line"><a name="l00203"></a><span class="lineno"> 203</span> <span class="comment"> exp += 1</span></div><div class="line"><a name="l00204"></a><span class="lineno"> 204</span> <span class="comment"> n *= base</span></div><div class="line"><a name="l00205"></a><span class="lineno"> 205</span> <span class="comment"> end</span></div><div class="line"><a name="l00206"></a><span class="lineno"> 206</span> <span class="comment"> exps << exp.to_s</span></div><div class="line"><a name="l00207"></a><span class="lineno"> 207</span> <span class="comment"> nums << big(n, bits)</span></div><div class="line"><a name="l00208"></a><span class="lineno"> 208</span> <span class="comment"> }</span></div><div class="line"><a name="l00209"></a><span class="lineno"> 209</span> <span class="comment"> puts "#ifdef HAVE_UINT#{bits}_T"</span></div><div class="line"><a name="l00210"></a><span class="lineno"> 210</span> <span class="comment"> puts "static const int maxpow#{bits}_exp[35] = {"</span></div><div class="line"><a name="l00211"></a><span class="lineno"> 211</span> <span class="comment"> print values(exps, 70, 4)</span></div><div class="line"><a name="l00212"></a><span class="lineno"> 212</span> <span class="comment"> puts "};"</span></div><div class="line"><a name="l00213"></a><span class="lineno"> 213</span> <span class="comment"> puts "static const uint#{bits}_t maxpow#{bits}_num[35] = {"</span></div><div class="line"><a name="l00214"></a><span class="lineno"> 214</span> <span class="comment"> print values(nums, 70, 4)</span></div><div class="line"><a name="l00215"></a><span class="lineno"> 215</span> <span class="comment"> puts "};"</span></div><div class="line"><a name="l00216"></a><span class="lineno"> 216</span> <span class="comment"> puts "#endif"</span></div><div class="line"><a name="l00217"></a><span class="lineno"> 217</span> <span class="comment">}</span></div><div class="line"><a name="l00218"></a><span class="lineno"> 218</span> <span class="comment"></span></div><div class="line"><a name="l00219"></a><span class="lineno"> 219</span> <span class="comment"> */</span></div><div class="line"><a name="l00220"></a><span class="lineno"> 220</span> </div><div class="line"><a name="l00221"></a><span class="lineno"> 221</span> <span class="preprocessor">#if SIZEOF_BDIGIT_DBL == 2</span></div><div class="line"><a name="l00222"></a><span class="lineno"> 222</span> <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">int</span> maxpow16_exp[35] = {</div><div class="line"><a name="l00223"></a><span class="lineno"> 223</span>  15, 10, 7, 6, 6, 5, 5, 5, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3,</div><div class="line"><a name="l00224"></a><span class="lineno"> 224</span>  3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,</div><div class="line"><a name="l00225"></a><span class="lineno"> 225</span> };</div><div class="line"><a name="l00226"></a><span class="lineno"> 226</span> <span class="keyword">static</span> <span class="keyword">const</span> uint16_t maxpow16_num[35] = {</div><div class="line"><a name="l00227"></a><span class="lineno"> 227</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00008000), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000e6a9), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00004000), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00003d09),</div><div class="line"><a name="l00228"></a><span class="lineno"> 228</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000b640), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x000041a7), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00008000), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000e6a9),</div><div class="line"><a name="l00229"></a><span class="lineno"> 229</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00002710), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00003931), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00005100), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00006f91),</div><div class="line"><a name="l00230"></a><span class="lineno"> 230</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00009610), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000c5c1), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00001000), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00001331),</div><div class="line"><a name="l00231"></a><span class="lineno"> 231</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x000016c8), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00001acb), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00001f40), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000242d),</div><div class="line"><a name="l00232"></a><span class="lineno"> 232</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00002998), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00002f87), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00003600), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00003d09),</div><div class="line"><a name="l00233"></a><span class="lineno"> 233</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x000044a8), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00004ce3), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x000055c0), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00005f45),</div><div class="line"><a name="l00234"></a><span class="lineno"> 234</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00006978), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000745f), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00008000), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00008c61),</div><div class="line"><a name="l00235"></a><span class="lineno"> 235</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x00009988), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000a77b), <a class="code" href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a>(0x0000b640),</div><div class="line"><a name="l00236"></a><span class="lineno"> 236</span> };</div><div class="line"><a name="l00237"></a><span class="lineno"> 237</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 4</span></div><div class="line"><a name="l00238"></a><span class="lineno"> 238</span> <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">int</span> maxpow32_exp[35] = {</div><div class="line"><a name="l00239"></a><span class="lineno"> 239</span>  31, 20, 15, 13, 12, 11, 10, 10, 9, 9, 8, 8, 8, 8, 7, 7, 7, 7, 7, 7,</div><div class="line"><a name="l00240"></a><span class="lineno"> 240</span>  7, 7, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,</div><div class="line"><a name="l00241"></a><span class="lineno"> 241</span> };</div><div class="line"><a name="l00242"></a><span class="lineno"> 242</span> <span class="keyword">static</span> <span class="keyword">const</span> <a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> maxpow32_num[35] = {</div><div class="line"><a name="l00243"></a><span class="lineno"> 243</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x80000000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0xcfd41b91), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x40000000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x48c27395),</div><div class="line"><a name="l00244"></a><span class="lineno"> 244</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x81bf1000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x75db9c97), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x40000000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0xcfd41b91),</div><div class="line"><a name="l00245"></a><span class="lineno"> 245</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x3b9aca00), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x8c8b6d2b), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x19a10000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x309f1021),</div><div class="line"><a name="l00246"></a><span class="lineno"> 246</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x57f6c100), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x98c29b81), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x10000000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x18754571),</div><div class="line"><a name="l00247"></a><span class="lineno"> 247</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x247dbc80), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x3547667b), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x4c4b4000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x6b5a6e1d),</div><div class="line"><a name="l00248"></a><span class="lineno"> 248</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x94ace180), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0xcaf18367), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x0b640000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x0e8d4a51),</div><div class="line"><a name="l00249"></a><span class="lineno"> 249</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x1269ae40), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x17179149), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x1cb91000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x23744899),</div><div class="line"><a name="l00250"></a><span class="lineno"> 250</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x2b73a840), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x34e63b41), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x40000000), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x4cfa3cc1),</div><div class="line"><a name="l00251"></a><span class="lineno"> 251</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x5c13d840), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x6d91b519), <a class="code" href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a>(0x81bf1000),</div><div class="line"><a name="l00252"></a><span class="lineno"> 252</span> };</div><div class="line"><a name="l00253"></a><span class="lineno"> 253</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 8 && defined HAVE_UINT64_T</span></div><div class="line"><a name="l00254"></a><span class="lineno"> 254</span> <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">int</span> maxpow64_exp[35] = {</div><div class="line"><a name="l00255"></a><span class="lineno"> 255</span>  63, 40, 31, 27, 24, 22, 21, 20, 19, 18, 17, 17, 16, 16, 15, 15, 15,</div><div class="line"><a name="l00256"></a><span class="lineno"> 256</span>  15, 14, 14, 14, 14, 13, 13, 13, 13, 13, 13, 13, 12, 12, 12, 12, 12,</div><div class="line"><a name="l00257"></a><span class="lineno"> 257</span>  12,</div><div class="line"><a name="l00258"></a><span class="lineno"> 258</span> };</div><div class="line"><a name="l00259"></a><span class="lineno"> 259</span> <span class="keyword">static</span> <span class="keyword">const</span> <a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> maxpow64_num[35] = {</div><div class="line"><a name="l00260"></a><span class="lineno"> 260</span>  U64(0x80000000,0x00000000), U64(0xa8b8b452,0x291fe821),</div><div class="line"><a name="l00261"></a><span class="lineno"> 261</span>  U64(0x40000000,0x00000000), U64(0x6765c793,0xfa10079d),</div><div class="line"><a name="l00262"></a><span class="lineno"> 262</span>  U64(0x41c21cb8,0xe1000000), U64(0x36427987,0x50226111),</div><div class="line"><a name="l00263"></a><span class="lineno"> 263</span>  U64(0x80000000,0x00000000), U64(0xa8b8b452,0x291fe821),</div><div class="line"><a name="l00264"></a><span class="lineno"> 264</span>  U64(0x8ac72304,0x89e80000), U64(0x4d28cb56,0xc33fa539),</div><div class="line"><a name="l00265"></a><span class="lineno"> 265</span>  U64(0x1eca170c,0x00000000), U64(0x780c7372,0x621bd74d),</div><div class="line"><a name="l00266"></a><span class="lineno"> 266</span>  U64(0x1e39a505,0x7d810000), U64(0x5b27ac99,0x3df97701),</div><div class="line"><a name="l00267"></a><span class="lineno"> 267</span>  U64(0x10000000,0x00000000), U64(0x27b95e99,0x7e21d9f1),</div><div class="line"><a name="l00268"></a><span class="lineno"> 268</span>  U64(0x5da0e1e5,0x3c5c8000), U64(0xd2ae3299,0xc1c4aedb),</div><div class="line"><a name="l00269"></a><span class="lineno"> 269</span>  U64(0x16bcc41e,0x90000000), U64(0x2d04b7fd,0xd9c0ef49),</div><div class="line"><a name="l00270"></a><span class="lineno"> 270</span>  U64(0x5658597b,0xcaa24000), U64(0xa0e20737,0x37609371),</div><div class="line"><a name="l00271"></a><span class="lineno"> 271</span>  U64(0x0c29e980,0x00000000), U64(0x14adf4b7,0x320334b9),</div><div class="line"><a name="l00272"></a><span class="lineno"> 272</span>  U64(0x226ed364,0x78bfa000), U64(0x383d9170,0xb85ff80b),</div><div class="line"><a name="l00273"></a><span class="lineno"> 273</span>  U64(0x5a3c23e3,0x9c000000), U64(0x8e651373,0x88122bcd),</div><div class="line"><a name="l00274"></a><span class="lineno"> 274</span>  U64(0xdd41bb36,0xd259e000), U64(0x0aee5720,0xee830681),</div><div class="line"><a name="l00275"></a><span class="lineno"> 275</span>  U64(0x10000000,0x00000000), U64(0x172588ad,0x4f5f0981),</div><div class="line"><a name="l00276"></a><span class="lineno"> 276</span>  U64(0x211e44f7,0xd02c1000), U64(0x2ee56725,0xf06e5c71),</div><div class="line"><a name="l00277"></a><span class="lineno"> 277</span>  U64(0x41c21cb8,0xe1000000),</div><div class="line"><a name="l00278"></a><span class="lineno"> 278</span> };</div><div class="line"><a name="l00279"></a><span class="lineno"> 279</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 16 && defined HAVE_UINT128_T</span></div><div class="line"><a name="l00280"></a><span class="lineno"> 280</span> <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">int</span> maxpow128_exp[35] = {</div><div class="line"><a name="l00281"></a><span class="lineno"> 281</span>  127, 80, 63, 55, 49, 45, 42, 40, 38, 37, 35, 34, 33, 32, 31, 31, 30,</div><div class="line"><a name="l00282"></a><span class="lineno"> 282</span>  30, 29, 29, 28, 28, 27, 27, 27, 26, 26, 26, 26, 25, 25, 25, 25, 24,</div><div class="line"><a name="l00283"></a><span class="lineno"> 283</span>  24,</div><div class="line"><a name="l00284"></a><span class="lineno"> 284</span> };</div><div class="line"><a name="l00285"></a><span class="lineno"> 285</span> <span class="keyword">static</span> <span class="keyword">const</span> uint128_t maxpow128_num[35] = {</div><div class="line"><a name="l00286"></a><span class="lineno"> 286</span>  U128(0x80000000,0x00000000,0x00000000,0x00000000),</div><div class="line"><a name="l00287"></a><span class="lineno"> 287</span>  U128(0x6f32f1ef,0x8b18a2bc,0x3cea5978,0x9c79d441),</div><div class="line"><a name="l00288"></a><span class="lineno"> 288</span>  U128(0x40000000,0x00000000,0x00000000,0x00000000),</div><div class="line"><a name="l00289"></a><span class="lineno"> 289</span>  U128(0xd0cf4b50,0xcfe20765,0xfff4b4e3,0xf741cf6d),</div><div class="line"><a name="l00290"></a><span class="lineno"> 290</span>  U128(0x6558e2a0,0x921fe069,0x42860000,0x00000000),</div><div class="line"><a name="l00291"></a><span class="lineno"> 291</span>  U128(0x5080c7b7,0xd0e31ba7,0x5911a67d,0xdd3d35e7),</div><div class="line"><a name="l00292"></a><span class="lineno"> 292</span>  U128(0x40000000,0x00000000,0x00000000,0x00000000),</div><div class="line"><a name="l00293"></a><span class="lineno"> 293</span>  U128(0x6f32f1ef,0x8b18a2bc,0x3cea5978,0x9c79d441),</div><div class="line"><a name="l00294"></a><span class="lineno"> 294</span>  U128(0x4b3b4ca8,0x5a86c47a,0x098a2240,0x00000000),</div><div class="line"><a name="l00295"></a><span class="lineno"> 295</span>  U128(0xffd1390a,0x0adc2fb8,0xdabbb817,0x4d95c99b),</div><div class="line"><a name="l00296"></a><span class="lineno"> 296</span>  U128(0x2c6fdb36,0x4c25e6c0,0x00000000,0x00000000),</div><div class="line"><a name="l00297"></a><span class="lineno"> 297</span>  U128(0x384bacd6,0x42c343b4,0xe90c4272,0x13506d29),</div><div class="line"><a name="l00298"></a><span class="lineno"> 298</span>  U128(0x31f5db32,0xa34aced6,0x0bf13a0e,0x00000000),</div><div class="line"><a name="l00299"></a><span class="lineno"> 299</span>  U128(0x20753ada,0xfd1e839f,0x53686d01,0x3143ee01),</div><div class="line"><a name="l00300"></a><span class="lineno"> 300</span>  U128(0x10000000,0x00000000,0x00000000,0x00000000),</div><div class="line"><a name="l00301"></a><span class="lineno"> 301</span>  U128(0x68ca11d6,0xb4f6d1d1,0xfaa82667,0x8073c2f1),</div><div class="line"><a name="l00302"></a><span class="lineno"> 302</span>  U128(0x223e493b,0xb3bb69ff,0xa4b87d6c,0x40000000),</div><div class="line"><a name="l00303"></a><span class="lineno"> 303</span>  U128(0xad62418d,0x14ea8247,0x01c4b488,0x6cc66f59),</div><div class="line"><a name="l00304"></a><span class="lineno"> 304</span>  U128(0x2863c1f5,0xcdae42f9,0x54000000,0x00000000),</div><div class="line"><a name="l00305"></a><span class="lineno"> 305</span>  U128(0xa63fd833,0xb9386b07,0x36039e82,0xbe651b25),</div><div class="line"><a name="l00306"></a><span class="lineno"> 306</span>  U128(0x1d1f7a9c,0xd087a14d,0x28cdf3d5,0x10000000),</div><div class="line"><a name="l00307"></a><span class="lineno"> 307</span>  U128(0x651b5095,0xc2ea8fc1,0xb30e2c57,0x77aaf7e1),</div><div class="line"><a name="l00308"></a><span class="lineno"> 308</span>  U128(0x0ddef20e,0xff760000,0x00000000,0x00000000),</div><div class="line"><a name="l00309"></a><span class="lineno"> 309</span>  U128(0x29c30f10,0x29939b14,0x6664242d,0x97d9f649),</div><div class="line"><a name="l00310"></a><span class="lineno"> 310</span>  U128(0x786a435a,0xe9558b0e,0x6aaf6d63,0xa8000000),</div><div class="line"><a name="l00311"></a><span class="lineno"> 311</span>  U128(0x0c5afe6f,0xf302bcbf,0x94fd9829,0xd87f5079),</div><div class="line"><a name="l00312"></a><span class="lineno"> 312</span>  U128(0x1fce575c,0xe1692706,0x07100000,0x00000000),</div><div class="line"><a name="l00313"></a><span class="lineno"> 313</span>  U128(0x4f34497c,0x8597e144,0x36e91802,0x00528229),</div><div class="line"><a name="l00314"></a><span class="lineno"> 314</span>  U128(0xbf3a8e1d,0x41ef2170,0x7802130d,0x84000000),</div><div class="line"><a name="l00315"></a><span class="lineno"> 315</span>  U128(0x0e7819e1,0x7f1eb0fb,0x6ee4fb89,0x01d9531f),</div><div class="line"><a name="l00316"></a><span class="lineno"> 316</span>  U128(0x20000000,0x00000000,0x00000000,0x00000000),</div><div class="line"><a name="l00317"></a><span class="lineno"> 317</span>  U128(0x4510460d,0xd9e879c0,0x14a82375,0x2f22b321),</div><div class="line"><a name="l00318"></a><span class="lineno"> 318</span>  U128(0x91abce3c,0x4b4117ad,0xe76d35db,0x22000000),</div><div class="line"><a name="l00319"></a><span class="lineno"> 319</span>  U128(0x08973ea3,0x55d75bc2,0x2e42c391,0x727d69e1),</div><div class="line"><a name="l00320"></a><span class="lineno"> 320</span>  U128(0x10e425c5,0x6daffabc,0x35c10000,0x00000000),</div><div class="line"><a name="l00321"></a><span class="lineno"> 321</span> };</div><div class="line"><a name="l00322"></a><span class="lineno"> 322</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00323"></a><span class="lineno"> 323</span> </div><div class="line"><a name="l00324"></a><span class="lineno"> 324</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a></div><div class="line"><a name="l00325"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2"> 325</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(<span class="keywordtype">int</span> base, <span class="keywordtype">int</span> *exp_ret)</div><div class="line"><a name="l00326"></a><span class="lineno"> 326</span> {</div><div class="line"><a name="l00327"></a><span class="lineno"> 327</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> maxpow;</div><div class="line"><a name="l00328"></a><span class="lineno"> 328</span>  <span class="keywordtype">int</span> exponent;</div><div class="line"><a name="l00329"></a><span class="lineno"> 329</span> </div><div class="line"><a name="l00330"></a><span class="lineno"> 330</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(2 <= base && base <= 36);</div><div class="line"><a name="l00331"></a><span class="lineno"> 331</span> </div><div class="line"><a name="l00332"></a><span class="lineno"> 332</span>  {</div><div class="line"><a name="l00333"></a><span class="lineno"> 333</span> <span class="preprocessor">#if SIZEOF_BDIGIT_DBL == 2</span></div><div class="line"><a name="l00334"></a><span class="lineno"> 334</span>  maxpow = maxpow16_num[base-2];</div><div class="line"><a name="l00335"></a><span class="lineno"> 335</span>  exponent = maxpow16_exp[base-2];</div><div class="line"><a name="l00336"></a><span class="lineno"> 336</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 4</span></div><div class="line"><a name="l00337"></a><span class="lineno"> 337</span>  maxpow = maxpow32_num[base-2];</div><div class="line"><a name="l00338"></a><span class="lineno"> 338</span>  exponent = maxpow32_exp[base-2];</div><div class="line"><a name="l00339"></a><span class="lineno"> 339</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 8 && defined HAVE_UINT64_T</span></div><div class="line"><a name="l00340"></a><span class="lineno"> 340</span>  maxpow = maxpow64_num[base-2];</div><div class="line"><a name="l00341"></a><span class="lineno"> 341</span>  exponent = maxpow64_exp[base-2];</div><div class="line"><a name="l00342"></a><span class="lineno"> 342</span> <span class="preprocessor">#elif SIZEOF_BDIGIT_DBL == 16 && defined HAVE_UINT128_T</span></div><div class="line"><a name="l00343"></a><span class="lineno"> 343</span>  maxpow = maxpow128_num[base-2];</div><div class="line"><a name="l00344"></a><span class="lineno"> 344</span>  exponent = maxpow128_exp[base-2];</div><div class="line"><a name="l00345"></a><span class="lineno"> 345</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00346"></a><span class="lineno"> 346</span>  maxpow = base;</div><div class="line"><a name="l00347"></a><span class="lineno"> 347</span>  exponent = 1;</div><div class="line"><a name="l00348"></a><span class="lineno"> 348</span>  <span class="keywordflow">while</span> (maxpow <= <a class="code" href="../../d1/dcc/bignum_8c.html#a0156e0a09bfff4c802111626efc876d2">BDIGIT_DBL_MAX</a> / base) {</div><div class="line"><a name="l00349"></a><span class="lineno"> 349</span>  maxpow *= base;</div><div class="line"><a name="l00350"></a><span class="lineno"> 350</span>  exponent++;</div><div class="line"><a name="l00351"></a><span class="lineno"> 351</span>  }</div><div class="line"><a name="l00352"></a><span class="lineno"> 352</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00353"></a><span class="lineno"> 353</span>  }</div><div class="line"><a name="l00354"></a><span class="lineno"> 354</span> </div><div class="line"><a name="l00355"></a><span class="lineno"> 355</span>  *exp_ret = exponent;</div><div class="line"><a name="l00356"></a><span class="lineno"> 356</span>  <span class="keywordflow">return</span> maxpow;</div><div class="line"><a name="l00357"></a><span class="lineno"> 357</span> }</div><div class="line"><a name="l00358"></a><span class="lineno"> 358</span> </div><div class="line"><a name="l00359"></a><span class="lineno"> 359</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a></div><div class="line"><a name="l00360"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66"> 360</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(<span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n)</div><div class="line"><a name="l00361"></a><span class="lineno"> 361</span> {</div><div class="line"><a name="l00362"></a><span class="lineno"> 362</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(n <= 2);</div><div class="line"><a name="l00363"></a><span class="lineno"> 363</span> </div><div class="line"><a name="l00364"></a><span class="lineno"> 364</span>  <span class="keywordflow">if</span> (n == 2)</div><div class="line"><a name="l00365"></a><span class="lineno"> 365</span>  <span class="keywordflow">return</span> ds[0] | <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(ds[1]);</div><div class="line"><a name="l00366"></a><span class="lineno"> 366</span>  <span class="keywordflow">if</span> (n == 1)</div><div class="line"><a name="l00367"></a><span class="lineno"> 367</span>  <span class="keywordflow">return</span> ds[0];</div><div class="line"><a name="l00368"></a><span class="lineno"> 368</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00369"></a><span class="lineno"> 369</span> }</div><div class="line"><a name="l00370"></a><span class="lineno"> 370</span> </div><div class="line"><a name="l00371"></a><span class="lineno"> 371</span> <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00372"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a364d0cb01e91a0fc47efecc51430ff0b"> 372</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a364d0cb01e91a0fc47efecc51430ff0b">bdigitdbl2bary</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num)</div><div class="line"><a name="l00373"></a><span class="lineno"> 373</span> {</div><div class="line"><a name="l00374"></a><span class="lineno"> 374</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(n == 2);</div><div class="line"><a name="l00375"></a><span class="lineno"> 375</span> </div><div class="line"><a name="l00376"></a><span class="lineno"> 376</span>  ds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l00377"></a><span class="lineno"> 377</span>  ds[1] = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l00378"></a><span class="lineno"> 378</span> }</div><div class="line"><a name="l00379"></a><span class="lineno"> 379</span> </div><div class="line"><a name="l00380"></a><span class="lineno"> 380</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00381"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f"> 381</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f">bary_cmp</a>(<span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l00382"></a><span class="lineno"> 382</span> {</div><div class="line"><a name="l00383"></a><span class="lineno"> 383</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l00384"></a><span class="lineno"> 384</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(yds, yn);</div><div class="line"><a name="l00385"></a><span class="lineno"> 385</span> </div><div class="line"><a name="l00386"></a><span class="lineno"> 386</span>  <span class="keywordflow">if</span> (xn < yn)</div><div class="line"><a name="l00387"></a><span class="lineno"> 387</span>  <span class="keywordflow">return</span> -1;</div><div class="line"><a name="l00388"></a><span class="lineno"> 388</span>  <span class="keywordflow">if</span> (xn > yn)</div><div class="line"><a name="l00389"></a><span class="lineno"> 389</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00390"></a><span class="lineno"> 390</span> </div><div class="line"><a name="l00391"></a><span class="lineno"> 391</span>  <span class="keywordflow">while</span> (xn-- && xds[xn] == yds[xn])</div><div class="line"><a name="l00392"></a><span class="lineno"> 392</span>  ;</div><div class="line"><a name="l00393"></a><span class="lineno"> 393</span>  <span class="keywordflow">if</span> (xn == (<span class="keywordtype">size_t</span>)-1)</div><div class="line"><a name="l00394"></a><span class="lineno"> 394</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00395"></a><span class="lineno"> 395</span>  <span class="keywordflow">return</span> xds[xn] < yds[xn] ? -1 : 1;</div><div class="line"><a name="l00396"></a><span class="lineno"> 396</span> }</div><div class="line"><a name="l00397"></a><span class="lineno"> 397</span> </div><div class="line"><a name="l00398"></a><span class="lineno"> 398</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a></div><div class="line"><a name="l00399"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d"> 399</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> n, <span class="keywordtype">int</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>)</div><div class="line"><a name="l00400"></a><span class="lineno"> 400</span> {</div><div class="line"><a name="l00401"></a><span class="lineno"> 401</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l00402"></a><span class="lineno"> 402</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num = 0;</div><div class="line"><a name="l00403"></a><span class="lineno"> 403</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(0 <= <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> && <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> < <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l00404"></a><span class="lineno"> 404</span> </div><div class="line"><a name="l00405"></a><span class="lineno"> 405</span>  <span class="keywordflow">for</span> (i=0; i<n; i++) {</div><div class="line"><a name="l00406"></a><span class="lineno"> 406</span>  num = num | (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)*xds++ << <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l00407"></a><span class="lineno"> 407</span>  *zds++ = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l00408"></a><span class="lineno"> 408</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l00409"></a><span class="lineno"> 409</span>  }</div><div class="line"><a name="l00410"></a><span class="lineno"> 410</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l00411"></a><span class="lineno"> 411</span> }</div><div class="line"><a name="l00412"></a><span class="lineno"> 412</span> </div><div class="line"><a name="l00413"></a><span class="lineno"> 413</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00414"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f"> 414</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> n, <span class="keywordtype">int</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> higher_bdigit)</div><div class="line"><a name="l00415"></a><span class="lineno"> 415</span> {</div><div class="line"><a name="l00416"></a><span class="lineno"> 416</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num = 0;</div><div class="line"><a name="l00417"></a><span class="lineno"> 417</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x;</div><div class="line"><a name="l00418"></a><span class="lineno"> 418</span> </div><div class="line"><a name="l00419"></a><span class="lineno"> 419</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(0 <= <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> && <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> < <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l00420"></a><span class="lineno"> 420</span> </div><div class="line"><a name="l00421"></a><span class="lineno"> 421</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(higher_bdigit);</div><div class="line"><a name="l00422"></a><span class="lineno"> 422</span>  <span class="keywordflow">while</span> (n--) {</div><div class="line"><a name="l00423"></a><span class="lineno"> 423</span>  num = (num | xds[n]) >> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l00424"></a><span class="lineno"> 424</span>  x = xds[n];</div><div class="line"><a name="l00425"></a><span class="lineno"> 425</span>  zds[n] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l00426"></a><span class="lineno"> 426</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(x);</div><div class="line"><a name="l00427"></a><span class="lineno"> 427</span>  }</div><div class="line"><a name="l00428"></a><span class="lineno"> 428</span> }</div><div class="line"><a name="l00429"></a><span class="lineno"> 429</span> </div><div class="line"><a name="l00430"></a><span class="lineno"> 430</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00431"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d"> 431</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn)</div><div class="line"><a name="l00432"></a><span class="lineno"> 432</span> {</div><div class="line"><a name="l00433"></a><span class="lineno"> 433</span>  <span class="keywordflow">if</span> (xn == 0)</div><div class="line"><a name="l00434"></a><span class="lineno"> 434</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00435"></a><span class="lineno"> 435</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l00436"></a><span class="lineno"> 436</span>  <span class="keywordflow">if</span> (xds[--xn]) <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00437"></a><span class="lineno"> 437</span>  } <span class="keywordflow">while</span> (xn);</div><div class="line"><a name="l00438"></a><span class="lineno"> 438</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00439"></a><span class="lineno"> 439</span> }</div><div class="line"><a name="l00440"></a><span class="lineno"> 440</span> </div><div class="line"><a name="l00441"></a><span class="lineno"> 441</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00442"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af472e31a1f27a51efa568d73b9ebf952"> 442</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af472e31a1f27a51efa568d73b9ebf952">bary_neg</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n)</div><div class="line"><a name="l00443"></a><span class="lineno"> 443</span> {</div><div class="line"><a name="l00444"></a><span class="lineno"> 444</span>  <span class="keywordflow">while</span> (n--)</div><div class="line"><a name="l00445"></a><span class="lineno"> 445</span>  ds[n] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(~ds[n]);</div><div class="line"><a name="l00446"></a><span class="lineno"> 446</span> }</div><div class="line"><a name="l00447"></a><span class="lineno"> 447</span> </div><div class="line"><a name="l00448"></a><span class="lineno"> 448</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00449"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053"> 449</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n)</div><div class="line"><a name="l00450"></a><span class="lineno"> 450</span> {</div><div class="line"><a name="l00451"></a><span class="lineno"> 451</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l00452"></a><span class="lineno"> 452</span>  i = 0;</div><div class="line"><a name="l00453"></a><span class="lineno"> 453</span>  <span class="keywordflow">for</span> (i = 0; i < n; i++) {</div><div class="line"><a name="l00454"></a><span class="lineno"> 454</span>  <span class="keywordflow">if</span> (ds[i] != 0) {</div><div class="line"><a name="l00455"></a><span class="lineno"> 455</span>  <span class="keywordflow">goto</span> non_zero;</div><div class="line"><a name="l00456"></a><span class="lineno"> 456</span>  }</div><div class="line"><a name="l00457"></a><span class="lineno"> 457</span>  }</div><div class="line"><a name="l00458"></a><span class="lineno"> 458</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00459"></a><span class="lineno"> 459</span> </div><div class="line"><a name="l00460"></a><span class="lineno"> 460</span>  non_zero:</div><div class="line"><a name="l00461"></a><span class="lineno"> 461</span>  ds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(~ds[i] + 1);</div><div class="line"><a name="l00462"></a><span class="lineno"> 462</span>  i++;</div><div class="line"><a name="l00463"></a><span class="lineno"> 463</span>  <span class="keywordflow">for</span> (; i < n; i++) {</div><div class="line"><a name="l00464"></a><span class="lineno"> 464</span>  ds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(~ds[i]);</div><div class="line"><a name="l00465"></a><span class="lineno"> 465</span>  }</div><div class="line"><a name="l00466"></a><span class="lineno"> 466</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00467"></a><span class="lineno"> 467</span> }</div><div class="line"><a name="l00468"></a><span class="lineno"> 468</span> </div><div class="line"><a name="l00469"></a><span class="lineno"> 469</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00470"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d"> 470</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> num_bdigits)</div><div class="line"><a name="l00471"></a><span class="lineno"> 471</span> {</div><div class="line"><a name="l00472"></a><span class="lineno"> 472</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *p1 = ds;</div><div class="line"><a name="l00473"></a><span class="lineno"> 473</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *p2 = ds + num_bdigits - 1;</div><div class="line"><a name="l00474"></a><span class="lineno"> 474</span>  <span class="keywordflow">for</span> (; p1 < p2; p1++, p2--) {</div><div class="line"><a name="l00475"></a><span class="lineno"> 475</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> tmp = *p1;</div><div class="line"><a name="l00476"></a><span class="lineno"> 476</span>  *p1 = *p2;</div><div class="line"><a name="l00477"></a><span class="lineno"> 477</span>  *p2 = tmp;</div><div class="line"><a name="l00478"></a><span class="lineno"> 478</span>  }</div><div class="line"><a name="l00479"></a><span class="lineno"> 479</span> }</div><div class="line"><a name="l00480"></a><span class="lineno"> 480</span> </div><div class="line"><a name="l00481"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728"> 481</a></span> <span class="preprocessor">#define INTEGER_PACK_WORDORDER_MASK \</span></div><div class="line"><a name="l00482"></a><span class="lineno"> 482</span> <span class="preprocessor"> (INTEGER_PACK_MSWORD_FIRST | \</span></div><div class="line"><a name="l00483"></a><span class="lineno"> 483</span> <span class="preprocessor"> INTEGER_PACK_LSWORD_FIRST)</span></div><div class="line"><a name="l00484"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363"> 484</a></span> <span class="preprocessor">#define INTEGER_PACK_BYTEORDER_MASK \</span></div><div class="line"><a name="l00485"></a><span class="lineno"> 485</span> <span class="preprocessor"> (INTEGER_PACK_MSBYTE_FIRST | \</span></div><div class="line"><a name="l00486"></a><span class="lineno"> 486</span> <span class="preprocessor"> INTEGER_PACK_LSBYTE_FIRST | \</span></div><div class="line"><a name="l00487"></a><span class="lineno"> 487</span> <span class="preprocessor"> INTEGER_PACK_NATIVE_BYTE_ORDER)</span></div><div class="line"><a name="l00488"></a><span class="lineno"> 488</span> </div><div class="line"><a name="l00489"></a><span class="lineno"> 489</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00490"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17"> 490</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17">validate_integer_pack_format</a>(<span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags, <span class="keywordtype">int</span> supported_flags)</div><div class="line"><a name="l00491"></a><span class="lineno"> 491</span> {</div><div class="line"><a name="l00492"></a><span class="lineno"> 492</span>  <span class="keywordtype">int</span> wordorder_bits = flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728">INTEGER_PACK_WORDORDER_MASK</a>;</div><div class="line"><a name="l00493"></a><span class="lineno"> 493</span>  <span class="keywordtype">int</span> byteorder_bits = flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>;</div><div class="line"><a name="l00494"></a><span class="lineno"> 494</span> </div><div class="line"><a name="l00495"></a><span class="lineno"> 495</span>  <span class="keywordflow">if</span> (flags & ~supported_flags) {</div><div class="line"><a name="l00496"></a><span class="lineno"> 496</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unsupported flags specified"</span>);</div><div class="line"><a name="l00497"></a><span class="lineno"> 497</span>  }</div><div class="line"><a name="l00498"></a><span class="lineno"> 498</span>  <span class="keywordflow">if</span> (wordorder_bits == 0) {</div><div class="line"><a name="l00499"></a><span class="lineno"> 499</span>  <span class="keywordflow">if</span> (1 < numwords)</div><div class="line"><a name="l00500"></a><span class="lineno"> 500</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"word order not specified"</span>);</div><div class="line"><a name="l00501"></a><span class="lineno"> 501</span>  }</div><div class="line"><a name="l00502"></a><span class="lineno"> 502</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (wordorder_bits != <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a> &&</div><div class="line"><a name="l00503"></a><span class="lineno"> 503</span>  wordorder_bits != <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>)</div><div class="line"><a name="l00504"></a><span class="lineno"> 504</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unexpected word order"</span>);</div><div class="line"><a name="l00505"></a><span class="lineno"> 505</span>  <span class="keywordflow">if</span> (byteorder_bits == 0) {</div><div class="line"><a name="l00506"></a><span class="lineno"> 506</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"byte order not specified"</span>);</div><div class="line"><a name="l00507"></a><span class="lineno"> 507</span>  }</div><div class="line"><a name="l00508"></a><span class="lineno"> 508</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (byteorder_bits != <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a> &&</div><div class="line"><a name="l00509"></a><span class="lineno"> 509</span>  byteorder_bits != <a class="code" href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a> &&</div><div class="line"><a name="l00510"></a><span class="lineno"> 510</span>  byteorder_bits != <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>)</div><div class="line"><a name="l00511"></a><span class="lineno"> 511</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unexpected byte order"</span>);</div><div class="line"><a name="l00512"></a><span class="lineno"> 512</span>  <span class="keywordflow">if</span> (wordsize == 0)</div><div class="line"><a name="l00513"></a><span class="lineno"> 513</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid wordsize: %"</span><a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a><span class="stringliteral">"u"</span>, wordsize);</div><div class="line"><a name="l00514"></a><span class="lineno"> 514</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2d6569aa794c2f23e90691e60d2f3ad2">SSIZE_MAX</a> < wordsize)</div><div class="line"><a name="l00515"></a><span class="lineno"> 515</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big wordsize: %"</span><a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a><span class="stringliteral">"u"</span>, wordsize);</div><div class="line"><a name="l00516"></a><span class="lineno"> 516</span>  <span class="keywordflow">if</span> (wordsize <= nails / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>)</div><div class="line"><a name="l00517"></a><span class="lineno"> 517</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big nails: %"</span><a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a><span class="stringliteral">"u"</span>, nails);</div><div class="line"><a name="l00518"></a><span class="lineno"> 518</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c75bb398badb69c7577b21486f9963f">SIZE_MAX</a> / wordsize < numwords)</div><div class="line"><a name="l00519"></a><span class="lineno"> 519</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big numwords * wordsize: %"</span><a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a><span class="stringliteral">"u * %"</span><a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a><span class="stringliteral">"u"</span>, numwords, wordsize);</div><div class="line"><a name="l00520"></a><span class="lineno"> 520</span> }</div><div class="line"><a name="l00521"></a><span class="lineno"> 521</span> </div><div class="line"><a name="l00522"></a><span class="lineno"> 522</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00523"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad"> 523</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad">integer_pack_loop_setup</a>(</div><div class="line"><a name="l00524"></a><span class="lineno"> 524</span>  <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags,</div><div class="line"><a name="l00525"></a><span class="lineno"> 525</span>  <span class="keywordtype">size_t</span> *word_num_fullbytes_ret,</div><div class="line"><a name="l00526"></a><span class="lineno"> 526</span>  <span class="keywordtype">int</span> *word_num_partialbits_ret,</div><div class="line"><a name="l00527"></a><span class="lineno"> 527</span>  <span class="keywordtype">size_t</span> *word_start_ret,</div><div class="line"><a name="l00528"></a><span class="lineno"> 528</span>  ssize_t *word_step_ret,</div><div class="line"><a name="l00529"></a><span class="lineno"> 529</span>  <span class="keywordtype">size_t</span> *word_last_ret,</div><div class="line"><a name="l00530"></a><span class="lineno"> 530</span>  <span class="keywordtype">size_t</span> *byte_start_ret,</div><div class="line"><a name="l00531"></a><span class="lineno"> 531</span>  <span class="keywordtype">int</span> *byte_step_ret)</div><div class="line"><a name="l00532"></a><span class="lineno"> 532</span> {</div><div class="line"><a name="l00533"></a><span class="lineno"> 533</span>  <span class="keywordtype">int</span> wordorder_bits = flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728">INTEGER_PACK_WORDORDER_MASK</a>;</div><div class="line"><a name="l00534"></a><span class="lineno"> 534</span>  <span class="keywordtype">int</span> byteorder_bits = flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>;</div><div class="line"><a name="l00535"></a><span class="lineno"> 535</span>  <span class="keywordtype">size_t</span> word_num_fullbytes;</div><div class="line"><a name="l00536"></a><span class="lineno"> 536</span>  <span class="keywordtype">int</span> word_num_partialbits;</div><div class="line"><a name="l00537"></a><span class="lineno"> 537</span>  <span class="keywordtype">size_t</span> word_start;</div><div class="line"><a name="l00538"></a><span class="lineno"> 538</span>  ssize_t word_step;</div><div class="line"><a name="l00539"></a><span class="lineno"> 539</span>  <span class="keywordtype">size_t</span> word_last;</div><div class="line"><a name="l00540"></a><span class="lineno"> 540</span>  <span class="keywordtype">size_t</span> byte_start;</div><div class="line"><a name="l00541"></a><span class="lineno"> 541</span>  <span class="keywordtype">int</span> byte_step;</div><div class="line"><a name="l00542"></a><span class="lineno"> 542</span> </div><div class="line"><a name="l00543"></a><span class="lineno"> 543</span>  word_num_partialbits = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - (int)(nails % <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>);</div><div class="line"><a name="l00544"></a><span class="lineno"> 544</span>  <span class="keywordflow">if</span> (word_num_partialbits == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>)</div><div class="line"><a name="l00545"></a><span class="lineno"> 545</span>  word_num_partialbits = 0;</div><div class="line"><a name="l00546"></a><span class="lineno"> 546</span>  word_num_fullbytes = wordsize - (nails / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>);</div><div class="line"><a name="l00547"></a><span class="lineno"> 547</span>  <span class="keywordflow">if</span> (word_num_partialbits != 0) {</div><div class="line"><a name="l00548"></a><span class="lineno"> 548</span>  word_num_fullbytes--;</div><div class="line"><a name="l00549"></a><span class="lineno"> 549</span>  }</div><div class="line"><a name="l00550"></a><span class="lineno"> 550</span> </div><div class="line"><a name="l00551"></a><span class="lineno"> 551</span>  <span class="keywordflow">if</span> (wordorder_bits == <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>) {</div><div class="line"><a name="l00552"></a><span class="lineno"> 552</span>  word_start = wordsize*(numwords-1);</div><div class="line"><a name="l00553"></a><span class="lineno"> 553</span>  word_step = -(ssize_t)wordsize;</div><div class="line"><a name="l00554"></a><span class="lineno"> 554</span>  word_last = 0;</div><div class="line"><a name="l00555"></a><span class="lineno"> 555</span>  }</div><div class="line"><a name="l00556"></a><span class="lineno"> 556</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00557"></a><span class="lineno"> 557</span>  word_start = 0;</div><div class="line"><a name="l00558"></a><span class="lineno"> 558</span>  word_step = wordsize;</div><div class="line"><a name="l00559"></a><span class="lineno"> 559</span>  word_last = wordsize*(numwords-1);</div><div class="line"><a name="l00560"></a><span class="lineno"> 560</span>  }</div><div class="line"><a name="l00561"></a><span class="lineno"> 561</span> </div><div class="line"><a name="l00562"></a><span class="lineno"> 562</span>  <span class="keywordflow">if</span> (byteorder_bits == <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>) {</div><div class="line"><a name="l00563"></a><span class="lineno"> 563</span> <span class="preprocessor">#ifdef WORDS_BIGENDIAN</span></div><div class="line"><a name="l00564"></a><span class="lineno"> 564</span>  byteorder_bits = <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>;</div><div class="line"><a name="l00565"></a><span class="lineno"> 565</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00566"></a><span class="lineno"> 566</span>  byteorder_bits = <a class="code" href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a>;</div><div class="line"><a name="l00567"></a><span class="lineno"> 567</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00568"></a><span class="lineno"> 568</span>  }</div><div class="line"><a name="l00569"></a><span class="lineno"> 569</span>  <span class="keywordflow">if</span> (byteorder_bits == <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) {</div><div class="line"><a name="l00570"></a><span class="lineno"> 570</span>  byte_start = wordsize-1;</div><div class="line"><a name="l00571"></a><span class="lineno"> 571</span>  byte_step = -1;</div><div class="line"><a name="l00572"></a><span class="lineno"> 572</span>  }</div><div class="line"><a name="l00573"></a><span class="lineno"> 573</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00574"></a><span class="lineno"> 574</span>  byte_start = 0;</div><div class="line"><a name="l00575"></a><span class="lineno"> 575</span>  byte_step = 1;</div><div class="line"><a name="l00576"></a><span class="lineno"> 576</span>  }</div><div class="line"><a name="l00577"></a><span class="lineno"> 577</span> </div><div class="line"><a name="l00578"></a><span class="lineno"> 578</span>  *word_num_partialbits_ret = word_num_partialbits;</div><div class="line"><a name="l00579"></a><span class="lineno"> 579</span>  *word_num_fullbytes_ret = word_num_fullbytes;</div><div class="line"><a name="l00580"></a><span class="lineno"> 580</span>  *word_start_ret = word_start;</div><div class="line"><a name="l00581"></a><span class="lineno"> 581</span>  *word_step_ret = word_step;</div><div class="line"><a name="l00582"></a><span class="lineno"> 582</span>  *word_last_ret = word_last;</div><div class="line"><a name="l00583"></a><span class="lineno"> 583</span>  *byte_start_ret = byte_start;</div><div class="line"><a name="l00584"></a><span class="lineno"> 584</span>  *byte_step_ret = byte_step;</div><div class="line"><a name="l00585"></a><span class="lineno"> 585</span> }</div><div class="line"><a name="l00586"></a><span class="lineno"> 586</span> </div><div class="line"><a name="l00587"></a><span class="lineno"> 587</span> <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00588"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a377c12ee77295ab931ad87ee53b2e451"> 588</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a377c12ee77295ab931ad87ee53b2e451">integer_pack_fill_dd</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **dpp, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **dep, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> *ddp, <span class="keywordtype">int</span> *numbits_in_dd_p)</div><div class="line"><a name="l00589"></a><span class="lineno"> 589</span> {</div><div class="line"><a name="l00590"></a><span class="lineno"> 590</span>  <span class="keywordflow">if</span> (*dpp < *dep && <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> <= (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(*ddp) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - *numbits_in_dd_p) {</div><div class="line"><a name="l00591"></a><span class="lineno"> 591</span>  *ddp |= (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)(*(*dpp)++) << *numbits_in_dd_p;</div><div class="line"><a name="l00592"></a><span class="lineno"> 592</span>  *numbits_in_dd_p += <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l00593"></a><span class="lineno"> 593</span>  }</div><div class="line"><a name="l00594"></a><span class="lineno"> 594</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (*dpp == *dep) {</div><div class="line"><a name="l00595"></a><span class="lineno"> 595</span>  <span class="comment">/* higher bits are infinity zeros */</span></div><div class="line"><a name="l00596"></a><span class="lineno"> 596</span>  *numbits_in_dd_p = (int)<span class="keyword">sizeof</span>(*ddp) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00597"></a><span class="lineno"> 597</span>  }</div><div class="line"><a name="l00598"></a><span class="lineno"> 598</span> }</div><div class="line"><a name="l00599"></a><span class="lineno"> 599</span> </div><div class="line"><a name="l00600"></a><span class="lineno"> 600</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a></div><div class="line"><a name="l00601"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a69923e091a3b62326a17d4d4f1fdf088"> 601</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a69923e091a3b62326a17d4d4f1fdf088">integer_pack_take_lowbits</a>(<span class="keywordtype">int</span> n, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> *ddp, <span class="keywordtype">int</span> *numbits_in_dd_p)</div><div class="line"><a name="l00602"></a><span class="lineno"> 602</span> {</div><div class="line"><a name="l00603"></a><span class="lineno"> 603</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> ret;</div><div class="line"><a name="l00604"></a><span class="lineno"> 604</span>  ret = (*ddp) & (((<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)1 << n) - 1);</div><div class="line"><a name="l00605"></a><span class="lineno"> 605</span>  *ddp >>= n;</div><div class="line"><a name="l00606"></a><span class="lineno"> 606</span>  *numbits_in_dd_p -= n;</div><div class="line"><a name="l00607"></a><span class="lineno"> 607</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l00608"></a><span class="lineno"> 608</span> }</div><div class="line"><a name="l00609"></a><span class="lineno"> 609</span> </div><div class="line"><a name="l00610"></a><span class="lineno"> 610</span> <span class="preprocessor">#if !defined(WORDS_BIGENDIAN)</span></div><div class="line"><a name="l00611"></a><span class="lineno"> 611</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00612"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a27d791e90e2fa21bee73c2c7ac471455"> 612</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a27d791e90e2fa21bee73c2c7ac471455">bytes_2comp</a>(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keywordtype">size_t</span> len)</div><div class="line"><a name="l00613"></a><span class="lineno"> 613</span> {</div><div class="line"><a name="l00614"></a><span class="lineno"> 614</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l00615"></a><span class="lineno"> 615</span>  <span class="keywordflow">for</span> (i = 0; i < len; i++)</div><div class="line"><a name="l00616"></a><span class="lineno"> 616</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[i] = ~<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[i];</div><div class="line"><a name="l00617"></a><span class="lineno"> 617</span>  <span class="keywordflow">for</span> (i = 0; i < len; i++) {</div><div class="line"><a name="l00618"></a><span class="lineno"> 618</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[i]++;</div><div class="line"><a name="l00619"></a><span class="lineno"> 619</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[i] != 0)</div><div class="line"><a name="l00620"></a><span class="lineno"> 620</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00621"></a><span class="lineno"> 621</span>  }</div><div class="line"><a name="l00622"></a><span class="lineno"> 622</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00623"></a><span class="lineno"> 623</span> }</div><div class="line"><a name="l00624"></a><span class="lineno"> 624</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00625"></a><span class="lineno"> 625</span> </div><div class="line"><a name="l00626"></a><span class="lineno"> 626</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00627"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c"> 627</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c">bary_pack</a>(<span class="keywordtype">int</span> sign, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> num_bdigits, <span class="keywordtype">void</span> *words, <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags)</div><div class="line"><a name="l00628"></a><span class="lineno"> 628</span> {</div><div class="line"><a name="l00629"></a><span class="lineno"> 629</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, *de;</div><div class="line"><a name="l00630"></a><span class="lineno"> 630</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, *bufend;</div><div class="line"><a name="l00631"></a><span class="lineno"> 631</span> </div><div class="line"><a name="l00632"></a><span class="lineno"> 632</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = ds;</div><div class="line"><a name="l00633"></a><span class="lineno"> 633</span>  de = ds + num_bdigits;</div><div class="line"><a name="l00634"></a><span class="lineno"> 634</span> </div><div class="line"><a name="l00635"></a><span class="lineno"> 635</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17">validate_integer_pack_format</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l00636"></a><span class="lineno"> 636</span>  <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>|</div><div class="line"><a name="l00637"></a><span class="lineno"> 637</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|</div><div class="line"><a name="l00638"></a><span class="lineno"> 638</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>|</div><div class="line"><a name="l00639"></a><span class="lineno"> 639</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a>|</div><div class="line"><a name="l00640"></a><span class="lineno"> 640</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l00641"></a><span class="lineno"> 641</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>|</div><div class="line"><a name="l00642"></a><span class="lineno"> 642</span>  <a class="code" href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a>);</div><div class="line"><a name="l00643"></a><span class="lineno"> 643</span> </div><div class="line"><a name="l00644"></a><span class="lineno"> 644</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && de[-1] == 0)</div><div class="line"><a name="l00645"></a><span class="lineno"> 645</span>  de--;</div><div class="line"><a name="l00646"></a><span class="lineno"> 646</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == de) {</div><div class="line"><a name="l00647"></a><span class="lineno"> 647</span>  sign = 0;</div><div class="line"><a name="l00648"></a><span class="lineno"> 648</span>  }</div><div class="line"><a name="l00649"></a><span class="lineno"> 649</span> </div><div class="line"><a name="l00650"></a><span class="lineno"> 650</span>  <span class="keywordflow">if</span> (!(flags & <a class="code" href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a>)) {</div><div class="line"><a name="l00651"></a><span class="lineno"> 651</span>  <span class="keywordflow">if</span> (sign == 0) {</div><div class="line"><a name="l00652"></a><span class="lineno"> 652</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a56d620b94b668ed7665d1616b2c54e48">MEMZERO</a>(words, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>, numwords * wordsize);</div><div class="line"><a name="l00653"></a><span class="lineno"> 653</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00654"></a><span class="lineno"> 654</span>  }</div><div class="line"><a name="l00655"></a><span class="lineno"> 655</span>  <span class="keywordflow">if</span> (nails == 0 && numwords == 1) {</div><div class="line"><a name="l00656"></a><span class="lineno"> 656</span>  <span class="keywordtype">int</span> need_swap = wordsize != 1 &&</div><div class="line"><a name="l00657"></a><span class="lineno"> 657</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>) != <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a> &&</div><div class="line"><a name="l00658"></a><span class="lineno"> 658</span>  ((flags & <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) ? !<a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a> : <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a>);</div><div class="line"><a name="l00659"></a><span class="lineno"> 659</span>  <span class="keywordflow">if</span> (0 < sign || !(flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>)) {</div><div class="line"><a name="l00660"></a><span class="lineno"> 660</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> d;</div><div class="line"><a name="l00661"></a><span class="lineno"> 661</span>  <span class="keywordflow">if</span> (wordsize == 1) {</div><div class="line"><a name="l00662"></a><span class="lineno"> 662</span>  *((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *)words) = (<span class="keywordtype">unsigned</span> char)(d = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00663"></a><span class="lineno"> 663</span>  <span class="keywordflow">return</span> ((1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e">CLEAR_LOWBITS</a>(d, 8) != 0) ? 2 : 1) * sign;</div><div class="line"><a name="l00664"></a><span class="lineno"> 664</span>  }</div><div class="line"><a name="l00665"></a><span class="lineno"> 665</span> <span class="preprocessor">#if defined(HAVE_UINT16_T) && 2 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00666"></a><span class="lineno"> 666</span>  <span class="keywordflow">if</span> (wordsize == 2 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(uint16_t) == 0) {</div><div class="line"><a name="l00667"></a><span class="lineno"> 667</span>  uint16_t u = (uint16_t)(d = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00668"></a><span class="lineno"> 668</span>  <span class="keywordflow">if</span> (need_swap) u = <a class="code" href="../../db/dde/internal_8h.html#a230ba4a10a19fd06db52f5a5ed957d2b">swap16</a>(u);</div><div class="line"><a name="l00669"></a><span class="lineno"> 669</span>  *((uint16_t *)words) = u;</div><div class="line"><a name="l00670"></a><span class="lineno"> 670</span>  <span class="keywordflow">return</span> ((1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e">CLEAR_LOWBITS</a>(d, 16) != 0) ? 2 : 1) * sign;</div><div class="line"><a name="l00671"></a><span class="lineno"> 671</span>  }</div><div class="line"><a name="l00672"></a><span class="lineno"> 672</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00673"></a><span class="lineno"> 673</span> <span class="preprocessor">#if defined(HAVE_UINT32_T) && 4 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00674"></a><span class="lineno"> 674</span>  <span class="keywordflow">if</span> (wordsize == 4 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>) == 0) {</div><div class="line"><a name="l00675"></a><span class="lineno"> 675</span>  <a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> u = (<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>)(d = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00676"></a><span class="lineno"> 676</span>  <span class="keywordflow">if</span> (need_swap) u = <a class="code" href="../../db/dde/internal_8h.html#a40f89812fbb971f324be796c9854a590">swap32</a>(u);</div><div class="line"><a name="l00677"></a><span class="lineno"> 677</span>  *((<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> *)words) = u;</div><div class="line"><a name="l00678"></a><span class="lineno"> 678</span>  <span class="keywordflow">return</span> ((1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e">CLEAR_LOWBITS</a>(d, 32) != 0) ? 2 : 1) * sign;</div><div class="line"><a name="l00679"></a><span class="lineno"> 679</span>  }</div><div class="line"><a name="l00680"></a><span class="lineno"> 680</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00681"></a><span class="lineno"> 681</span> <span class="preprocessor">#if defined(HAVE_UINT64_T) && 8 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00682"></a><span class="lineno"> 682</span>  <span class="keywordflow">if</span> (wordsize == 8 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>) == 0) {</div><div class="line"><a name="l00683"></a><span class="lineno"> 683</span>  <a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> u = (<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>)(d = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00684"></a><span class="lineno"> 684</span>  <span class="keywordflow">if</span> (need_swap) u = swap64(u);</div><div class="line"><a name="l00685"></a><span class="lineno"> 685</span>  *((<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> *)words) = u;</div><div class="line"><a name="l00686"></a><span class="lineno"> 686</span>  <span class="keywordflow">return</span> ((1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e">CLEAR_LOWBITS</a>(d, 64) != 0) ? 2 : 1) * sign;</div><div class="line"><a name="l00687"></a><span class="lineno"> 687</span>  }</div><div class="line"><a name="l00688"></a><span class="lineno"> 688</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00689"></a><span class="lineno"> 689</span>  }</div><div class="line"><a name="l00690"></a><span class="lineno"> 690</span>  <span class="keywordflow">else</span> { <span class="comment">/* sign < 0 && (flags & INTEGER_PACK_2COMP) */</span></div><div class="line"><a name="l00691"></a><span class="lineno"> 691</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> d;</div><div class="line"><a name="l00692"></a><span class="lineno"> 692</span>  <span class="keywordflow">if</span> (wordsize == 1) {</div><div class="line"><a name="l00693"></a><span class="lineno"> 693</span>  *((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *)words) = (<span class="keywordtype">unsigned</span> char)(d = -(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00694"></a><span class="lineno"> 694</span>  <span class="keywordflow">return</span> (1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be">FILL_LOWBITS</a>(d, 8) != -1) ? -2 : -1;</div><div class="line"><a name="l00695"></a><span class="lineno"> 695</span>  }</div><div class="line"><a name="l00696"></a><span class="lineno"> 696</span> <span class="preprocessor">#if defined(HAVE_UINT16_T) && 2 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00697"></a><span class="lineno"> 697</span>  <span class="keywordflow">if</span> (wordsize == 2 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(uint16_t) == 0) {</div><div class="line"><a name="l00698"></a><span class="lineno"> 698</span>  uint16_t u = (uint16_t)(d = -(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00699"></a><span class="lineno"> 699</span>  <span class="keywordflow">if</span> (need_swap) u = <a class="code" href="../../db/dde/internal_8h.html#a230ba4a10a19fd06db52f5a5ed957d2b">swap16</a>(u);</div><div class="line"><a name="l00700"></a><span class="lineno"> 700</span>  *((uint16_t *)words) = u;</div><div class="line"><a name="l00701"></a><span class="lineno"> 701</span>  <span class="keywordflow">return</span> (wordsize == <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> && de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 2 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[1] == 1 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0] == 0) ? -1 :</div><div class="line"><a name="l00702"></a><span class="lineno"> 702</span>  (1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be">FILL_LOWBITS</a>(d, 16) != -1) ? -2 : -1;</div><div class="line"><a name="l00703"></a><span class="lineno"> 703</span>  }</div><div class="line"><a name="l00704"></a><span class="lineno"> 704</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00705"></a><span class="lineno"> 705</span> <span class="preprocessor">#if defined(HAVE_UINT32_T) && 4 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00706"></a><span class="lineno"> 706</span>  <span class="keywordflow">if</span> (wordsize == 4 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>) == 0) {</div><div class="line"><a name="l00707"></a><span class="lineno"> 707</span>  <a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> u = (<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>)(d = -(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00708"></a><span class="lineno"> 708</span>  <span class="keywordflow">if</span> (need_swap) u = <a class="code" href="../../db/dde/internal_8h.html#a40f89812fbb971f324be796c9854a590">swap32</a>(u);</div><div class="line"><a name="l00709"></a><span class="lineno"> 709</span>  *((<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> *)words) = u;</div><div class="line"><a name="l00710"></a><span class="lineno"> 710</span>  <span class="keywordflow">return</span> (wordsize == <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> && de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 2 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[1] == 1 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0] == 0) ? -1 :</div><div class="line"><a name="l00711"></a><span class="lineno"> 711</span>  (1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be">FILL_LOWBITS</a>(d, 32) != -1) ? -2 : -1;</div><div class="line"><a name="l00712"></a><span class="lineno"> 712</span>  }</div><div class="line"><a name="l00713"></a><span class="lineno"> 713</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00714"></a><span class="lineno"> 714</span> <span class="preprocessor">#if defined(HAVE_UINT64_T) && 8 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l00715"></a><span class="lineno"> 715</span>  <span class="keywordflow">if</span> (wordsize == 8 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>) == 0) {</div><div class="line"><a name="l00716"></a><span class="lineno"> 716</span>  <a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> u = (<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>)(d = -(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0]);</div><div class="line"><a name="l00717"></a><span class="lineno"> 717</span>  <span class="keywordflow">if</span> (need_swap) u = swap64(u);</div><div class="line"><a name="l00718"></a><span class="lineno"> 718</span>  *((<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> *)words) = u;</div><div class="line"><a name="l00719"></a><span class="lineno"> 719</span>  <span class="keywordflow">return</span> (wordsize == <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> && de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 2 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[1] == 1 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0] == 0) ? -1 :</div><div class="line"><a name="l00720"></a><span class="lineno"> 720</span>  (1 < de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> || <a class="code" href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be">FILL_LOWBITS</a>(d, 64) != -1) ? -2 : -1;</div><div class="line"><a name="l00721"></a><span class="lineno"> 721</span>  }</div><div class="line"><a name="l00722"></a><span class="lineno"> 722</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00723"></a><span class="lineno"> 723</span>  }</div><div class="line"><a name="l00724"></a><span class="lineno"> 724</span>  }</div><div class="line"><a name="l00725"></a><span class="lineno"> 725</span> <span class="preprocessor">#if !defined(WORDS_BIGENDIAN)</span></div><div class="line"><a name="l00726"></a><span class="lineno"> 726</span>  <span class="keywordflow">if</span> (nails == 0 && <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>) &&</div><div class="line"><a name="l00727"></a><span class="lineno"> 727</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728">INTEGER_PACK_WORDORDER_MASK</a>) == <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a> &&</div><div class="line"><a name="l00728"></a><span class="lineno"> 728</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>) != <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) {</div><div class="line"><a name="l00729"></a><span class="lineno"> 729</span>  <span class="keywordtype">size_t</span> src_size = (de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>) * <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>;</div><div class="line"><a name="l00730"></a><span class="lineno"> 730</span>  <span class="keywordtype">size_t</span> dst_size = numwords * wordsize;</div><div class="line"><a name="l00731"></a><span class="lineno"> 731</span>  <span class="keywordtype">int</span> overflow = 0;</div><div class="line"><a name="l00732"></a><span class="lineno"> 732</span>  <span class="keywordflow">while</span> (0 < src_size && ((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *)ds)[src_size-1] == 0)</div><div class="line"><a name="l00733"></a><span class="lineno"> 733</span>  src_size--;</div><div class="line"><a name="l00734"></a><span class="lineno"> 734</span>  <span class="keywordflow">if</span> (src_size <= dst_size) {</div><div class="line"><a name="l00735"></a><span class="lineno"> 735</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(words, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, <span class="keywordtype">char</span>, src_size);</div><div class="line"><a name="l00736"></a><span class="lineno"> 736</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a56d620b94b668ed7665d1616b2c54e48">MEMZERO</a>((<span class="keywordtype">char</span>*)words + src_size, <span class="keywordtype">char</span>, dst_size - src_size);</div><div class="line"><a name="l00737"></a><span class="lineno"> 737</span>  }</div><div class="line"><a name="l00738"></a><span class="lineno"> 738</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00739"></a><span class="lineno"> 739</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(words, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, <span class="keywordtype">char</span>, dst_size);</div><div class="line"><a name="l00740"></a><span class="lineno"> 740</span>  overflow = 1;</div><div class="line"><a name="l00741"></a><span class="lineno"> 741</span>  }</div><div class="line"><a name="l00742"></a><span class="lineno"> 742</span>  <span class="keywordflow">if</span> (sign < 0 && (flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>)) {</div><div class="line"><a name="l00743"></a><span class="lineno"> 743</span>  <span class="keywordtype">int</span> zero_p = <a class="code" href="../../d1/dcc/bignum_8c.html#a27d791e90e2fa21bee73c2c7ac471455">bytes_2comp</a>(words, dst_size);</div><div class="line"><a name="l00744"></a><span class="lineno"> 744</span>  <span class="keywordflow">if</span> (zero_p && overflow) {</div><div class="line"><a name="l00745"></a><span class="lineno"> 745</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *p = (<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l00746"></a><span class="lineno"> 746</span>  <span class="keywordflow">if</span> (dst_size == src_size-1 &&</div><div class="line"><a name="l00747"></a><span class="lineno"> 747</span>  p[dst_size] == 1) {</div><div class="line"><a name="l00748"></a><span class="lineno"> 748</span>  overflow = 0;</div><div class="line"><a name="l00749"></a><span class="lineno"> 749</span>  }</div><div class="line"><a name="l00750"></a><span class="lineno"> 750</span>  }</div><div class="line"><a name="l00751"></a><span class="lineno"> 751</span>  }</div><div class="line"><a name="l00752"></a><span class="lineno"> 752</span>  <span class="keywordflow">if</span> (overflow)</div><div class="line"><a name="l00753"></a><span class="lineno"> 753</span>  sign *= 2;</div><div class="line"><a name="l00754"></a><span class="lineno"> 754</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l00755"></a><span class="lineno"> 755</span>  }</div><div class="line"><a name="l00756"></a><span class="lineno"> 756</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00757"></a><span class="lineno"> 757</span>  <span class="keywordflow">if</span> (nails == 0 && <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>) &&</div><div class="line"><a name="l00758"></a><span class="lineno"> 758</span>  wordsize % <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == 0 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>) == 0) {</div><div class="line"><a name="l00759"></a><span class="lineno"> 759</span>  <span class="keywordtype">size_t</span> bdigits_per_word = wordsize / <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>;</div><div class="line"><a name="l00760"></a><span class="lineno"> 760</span>  <span class="keywordtype">size_t</span> src_num_bdigits = de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l00761"></a><span class="lineno"> 761</span>  <span class="keywordtype">size_t</span> dst_num_bdigits = numwords * bdigits_per_word;</div><div class="line"><a name="l00762"></a><span class="lineno"> 762</span>  <span class="keywordtype">int</span> overflow = 0;</div><div class="line"><a name="l00763"></a><span class="lineno"> 763</span>  <span class="keywordtype">int</span> mswordfirst_p = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>) != 0;</div><div class="line"><a name="l00764"></a><span class="lineno"> 764</span>  <span class="keywordtype">int</span> msbytefirst_p = (flags & <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>) ? <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a> :</div><div class="line"><a name="l00765"></a><span class="lineno"> 765</span>  (flags & <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) != 0;</div><div class="line"><a name="l00766"></a><span class="lineno"> 766</span>  <span class="keywordflow">if</span> (src_num_bdigits <= dst_num_bdigits) {</div><div class="line"><a name="l00767"></a><span class="lineno"> 767</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(words, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, src_num_bdigits);</div><div class="line"><a name="l00768"></a><span class="lineno"> 768</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>((<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>*)words + src_num_bdigits, dst_num_bdigits - src_num_bdigits);</div><div class="line"><a name="l00769"></a><span class="lineno"> 769</span>  }</div><div class="line"><a name="l00770"></a><span class="lineno"> 770</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00771"></a><span class="lineno"> 771</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(words, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, dst_num_bdigits);</div><div class="line"><a name="l00772"></a><span class="lineno"> 772</span>  overflow = 1;</div><div class="line"><a name="l00773"></a><span class="lineno"> 773</span>  }</div><div class="line"><a name="l00774"></a><span class="lineno"> 774</span>  <span class="keywordflow">if</span> (sign < 0 && (flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>)) {</div><div class="line"><a name="l00775"></a><span class="lineno"> 775</span>  <span class="keywordtype">int</span> zero_p = <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(words, dst_num_bdigits);</div><div class="line"><a name="l00776"></a><span class="lineno"> 776</span>  <span class="keywordflow">if</span> (zero_p && overflow &&</div><div class="line"><a name="l00777"></a><span class="lineno"> 777</span>  dst_num_bdigits == src_num_bdigits-1 &&</div><div class="line"><a name="l00778"></a><span class="lineno"> 778</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[dst_num_bdigits] == 1)</div><div class="line"><a name="l00779"></a><span class="lineno"> 779</span>  overflow = 0;</div><div class="line"><a name="l00780"></a><span class="lineno"> 780</span>  }</div><div class="line"><a name="l00781"></a><span class="lineno"> 781</span>  <span class="keywordflow">if</span> (msbytefirst_p != <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a>) {</div><div class="line"><a name="l00782"></a><span class="lineno"> 782</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l00783"></a><span class="lineno"> 783</span>  <span class="keywordflow">for</span> (i = 0; i < dst_num_bdigits; i++) {</div><div class="line"><a name="l00784"></a><span class="lineno"> 784</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> d = ((<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>*)words)[i];</div><div class="line"><a name="l00785"></a><span class="lineno"> 785</span>  ((<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>*)words)[i] = swap_bdigit(d);</div><div class="line"><a name="l00786"></a><span class="lineno"> 786</span>  }</div><div class="line"><a name="l00787"></a><span class="lineno"> 787</span>  }</div><div class="line"><a name="l00788"></a><span class="lineno"> 788</span>  <span class="keywordflow">if</span> (mswordfirst_p ? !msbytefirst_p : msbytefirst_p) {</div><div class="line"><a name="l00789"></a><span class="lineno"> 789</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l00790"></a><span class="lineno"> 790</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *p = words;</div><div class="line"><a name="l00791"></a><span class="lineno"> 791</span>  <span class="keywordflow">for</span> (i = 0; i < numwords; i++) {</div><div class="line"><a name="l00792"></a><span class="lineno"> 792</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a>(p, bdigits_per_word);</div><div class="line"><a name="l00793"></a><span class="lineno"> 793</span>  p += bdigits_per_word;</div><div class="line"><a name="l00794"></a><span class="lineno"> 794</span>  }</div><div class="line"><a name="l00795"></a><span class="lineno"> 795</span>  }</div><div class="line"><a name="l00796"></a><span class="lineno"> 796</span>  <span class="keywordflow">if</span> (mswordfirst_p) {</div><div class="line"><a name="l00797"></a><span class="lineno"> 797</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a>(words, dst_num_bdigits);</div><div class="line"><a name="l00798"></a><span class="lineno"> 798</span>  }</div><div class="line"><a name="l00799"></a><span class="lineno"> 799</span>  <span class="keywordflow">if</span> (overflow)</div><div class="line"><a name="l00800"></a><span class="lineno"> 800</span>  sign *= 2;</div><div class="line"><a name="l00801"></a><span class="lineno"> 801</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l00802"></a><span class="lineno"> 802</span>  }</div><div class="line"><a name="l00803"></a><span class="lineno"> 803</span>  }</div><div class="line"><a name="l00804"></a><span class="lineno"> 804</span> </div><div class="line"><a name="l00805"></a><span class="lineno"> 805</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> = words;</div><div class="line"><a name="l00806"></a><span class="lineno"> 806</span>  bufend = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + numwords * wordsize;</div><div class="line"><a name="l00807"></a><span class="lineno"> 807</span> </div><div class="line"><a name="l00808"></a><span class="lineno"> 808</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> == bufend) {</div><div class="line"><a name="l00809"></a><span class="lineno"> 809</span>  <span class="comment">/* overflow if non-zero*/</span></div><div class="line"><a name="l00810"></a><span class="lineno"> 810</span>  <span class="keywordflow">if</span> (!(flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) || 0 <= sign)</div><div class="line"><a name="l00811"></a><span class="lineno"> 811</span>  sign *= 2;</div><div class="line"><a name="l00812"></a><span class="lineno"> 812</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00813"></a><span class="lineno"> 813</span>  <span class="keywordflow">if</span> (de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 1 && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0] == 1)</div><div class="line"><a name="l00814"></a><span class="lineno"> 814</span>  sign = -1; <span class="comment">/* val == -1 == -2**(numwords*(wordsize*CHAR_BIT-nails)) */</span></div><div class="line"><a name="l00815"></a><span class="lineno"> 815</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l00816"></a><span class="lineno"> 816</span>  sign = -2; <span class="comment">/* val < -1 == -2**(numwords*(wordsize*CHAR_BIT-nails)) */</span></div><div class="line"><a name="l00817"></a><span class="lineno"> 817</span>  }</div><div class="line"><a name="l00818"></a><span class="lineno"> 818</span>  }</div><div class="line"><a name="l00819"></a><span class="lineno"> 819</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == de) {</div><div class="line"><a name="l00820"></a><span class="lineno"> 820</span>  memset(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="charliteral">'\0'</span>, bufend - <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>);</div><div class="line"><a name="l00821"></a><span class="lineno"> 821</span>  }</div><div class="line"><a name="l00822"></a><span class="lineno"> 822</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> < bufend) {</div><div class="line"><a name="l00823"></a><span class="lineno"> 823</span>  <span class="keywordtype">int</span> word_num_partialbits;</div><div class="line"><a name="l00824"></a><span class="lineno"> 824</span>  <span class="keywordtype">size_t</span> word_num_fullbytes;</div><div class="line"><a name="l00825"></a><span class="lineno"> 825</span> </div><div class="line"><a name="l00826"></a><span class="lineno"> 826</span>  ssize_t word_step;</div><div class="line"><a name="l00827"></a><span class="lineno"> 827</span>  <span class="keywordtype">size_t</span> byte_start;</div><div class="line"><a name="l00828"></a><span class="lineno"> 828</span>  <span class="keywordtype">int</span> byte_step;</div><div class="line"><a name="l00829"></a><span class="lineno"> 829</span> </div><div class="line"><a name="l00830"></a><span class="lineno"> 830</span>  <span class="keywordtype">size_t</span> word_start, word_last;</div><div class="line"><a name="l00831"></a><span class="lineno"> 831</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *wordp, *last_wordp;</div><div class="line"><a name="l00832"></a><span class="lineno"> 832</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd;</div><div class="line"><a name="l00833"></a><span class="lineno"> 833</span>  <span class="keywordtype">int</span> numbits_in_dd;</div><div class="line"><a name="l00834"></a><span class="lineno"> 834</span> </div><div class="line"><a name="l00835"></a><span class="lineno"> 835</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad">integer_pack_loop_setup</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l00836"></a><span class="lineno"> 836</span>  &word_num_fullbytes, &word_num_partialbits,</div><div class="line"><a name="l00837"></a><span class="lineno"> 837</span>  &word_start, &word_step, &word_last, &byte_start, &byte_step);</div><div class="line"><a name="l00838"></a><span class="lineno"> 838</span> </div><div class="line"><a name="l00839"></a><span class="lineno"> 839</span>  wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_start;</div><div class="line"><a name="l00840"></a><span class="lineno"> 840</span>  last_wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_last;</div><div class="line"><a name="l00841"></a><span class="lineno"> 841</span> </div><div class="line"><a name="l00842"></a><span class="lineno"> 842</span>  dd = 0;</div><div class="line"><a name="l00843"></a><span class="lineno"> 843</span>  numbits_in_dd = 0;</div><div class="line"><a name="l00844"></a><span class="lineno"> 844</span> </div><div class="line"><a name="l00845"></a><span class="lineno"> 845</span> <span class="preprocessor">#define FILL_DD \</span></div><div class="line"><a name="l00846"></a><span class="lineno"> 846</span> <span class="preprocessor"> integer_pack_fill_dd(&dp, &de, &dd, &numbits_in_dd)</span></div><div class="line"><a name="l00847"></a><span class="lineno"> 847</span> <span class="preprocessor">#define TAKE_LOWBITS(n) \</span></div><div class="line"><a name="l00848"></a><span class="lineno"> 848</span> <span class="preprocessor"> integer_pack_take_lowbits(n, &dd, &numbits_in_dd)</span></div><div class="line"><a name="l00849"></a><span class="lineno"> 849</span> </div><div class="line"><a name="l00850"></a><span class="lineno"> 850</span>  <span class="keywordflow">while</span> (1) {</div><div class="line"><a name="l00851"></a><span class="lineno"> 851</span>  <span class="keywordtype">size_t</span> index_in_word = 0;</div><div class="line"><a name="l00852"></a><span class="lineno"> 852</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *bytep = wordp + byte_start;</div><div class="line"><a name="l00853"></a><span class="lineno"> 853</span>  <span class="keywordflow">while</span> (index_in_word < word_num_fullbytes) {</div><div class="line"><a name="l00854"></a><span class="lineno"> 854</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3623de8f327057893f9936a08866101f">FILL_DD</a>;</div><div class="line"><a name="l00855"></a><span class="lineno"> 855</span>  *bytep = <a class="code" href="../../d1/dcc/bignum_8c.html#a0fdd2d3b13ef87a4b97238d6cbcbb508">TAKE_LOWBITS</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>);</div><div class="line"><a name="l00856"></a><span class="lineno"> 856</span>  bytep += byte_step;</div><div class="line"><a name="l00857"></a><span class="lineno"> 857</span>  index_in_word++;</div><div class="line"><a name="l00858"></a><span class="lineno"> 858</span>  }</div><div class="line"><a name="l00859"></a><span class="lineno"> 859</span>  <span class="keywordflow">if</span> (word_num_partialbits) {</div><div class="line"><a name="l00860"></a><span class="lineno"> 860</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3623de8f327057893f9936a08866101f">FILL_DD</a>;</div><div class="line"><a name="l00861"></a><span class="lineno"> 861</span>  *bytep = <a class="code" href="../../d1/dcc/bignum_8c.html#a0fdd2d3b13ef87a4b97238d6cbcbb508">TAKE_LOWBITS</a>(word_num_partialbits);</div><div class="line"><a name="l00862"></a><span class="lineno"> 862</span>  bytep += byte_step;</div><div class="line"><a name="l00863"></a><span class="lineno"> 863</span>  index_in_word++;</div><div class="line"><a name="l00864"></a><span class="lineno"> 864</span>  }</div><div class="line"><a name="l00865"></a><span class="lineno"> 865</span>  <span class="keywordflow">while</span> (index_in_word < wordsize) {</div><div class="line"><a name="l00866"></a><span class="lineno"> 866</span>  *bytep = 0;</div><div class="line"><a name="l00867"></a><span class="lineno"> 867</span>  bytep += byte_step;</div><div class="line"><a name="l00868"></a><span class="lineno"> 868</span>  index_in_word++;</div><div class="line"><a name="l00869"></a><span class="lineno"> 869</span>  }</div><div class="line"><a name="l00870"></a><span class="lineno"> 870</span> </div><div class="line"><a name="l00871"></a><span class="lineno"> 871</span>  <span class="keywordflow">if</span> (wordp == last_wordp)</div><div class="line"><a name="l00872"></a><span class="lineno"> 872</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00873"></a><span class="lineno"> 873</span> </div><div class="line"><a name="l00874"></a><span class="lineno"> 874</span>  wordp += word_step;</div><div class="line"><a name="l00875"></a><span class="lineno"> 875</span>  }</div><div class="line"><a name="l00876"></a><span class="lineno"> 876</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3623de8f327057893f9936a08866101f">FILL_DD</a>;</div><div class="line"><a name="l00877"></a><span class="lineno"> 877</span>  <span class="comment">/* overflow tests */</span></div><div class="line"><a name="l00878"></a><span class="lineno"> 878</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> != de || 1 < dd) {</div><div class="line"><a name="l00879"></a><span class="lineno"> 879</span>  <span class="comment">/* 2**(numwords*(wordsize*CHAR_BIT-nails)+1) <= abs(val) */</span></div><div class="line"><a name="l00880"></a><span class="lineno"> 880</span>  sign *= 2;</div><div class="line"><a name="l00881"></a><span class="lineno"> 881</span>  }</div><div class="line"><a name="l00882"></a><span class="lineno"> 882</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (dd == 1) {</div><div class="line"><a name="l00883"></a><span class="lineno"> 883</span>  <span class="comment">/* 2**(numwords*(wordsize*CHAR_BIT-nails)) <= abs(val) < 2**(numwords*(wordsize*CHAR_BIT-nails)+1) */</span></div><div class="line"><a name="l00884"></a><span class="lineno"> 884</span>  <span class="keywordflow">if</span> (!(flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) || 0 <= sign)</div><div class="line"><a name="l00885"></a><span class="lineno"> 885</span>  sign *= 2;</div><div class="line"><a name="l00886"></a><span class="lineno"> 886</span>  <span class="keywordflow">else</span> { <span class="comment">/* overflow_2comp && sign == -1 */</span></div><div class="line"><a name="l00887"></a><span class="lineno"> 887</span>  <span class="comment">/* test lower bits are all zero. */</span></div><div class="line"><a name="l00888"></a><span class="lineno"> 888</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = ds;</div><div class="line"><a name="l00889"></a><span class="lineno"> 889</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 0)</div><div class="line"><a name="l00890"></a><span class="lineno"> 890</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++;</div><div class="line"><a name="l00891"></a><span class="lineno"> 891</span>  <span class="keywordflow">if</span> (de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == 1 && <span class="comment">/* only one non-zero word. */</span></div><div class="line"><a name="l00892"></a><span class="lineno"> 892</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(*<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>)) <span class="comment">/* *dp contains only one bit set. */</span></div><div class="line"><a name="l00893"></a><span class="lineno"> 893</span>  sign = -1; <span class="comment">/* val == -2**(numwords*(wordsize*CHAR_BIT-nails)) */</span></div><div class="line"><a name="l00894"></a><span class="lineno"> 894</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l00895"></a><span class="lineno"> 895</span>  sign = -2; <span class="comment">/* val < -2**(numwords*(wordsize*CHAR_BIT-nails)) */</span></div><div class="line"><a name="l00896"></a><span class="lineno"> 896</span>  }</div><div class="line"><a name="l00897"></a><span class="lineno"> 897</span>  }</div><div class="line"><a name="l00898"></a><span class="lineno"> 898</span>  }</div><div class="line"><a name="l00899"></a><span class="lineno"> 899</span> </div><div class="line"><a name="l00900"></a><span class="lineno"> 900</span>  <span class="keywordflow">if</span> ((flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) && (sign < 0 && numwords != 0)) {</div><div class="line"><a name="l00901"></a><span class="lineno"> 901</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l00902"></a><span class="lineno"> 902</span> </div><div class="line"><a name="l00903"></a><span class="lineno"> 903</span>  <span class="keywordtype">int</span> word_num_partialbits;</div><div class="line"><a name="l00904"></a><span class="lineno"> 904</span>  <span class="keywordtype">size_t</span> word_num_fullbytes;</div><div class="line"><a name="l00905"></a><span class="lineno"> 905</span> </div><div class="line"><a name="l00906"></a><span class="lineno"> 906</span>  ssize_t word_step;</div><div class="line"><a name="l00907"></a><span class="lineno"> 907</span>  <span class="keywordtype">size_t</span> byte_start;</div><div class="line"><a name="l00908"></a><span class="lineno"> 908</span>  <span class="keywordtype">int</span> byte_step;</div><div class="line"><a name="l00909"></a><span class="lineno"> 909</span> </div><div class="line"><a name="l00910"></a><span class="lineno"> 910</span>  <span class="keywordtype">size_t</span> word_start, word_last;</div><div class="line"><a name="l00911"></a><span class="lineno"> 911</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *wordp, *last_wordp;</div><div class="line"><a name="l00912"></a><span class="lineno"> 912</span> </div><div class="line"><a name="l00913"></a><span class="lineno"> 913</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> partialbits_mask;</div><div class="line"><a name="l00914"></a><span class="lineno"> 914</span>  <span class="keywordtype">int</span> carry;</div><div class="line"><a name="l00915"></a><span class="lineno"> 915</span> </div><div class="line"><a name="l00916"></a><span class="lineno"> 916</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad">integer_pack_loop_setup</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l00917"></a><span class="lineno"> 917</span>  &word_num_fullbytes, &word_num_partialbits,</div><div class="line"><a name="l00918"></a><span class="lineno"> 918</span>  &word_start, &word_step, &word_last, &byte_start, &byte_step);</div><div class="line"><a name="l00919"></a><span class="lineno"> 919</span> </div><div class="line"><a name="l00920"></a><span class="lineno"> 920</span>  partialbits_mask = (1 << word_num_partialbits) - 1;</div><div class="line"><a name="l00921"></a><span class="lineno"> 921</span> </div><div class="line"><a name="l00922"></a><span class="lineno"> 922</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> = words;</div><div class="line"><a name="l00923"></a><span class="lineno"> 923</span>  wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_start;</div><div class="line"><a name="l00924"></a><span class="lineno"> 924</span>  last_wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_last;</div><div class="line"><a name="l00925"></a><span class="lineno"> 925</span> </div><div class="line"><a name="l00926"></a><span class="lineno"> 926</span>  carry = 1;</div><div class="line"><a name="l00927"></a><span class="lineno"> 927</span>  <span class="keywordflow">while</span> (1) {</div><div class="line"><a name="l00928"></a><span class="lineno"> 928</span>  <span class="keywordtype">size_t</span> index_in_word = 0;</div><div class="line"><a name="l00929"></a><span class="lineno"> 929</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *bytep = wordp + byte_start;</div><div class="line"><a name="l00930"></a><span class="lineno"> 930</span>  <span class="keywordflow">while</span> (index_in_word < word_num_fullbytes) {</div><div class="line"><a name="l00931"></a><span class="lineno"> 931</span>  carry += (<span class="keywordtype">unsigned</span> char)~*bytep;</div><div class="line"><a name="l00932"></a><span class="lineno"> 932</span>  *bytep = (<span class="keywordtype">unsigned</span> char)carry;</div><div class="line"><a name="l00933"></a><span class="lineno"> 933</span>  carry >>= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00934"></a><span class="lineno"> 934</span>  bytep += byte_step;</div><div class="line"><a name="l00935"></a><span class="lineno"> 935</span>  index_in_word++;</div><div class="line"><a name="l00936"></a><span class="lineno"> 936</span>  }</div><div class="line"><a name="l00937"></a><span class="lineno"> 937</span>  <span class="keywordflow">if</span> (word_num_partialbits) {</div><div class="line"><a name="l00938"></a><span class="lineno"> 938</span>  carry += (*bytep & partialbits_mask) ^ partialbits_mask;</div><div class="line"><a name="l00939"></a><span class="lineno"> 939</span>  *bytep = carry & partialbits_mask;</div><div class="line"><a name="l00940"></a><span class="lineno"> 940</span>  carry >>= word_num_partialbits;</div><div class="line"><a name="l00941"></a><span class="lineno"> 941</span>  bytep += byte_step;</div><div class="line"><a name="l00942"></a><span class="lineno"> 942</span>  index_in_word++;</div><div class="line"><a name="l00943"></a><span class="lineno"> 943</span>  }</div><div class="line"><a name="l00944"></a><span class="lineno"> 944</span> </div><div class="line"><a name="l00945"></a><span class="lineno"> 945</span>  <span class="keywordflow">if</span> (wordp == last_wordp)</div><div class="line"><a name="l00946"></a><span class="lineno"> 946</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00947"></a><span class="lineno"> 947</span> </div><div class="line"><a name="l00948"></a><span class="lineno"> 948</span>  wordp += word_step;</div><div class="line"><a name="l00949"></a><span class="lineno"> 949</span>  }</div><div class="line"><a name="l00950"></a><span class="lineno"> 950</span>  }</div><div class="line"><a name="l00951"></a><span class="lineno"> 951</span> </div><div class="line"><a name="l00952"></a><span class="lineno"> 952</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l00953"></a><span class="lineno"> 953</span> <span class="preprocessor">#undef FILL_DD</span></div><div class="line"><a name="l00954"></a><span class="lineno"> 954</span> <span class="preprocessor">#undef TAKE_LOWBITS</span></div><div class="line"><a name="l00955"></a><span class="lineno"> 955</span> }</div><div class="line"><a name="l00956"></a><span class="lineno"> 956</span> </div><div class="line"><a name="l00957"></a><span class="lineno"> 957</span> <span class="keyword">static</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l00958"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aabf4b859454e358f1c494a0f914a6522"> 958</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aabf4b859454e358f1c494a0f914a6522">integer_unpack_num_bdigits_small</a>(<span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> *nlp_bits_ret)</div><div class="line"><a name="l00959"></a><span class="lineno"> 959</span> {</div><div class="line"><a name="l00960"></a><span class="lineno"> 960</span>  <span class="comment">/* nlp_bits stands for number of leading padding bits */</span></div><div class="line"><a name="l00961"></a><span class="lineno"> 961</span>  <span class="keywordtype">size_t</span> num_bits = (wordsize * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - nails) * numwords;</div><div class="line"><a name="l00962"></a><span class="lineno"> 962</span>  <span class="keywordtype">size_t</span> num_bdigits = (num_bits + <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - 1) / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l00963"></a><span class="lineno"> 963</span>  *nlp_bits_ret = (int)(num_bdigits * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - num_bits);</div><div class="line"><a name="l00964"></a><span class="lineno"> 964</span>  <span class="keywordflow">return</span> num_bdigits;</div><div class="line"><a name="l00965"></a><span class="lineno"> 965</span> }</div><div class="line"><a name="l00966"></a><span class="lineno"> 966</span> </div><div class="line"><a name="l00967"></a><span class="lineno"> 967</span> <span class="keyword">static</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l00968"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad2b6ee8539626c389a8dd757f0187bd7"> 968</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad2b6ee8539626c389a8dd757f0187bd7">integer_unpack_num_bdigits_generic</a>(<span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> *nlp_bits_ret)</div><div class="line"><a name="l00969"></a><span class="lineno"> 969</span> {</div><div class="line"><a name="l00970"></a><span class="lineno"> 970</span>  <span class="comment">/* BITSPERDIG = SIZEOF_BDIGITS * CHAR_BIT */</span></div><div class="line"><a name="l00971"></a><span class="lineno"> 971</span>  <span class="comment">/* num_bits = (wordsize * CHAR_BIT - nails) * numwords */</span></div><div class="line"><a name="l00972"></a><span class="lineno"> 972</span>  <span class="comment">/* num_bdigits = (num_bits + BITSPERDIG - 1) / BITSPERDIG */</span></div><div class="line"><a name="l00973"></a><span class="lineno"> 973</span> </div><div class="line"><a name="l00974"></a><span class="lineno"> 974</span>  <span class="comment">/* num_bits = CHAR_BIT * (wordsize * numwords) - nails * numwords = CHAR_BIT * num_bytes1 - nails * numwords */</span></div><div class="line"><a name="l00975"></a><span class="lineno"> 975</span>  <span class="keywordtype">size_t</span> num_bytes1 = wordsize * numwords;</div><div class="line"><a name="l00976"></a><span class="lineno"> 976</span> </div><div class="line"><a name="l00977"></a><span class="lineno"> 977</span>  <span class="comment">/* q1 * CHAR_BIT + r1 = numwords */</span></div><div class="line"><a name="l00978"></a><span class="lineno"> 978</span>  <span class="keywordtype">size_t</span> q1 = numwords / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00979"></a><span class="lineno"> 979</span>  <span class="keywordtype">size_t</span> r1 = numwords % <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00980"></a><span class="lineno"> 980</span> </div><div class="line"><a name="l00981"></a><span class="lineno"> 981</span>  <span class="comment">/* num_bits = CHAR_BIT * num_bytes1 - nails * (q1 * CHAR_BIT + r1) = CHAR_BIT * num_bytes2 - nails * r1 */</span></div><div class="line"><a name="l00982"></a><span class="lineno"> 982</span>  <span class="keywordtype">size_t</span> num_bytes2 = num_bytes1 - nails * q1;</div><div class="line"><a name="l00983"></a><span class="lineno"> 983</span> </div><div class="line"><a name="l00984"></a><span class="lineno"> 984</span>  <span class="comment">/* q2 * CHAR_BIT + r2 = nails */</span></div><div class="line"><a name="l00985"></a><span class="lineno"> 985</span>  <span class="keywordtype">size_t</span> q2 = nails / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00986"></a><span class="lineno"> 986</span>  <span class="keywordtype">size_t</span> r2 = nails % <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l00987"></a><span class="lineno"> 987</span> </div><div class="line"><a name="l00988"></a><span class="lineno"> 988</span>  <span class="comment">/* num_bits = CHAR_BIT * num_bytes2 - (q2 * CHAR_BIT + r2) * r1 = CHAR_BIT * num_bytes3 - r1 * r2 */</span></div><div class="line"><a name="l00989"></a><span class="lineno"> 989</span>  <span class="keywordtype">size_t</span> num_bytes3 = num_bytes2 - q2 * r1;</div><div class="line"><a name="l00990"></a><span class="lineno"> 990</span> </div><div class="line"><a name="l00991"></a><span class="lineno"> 991</span>  <span class="comment">/* q3 * BITSPERDIG + r3 = num_bytes3 */</span></div><div class="line"><a name="l00992"></a><span class="lineno"> 992</span>  <span class="keywordtype">size_t</span> q3 = num_bytes3 / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l00993"></a><span class="lineno"> 993</span>  <span class="keywordtype">size_t</span> r3 = num_bytes3 % <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l00994"></a><span class="lineno"> 994</span> </div><div class="line"><a name="l00995"></a><span class="lineno"> 995</span>  <span class="comment">/* num_bits = CHAR_BIT * (q3 * BITSPERDIG + r3) - r1 * r2 = BITSPERDIG * num_digits1 + CHAR_BIT * r3 - r1 * r2 */</span></div><div class="line"><a name="l00996"></a><span class="lineno"> 996</span>  <span class="keywordtype">size_t</span> num_digits1 = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> * q3;</div><div class="line"><a name="l00997"></a><span class="lineno"> 997</span> </div><div class="line"><a name="l00998"></a><span class="lineno"> 998</span>  <span class="comment">/*</span></div><div class="line"><a name="l00999"></a><span class="lineno"> 999</span> <span class="comment"> * if CHAR_BIT * r3 >= r1 * r2</span></div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span> <span class="comment"> * CHAR_BIT * r3 - r1 * r2 = CHAR_BIT * BITSPERDIG - (CHAR_BIT * BITSPERDIG - (CHAR_BIT * r3 - r1 * r2))</span></div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span> <span class="comment"> * q4 * BITSPERDIG + r4 = CHAR_BIT * BITSPERDIG - (CHAR_BIT * r3 - r1 * r2)</span></div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span> <span class="comment"> * num_bits = BITSPERDIG * num_digits1 + CHAR_BIT * BITSPERDIG - (q4 * BITSPERDIG + r4) = BITSPERDIG * num_digits2 - r4</span></div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span> <span class="comment"> * else</span></div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span> <span class="comment"> * q4 * BITSPERDIG + r4 = -(CHAR_BIT * r3 - r1 * r2)</span></div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span> <span class="comment"> * num_bits = BITSPERDIG * num_digits1 - (q4 * BITSPERDIG + r4) = BITSPERDIG * num_digits2 - r4</span></div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span> <span class="comment"> * end</span></div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span> <span class="comment"> */</span></div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span> </div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> * r3 >= r1 * r2) {</div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span>  <span class="keywordtype">size_t</span> tmp1 = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> * r3 - r1 * r2);</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span>  <span class="keywordtype">size_t</span> q4 = tmp1 / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span>  <span class="keywordtype">int</span> r4 = (int)(tmp1 % <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span>  <span class="keywordtype">size_t</span> num_digits2 = num_digits1 + <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - q4;</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span>  *nlp_bits_ret = r4;</div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>  <span class="keywordflow">return</span> num_digits2;</div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>  }</div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>  <span class="keywordtype">size_t</span> tmp1 = r1 * r2 - <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> * r3;</div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>  <span class="keywordtype">size_t</span> q4 = tmp1 / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span>  <span class="keywordtype">int</span> r4 = (int)(tmp1 % <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>  <span class="keywordtype">size_t</span> num_digits2 = num_digits1 - q4;</div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>  *nlp_bits_ret = r4;</div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>  <span class="keywordflow">return</span> num_digits2;</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>  }</div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span> }</div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span> </div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span> <span class="keyword">static</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l01028"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae554715ea3772fa4b2af1d9f76c198b7"> 1028</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae554715ea3772fa4b2af1d9f76c198b7">integer_unpack_num_bdigits</a>(<span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> *nlp_bits_ret)</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span> {</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span> </div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>  <span class="keywordflow">if</span> (numwords <= (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c75bb398badb69c7577b21486f9963f">SIZE_MAX</a> - (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1)) / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> / wordsize) {</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#aabf4b859454e358f1c494a0f914a6522">integer_unpack_num_bdigits_small</a>(numwords, wordsize, nails, nlp_bits_ret);</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span> <span class="preprocessor">#ifdef DEBUG_INTEGER_PACK</span></div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>  {</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>  <span class="keywordtype">int</span> nlp_bits1;</div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>  <span class="keywordtype">size_t</span> num_bdigits1 = <a class="code" href="../../d1/dcc/bignum_8c.html#ad2b6ee8539626c389a8dd757f0187bd7">integer_unpack_num_bdigits_generic</a>(numwords, wordsize, nails, &nlp_bits1);</div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(num_bdigits == num_bdigits1);</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(*nlp_bits_ret == nlp_bits1);</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>  }</div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>  }</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#ad2b6ee8539626c389a8dd757f0187bd7">integer_unpack_num_bdigits_generic</a>(numwords, wordsize, nails, nlp_bits_ret);</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span>  }</div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span>  <span class="keywordflow">return</span> num_bdigits;</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span> }</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span> </div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span> <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01050"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a78c41090d6f177ec133902c871e7228b"> 1050</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a78c41090d6f177ec133902c871e7228b">integer_unpack_push_bits</a>(<span class="keywordtype">int</span> data, <span class="keywordtype">int</span> numbits, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> *ddp, <span class="keywordtype">int</span> *numbits_in_dd_p, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **dpp)</div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span> {</div><div class="line"><a name="l01052"></a><span class="lineno"> 1052</span>  (*ddp) |= ((<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)data) << (*numbits_in_dd_p);</div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>  *numbits_in_dd_p += numbits;</div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> <= *numbits_in_dd_p) {</div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>  *(*dpp)++ = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(*ddp);</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>  *ddp = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(*ddp);</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>  *numbits_in_dd_p -= <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span>  }</div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span> }</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span> </div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01062"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d"> 1062</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> u, <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>, <span class="keywordtype">int</span> flags, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>)</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span> {</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) {</div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span>  sign = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ?</div><div class="line"><a name="l01067"></a><span class="lineno"> 1067</span>  ((<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> == <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> && u == 0) ? -2 : -1) :</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span>  ((u >> (<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - 1)) ? -1 : 1);</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>  <span class="keywordflow">if</span> (sign < 0) {</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>  u |= <a class="code" href="../../d1/dcc/bignum_8c.html#a7ecc9b03313c487ddc335601c28b1b7f">LSHIFTX</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>);</div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>  u = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(1 + ~u);</div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span>  }</div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>  }</div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>  sign = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ? -1 : 1;</div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span>  *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = u;</div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span> }</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span> </div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01081"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a91cc142dc6d521f1734348f40bf5d4cb"> 1081</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a91cc142dc6d521f1734348f40bf5d4cb">bary_unpack_internal</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *bdigits, <span class="keywordtype">size_t</span> num_bdigits, <span class="keyword">const</span> <span class="keywordtype">void</span> *words, <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags, <span class="keywordtype">int</span> nlp_bits)</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span> {</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>  <span class="keyword">const</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> = words;</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *de;</div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span> </div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = bdigits;</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>  de = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + num_bdigits;</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span> </div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>  <span class="keywordflow">if</span> (!(flags & <a class="code" href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a>)) {</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>  <span class="keywordflow">if</span> (nails == 0 && numwords == 1) {</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>  <span class="keywordtype">int</span> need_swap = wordsize != 1 &&</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>) != <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a> &&</div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>  ((flags & <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) ? !<a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a> : <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a>);</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>  <span class="keywordflow">if</span> (wordsize == 1) {</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a>(*(<a class="code" href="../../db/d4d/sha2_8h.html#aba7bc1797add20fe3efdf37ced1182c5">uint8_t</a> *)<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keyword">sizeof</span>(<a class="code" href="../../db/d4d/sha2_8h.html#aba7bc1797add20fe3efdf37ced1182c5">uint8_t</a>), flags, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>);</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>  }</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span> <span class="preprocessor">#if defined(HAVE_UINT16_T) && 2 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>  <span class="keywordflow">if</span> (wordsize == 2 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(uint16_t) == 0) {</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>  uint16_t u = *(uint16_t *)<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a>(need_swap ? <a class="code" href="../../db/dde/internal_8h.html#a230ba4a10a19fd06db52f5a5ed957d2b">swap16</a>(u) : u, <span class="keyword">sizeof</span>(uint16_t), flags, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>);</div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>  }</div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span> <span class="preprocessor">#if defined(HAVE_UINT32_T) && 4 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>  <span class="keywordflow">if</span> (wordsize == 4 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>) == 0) {</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>  <a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> u = *(<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a> *)<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a>(need_swap ? <a class="code" href="../../db/dde/internal_8h.html#a40f89812fbb971f324be796c9854a590">swap32</a>(u) : u, <span class="keyword">sizeof</span>(<a class="code" href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a>), flags, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>);</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span>  }</div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span> <span class="preprocessor">#if defined(HAVE_UINT64_T) && 8 <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>  <span class="keywordflow">if</span> (wordsize == 8 && (<a class="code" href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a>)words % <a class="code" href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a>(<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>) == 0) {</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>  <a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> u = *(<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a> *)<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a>(need_swap ? swap64(u) : u, <span class="keyword">sizeof</span>(<a class="code" href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a>), flags, <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>);</div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>  }</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>  }</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span> <span class="preprocessor">#if !defined(WORDS_BIGENDIAN)</span></div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>  <span class="keywordflow">if</span> (nails == 0 && <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>) &&</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728">INTEGER_PACK_WORDORDER_MASK</a>) == <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a> &&</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>  (flags & <a class="code" href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a>) != <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) {</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>  <span class="keywordtype">size_t</span> src_size = numwords * wordsize;</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>  <span class="keywordtype">size_t</span> dst_size = num_bdigits * <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>;</div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, words, <span class="keywordtype">char</span>, src_size);</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) {</div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) {</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>  <span class="keywordtype">int</span> zero_p;</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>  memset((<span class="keywordtype">char</span>*)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + src_size, 0xff, dst_size - src_size);</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>  zero_p = <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, num_bdigits);</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>  sign = zero_p ? -2 : -1;</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>  }</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[src_size-1] >> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>-1)) {</div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>  memset((<span class="keywordtype">char</span>*)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + src_size, 0xff, dst_size - src_size);</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, num_bdigits);</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>  sign = -1;</div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>  }</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a56d620b94b668ed7665d1616b2c54e48">MEMZERO</a>((<span class="keywordtype">char</span>*)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + src_size, <span class="keywordtype">char</span>, dst_size - src_size);</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>  sign = 1;</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>  }</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>  }</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a56d620b94b668ed7665d1616b2c54e48">MEMZERO</a>((<span class="keywordtype">char</span>*)<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + src_size, <span class="keywordtype">char</span>, dst_size - src_size);</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>  sign = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ? -1 : 1;</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>  }</div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>  }</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span>  <span class="keywordflow">if</span> (nails == 0 && <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>) &&</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>  wordsize % <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> == 0) {</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>  <span class="keywordtype">size_t</span> bdigits_per_word = wordsize / <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>;</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>  <span class="keywordtype">int</span> mswordfirst_p = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>) != 0;</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>  <span class="keywordtype">int</span> msbytefirst_p = (flags & <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>) ? <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a> :</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>  (flags & <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>) != 0;</div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, words, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, numwords*bdigits_per_word);</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>  <span class="keywordflow">if</span> (mswordfirst_p) {</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, num_bdigits);</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>  }</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>  <span class="keywordflow">if</span> (mswordfirst_p ? !msbytefirst_p : msbytefirst_p) {</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *p = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>  <span class="keywordflow">for</span> (i = 0; i < numwords; i++) {</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a>(p, bdigits_per_word);</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>  p += bdigits_per_word;</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>  }</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>  }</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>  <span class="keywordflow">if</span> (msbytefirst_p != <a class="code" href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a>) {</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *p;</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>  <span class="keywordflow">for</span> (p = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>; p < de; p++) {</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> d = *p;</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>  *p = swap_bdigit(d);</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>  }</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>  }</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>) {</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) {</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>  <span class="keywordtype">int</span> zero_p = <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, num_bdigits);</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>  sign = zero_p ? -2 : -1;</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>  }</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db">BDIGIT_MSB</a>(de[-1])) {</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>, num_bdigits);</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>  sign = -1;</div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>  }</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>  sign = 1;</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>  }</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>  }</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>  sign = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ? -1 : 1;</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>  }</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>  }</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>  }</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span> </div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>  <span class="keywordflow">if</span> (num_bdigits != 0) {</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>  <span class="keywordtype">int</span> word_num_partialbits;</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>  <span class="keywordtype">size_t</span> word_num_fullbytes;</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span> </div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>  ssize_t word_step;</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>  <span class="keywordtype">size_t</span> byte_start;</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>  <span class="keywordtype">int</span> byte_step;</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span> </div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>  <span class="keywordtype">size_t</span> word_start, word_last;</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>  <span class="keyword">const</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *wordp, *last_wordp;</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd;</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>  <span class="keywordtype">int</span> numbits_in_dd;</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span> </div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad">integer_pack_loop_setup</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span>  &word_num_fullbytes, &word_num_partialbits,</div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span>  &word_start, &word_step, &word_last, &byte_start, &byte_step);</div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span> </div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>  wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_start;</div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>  last_wordp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + word_last;</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span> </div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>  dd = 0;</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>  numbits_in_dd = 0;</div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span> </div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span> <span class="preprocessor">#define PUSH_BITS(data, numbits) \</span></div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span> <span class="preprocessor"> integer_unpack_push_bits(data, numbits, &dd, &numbits_in_dd, &dp)</span></div><div class="line"><a name="l01219"></a><span class="lineno"> 1219</span> </div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span>  <span class="keywordflow">while</span> (1) {</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>  <span class="keywordtype">size_t</span> index_in_word = 0;</div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span>  <span class="keyword">const</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *bytep = wordp + byte_start;</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>  <span class="keywordflow">while</span> (index_in_word < word_num_fullbytes) {</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae4da1fb07e4f56c24c99cd9313b5462c">PUSH_BITS</a>(*bytep, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>);</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>  bytep += byte_step;</div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>  index_in_word++;</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>  }</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>  <span class="keywordflow">if</span> (word_num_partialbits) {</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae4da1fb07e4f56c24c99cd9313b5462c">PUSH_BITS</a>(*bytep & ((1 << word_num_partialbits) - 1), word_num_partialbits);</div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>  bytep += byte_step;</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>  index_in_word++;</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>  }</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span> </div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>  <span class="keywordflow">if</span> (wordp == last_wordp)</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span> </div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>  wordp += word_step;</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>  }</div><div class="line"><a name="l01239"></a><span class="lineno"> 1239</span>  <span class="keywordflow">if</span> (dd)</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>  *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++ = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)dd;</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> <= de);</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de)</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>  *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++ = 0;</div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span> <span class="preprocessor">#undef PUSH_BITS</span></div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>  }</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span> </div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>  <span class="keywordflow">if</span> (!(flags & <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>)) {</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>  sign = (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ? -1 : 1;</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>  }</div><div class="line"><a name="l01250"></a><span class="lineno"> 1250</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>  <span class="keywordflow">if</span> (nlp_bits) {</div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>  <span class="keywordflow">if</span> ((flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) ||</div><div class="line"><a name="l01253"></a><span class="lineno"> 1253</span>  (bdigits[num_bdigits-1] >> (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - nlp_bits - 1))) {</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>  bdigits[num_bdigits-1] |= <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a> << (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - nlp_bits));</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>  sign = -1;</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>  }</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>  sign = 1;</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>  }</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>  }</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>) {</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>  sign = <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(bdigits, num_bdigits) ? -2 : -1;</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>  }</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>  <span class="keywordflow">if</span> (num_bdigits != 0 && <a class="code" href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db">BDIGIT_MSB</a>(bdigits[num_bdigits-1]))</div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span>  sign = -1;</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>  sign = 1;</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>  }</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>  }</div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span>  <span class="keywordflow">if</span> (sign == -1 && num_bdigits != 0) {</div><div class="line"><a name="l01273"></a><span class="lineno"> 1273</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(bdigits, num_bdigits);</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span>  }</div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span>  }</div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span> </div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span>  <span class="keywordflow">return</span> sign;</div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span> }</div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span> </div><div class="line"><a name="l01280"></a><span class="lineno"> 1280</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01281"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a"> 1281</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a">bary_unpack</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *bdigits, <span class="keywordtype">size_t</span> num_bdigits, <span class="keyword">const</span> <span class="keywordtype">void</span> *words, <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags)</div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span> {</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>  <span class="keywordtype">size_t</span> num_bdigits0;</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>  <span class="keywordtype">int</span> nlp_bits;</div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span> </div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17">validate_integer_pack_format</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l01288"></a><span class="lineno"> 1288</span>  <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>|</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>|</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a>|</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>|</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>  <a class="code" href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a>|</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>  <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>|</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>  <a class="code" href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a>);</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span> </div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>  num_bdigits0 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae554715ea3772fa4b2af1d9f76c198b7">integer_unpack_num_bdigits</a>(numwords, wordsize, nails, &nlp_bits);</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span> </div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(num_bdigits0 <= num_bdigits);</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span> </div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>  sign = <a class="code" href="../../d1/dcc/bignum_8c.html#a91cc142dc6d521f1734348f40bf5d4cb">bary_unpack_internal</a>(bdigits, num_bdigits0, words, numwords, wordsize, nails, flags, nlp_bits);</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span> </div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>  <span class="keywordflow">if</span> (num_bdigits0 < num_bdigits) {</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(bdigits + num_bdigits0, num_bdigits - num_bdigits0);</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>  <span class="keywordflow">if</span> (sign == -2) {</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>  bdigits[num_bdigits0] = 1;</div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>  }</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>  }</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span> }</div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span> </div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01313"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a9a10e0cfeee97e0668bcd9de1f16c018"> 1313</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a9a10e0cfeee97e0668bcd9de1f16c018">bary_subb</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <span class="keywordtype">int</span> borrow)</div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span> {</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> num;</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>  <span class="keywordtype">size_t</span> sn;</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span> </div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= zn);</div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(yn <= zn);</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span> </div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>  sn = xn < yn ? xn : yn;</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span> </div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>  num = borrow ? -1 : 0;</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>  <span class="keywordflow">for</span> (i = 0; i < sn; i++) {</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)xds[i] - yds[i];</div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>  }</div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>  <span class="keywordflow">if</span> (yn <= xn) {</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero;</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>  num += xds[i];</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>  }</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>  }</div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>  <span class="keywordflow">for</span> (; i < yn; i++) {</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>  num -= yds[i];</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01342"></a><span class="lineno"> 1342</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>  }</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>  }</div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero;</div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>  }</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span> </div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>  num_is_zero:</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>  <span class="keywordflow">if</span> (xds == zds && xn == zn)</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>  zds[i] = xds[i];</div><div class="line"><a name="l01356"></a><span class="lineno"> 1356</span>  }</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>  zds[i] = 0;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>  }</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span> }</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span> </div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01364"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133"> 1364</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span> {</div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a9a10e0cfeee97e0668bcd9de1f16c018">bary_subb</a>(zds, zn, xds, xn, yds, yn, 0);</div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span> }</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span> </div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01370"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a83ac33c373462cc1d7c996be196cfb68"> 1370</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a83ac33c373462cc1d7c996be196cfb68">bary_sub_one</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn)</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span> {</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a9a10e0cfeee97e0668bcd9de1f16c018">bary_subb</a>(zds, zn, zds, zn, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0, 1);</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span> }</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span> </div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01376"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29"> 1376</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29">bary_addc</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <span class="keywordtype">int</span> carry)</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span> {</div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num;</div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span> </div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= zn);</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(yn <= zn);</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span> </div><div class="line"><a name="l01384"></a><span class="lineno"> 1384</span>  <span class="keywordflow">if</span> (xn > yn) {</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *tds;</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>  tds = xds; xds = yds; yds = tds;</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>  i = xn; xn = yn; yn = i;</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>  }</div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span> </div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>  num = carry ? 1 : 0;</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>  <span class="keywordflow">for</span> (i = 0; i < xn; i++) {</div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[i] + yds[i];</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span>  }</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>  <span class="keywordflow">for</span> (; i < yn; i++) {</div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero;</div><div class="line"><a name="l01398"></a><span class="lineno"> 1398</span>  num += yds[i];</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>  }</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero;</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>  }</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>  <span class="keywordflow">return</span> num != 0;</div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span> </div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>  num_is_zero:</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>  <span class="keywordflow">if</span> (yds == zds && yn == zn)</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01412"></a><span class="lineno"> 1412</span>  <span class="keywordflow">for</span> (; i < yn; i++) {</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>  zds[i] = yds[i];</div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>  }</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>  zds[i] = 0;</div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>  }</div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span> }</div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span> </div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01422"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b"> 1422</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span> {</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29">bary_addc</a>(zds, zn, xds, xn, yds, yn, 0);</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span> }</div><div class="line"><a name="l01426"></a><span class="lineno"> 1426</span> </div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01428"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6"> 1428</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6">bary_add_one</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n)</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span> {</div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>  <span class="keywordflow">for</span> (i = 0; i < n; i++) {</div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>  ds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(ds[i]+1);</div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>  <span class="keywordflow">if</span> (ds[i] != 0)</div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>  }</div><div class="line"><a name="l01436"></a><span class="lineno"> 1436</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01437"></a><span class="lineno"> 1437</span> }</div><div class="line"><a name="l01438"></a><span class="lineno"> 1438</span> </div><div class="line"><a name="l01439"></a><span class="lineno"> 1439</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01440"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae8ba6f0e65c442333168ac2d8956cb4c"> 1440</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae8ba6f0e65c442333168ac2d8956cb4c">bary_mul_single</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> y)</div><div class="line"><a name="l01441"></a><span class="lineno"> 1441</span> {</div><div class="line"><a name="l01442"></a><span class="lineno"> 1442</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> n;</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span> </div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(2 <= zn);</div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span> </div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>  n = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)x * y;</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a364d0cb01e91a0fc47efecc51430ff0b">bdigitdbl2bary</a>(zds, 2, n);</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds + 2, zn - 2);</div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span> }</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span> </div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01452"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b"> 1452</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span> {</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> n;</div><div class="line"><a name="l01455"></a><span class="lineno"> 1455</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd;</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>  <span class="keywordtype">size_t</span> j;</div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span> </div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(zn > yn);</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span> </div><div class="line"><a name="l01460"></a><span class="lineno"> 1460</span>  <span class="keywordflow">if</span> (x == 0)</div><div class="line"><a name="l01461"></a><span class="lineno"> 1461</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01462"></a><span class="lineno"> 1462</span>  dd = x;</div><div class="line"><a name="l01463"></a><span class="lineno"> 1463</span>  n = 0;</div><div class="line"><a name="l01464"></a><span class="lineno"> 1464</span>  <span class="keywordflow">for</span> (j = 0; j < yn; j++) {</div><div class="line"><a name="l01465"></a><span class="lineno"> 1465</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> ee = n + dd * yds[j];</div><div class="line"><a name="l01466"></a><span class="lineno"> 1466</span>  <span class="keywordflow">if</span> (ee) {</div><div class="line"><a name="l01467"></a><span class="lineno"> 1467</span>  n = zds[j] + ee;</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>  zds[j] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(n);</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>  n = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(n);</div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>  }</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>  n = 0;</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>  }</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span> </div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>  }</div><div class="line"><a name="l01476"></a><span class="lineno"> 1476</span>  <span class="keywordflow">for</span> (; j < zn; j++) {</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>  <span class="keywordflow">if</span> (n == 0)</div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>  n += zds[j];</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>  zds[j] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(n);</div><div class="line"><a name="l01481"></a><span class="lineno"> 1481</span>  n = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(n);</div><div class="line"><a name="l01482"></a><span class="lineno"> 1482</span>  }</div><div class="line"><a name="l01483"></a><span class="lineno"> 1483</span>  <span class="keywordflow">return</span> n != 0;</div><div class="line"><a name="l01484"></a><span class="lineno"> 1484</span> }</div><div class="line"><a name="l01485"></a><span class="lineno"> 1485</span> </div><div class="line"><a name="l01486"></a><span class="lineno"> 1486</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a></div><div class="line"><a name="l01487"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac521d08f5ca64f5574183c91e8932b8c"> 1487</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac521d08f5ca64f5574183c91e8932b8c">bigdivrem_mulsub</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01488"></a><span class="lineno"> 1488</span> {</div><div class="line"><a name="l01489"></a><span class="lineno"> 1489</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01490"></a><span class="lineno"> 1490</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> t2;</div><div class="line"><a name="l01491"></a><span class="lineno"> 1491</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> num;</div><div class="line"><a name="l01492"></a><span class="lineno"> 1492</span> </div><div class="line"><a name="l01493"></a><span class="lineno"> 1493</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(zn == yn + 1);</div><div class="line"><a name="l01494"></a><span class="lineno"> 1494</span> </div><div class="line"><a name="l01495"></a><span class="lineno"> 1495</span>  num = 0;</div><div class="line"><a name="l01496"></a><span class="lineno"> 1496</span>  t2 = 0;</div><div class="line"><a name="l01497"></a><span class="lineno"> 1497</span>  i = 0;</div><div class="line"><a name="l01498"></a><span class="lineno"> 1498</span> </div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> ee;</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>  t2 += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)yds[i] * x;</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>  ee = num - <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(t2);</div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>  num = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)zds[i] + ee;</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>  <span class="keywordflow">if</span> (ee) zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>  t2 = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(t2);</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>  } <span class="keywordflow">while</span> (++i < yn);</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>  num += zds[i] - t2; <span class="comment">/* borrow from high digit; don't update */</span></div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span> }</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span> </div><div class="line"><a name="l01512"></a><span class="lineno"> 1512</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01513"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ab0ea4afa2707d7faefa3ff10f86e1fd9"> 1513</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ab0ea4afa2707d7faefa3ff10f86e1fd9">bary_mulsub_1xN</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span> {</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> num;</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span> </div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(zn == yn + 1);</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span> </div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#ac521d08f5ca64f5574183c91e8932b8c">bigdivrem_mulsub</a>(zds, zn, x, yds, yn);</div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>  zds[yn] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num))</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span> }</div><div class="line"><a name="l01525"></a><span class="lineno"> 1525</span> </div><div class="line"><a name="l01526"></a><span class="lineno"> 1526</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01527"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199"> 1527</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199">bary_mul_normal</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l01528"></a><span class="lineno"> 1528</span> {</div><div class="line"><a name="l01529"></a><span class="lineno"> 1529</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l01530"></a><span class="lineno"> 1530</span> </div><div class="line"><a name="l01531"></a><span class="lineno"> 1531</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l01532"></a><span class="lineno"> 1532</span> </div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds, zn);</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>  <span class="keywordflow">for</span> (i = 0; i < xn; i++) {</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(zds+i, zn-i, xds[i], yds, yn);</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>  }</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span> }</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span> </div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01540"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#aeb3d9927f1537ca972cadce1d6443e7e"> 1540</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aeb3d9927f1537ca972cadce1d6443e7e">rb_big_mul_normal</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span> {</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), zn = xn + yn;</div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199">bary_mul_normal</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), yn);</div><div class="line"><a name="l01545"></a><span class="lineno"> 1545</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span> }</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span> </div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span> <span class="comment">/* efficient squaring (2 times faster than normal multiplication)</span></div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span> <span class="comment"> * ref: Handbook of Applied Cryptography, Algorithm 14.16</span></div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span> <span class="comment"> * http://www.cacr.math.uwaterloo.ca/hac/about/chap14.pdf</span></div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span> <span class="comment"> */</span></div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01555"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be"> 1555</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn)</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span> {</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>  <span class="keywordtype">size_t</span> i, j;</div><div class="line"><a name="l01558"></a><span class="lineno"> 1558</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> c, v, w;</div><div class="line"><a name="l01559"></a><span class="lineno"> 1559</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> vl;</div><div class="line"><a name="l01560"></a><span class="lineno"> 1560</span>  <span class="keywordtype">int</span> vh;</div><div class="line"><a name="l01561"></a><span class="lineno"> 1561</span> </div><div class="line"><a name="l01562"></a><span class="lineno"> 1562</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn * 2 <= zn);</div><div class="line"><a name="l01563"></a><span class="lineno"> 1563</span> </div><div class="line"><a name="l01564"></a><span class="lineno"> 1564</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds, zn);</div><div class="line"><a name="l01565"></a><span class="lineno"> 1565</span> </div><div class="line"><a name="l01566"></a><span class="lineno"> 1566</span>  <span class="keywordflow">if</span> (xn == 0)</div><div class="line"><a name="l01567"></a><span class="lineno"> 1567</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01568"></a><span class="lineno"> 1568</span> </div><div class="line"><a name="l01569"></a><span class="lineno"> 1569</span>  <span class="keywordflow">for</span> (i = 0; i < xn-1; i++) {</div><div class="line"><a name="l01570"></a><span class="lineno"> 1570</span>  v = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[i];</div><div class="line"><a name="l01571"></a><span class="lineno"> 1571</span>  <span class="keywordflow">if</span> (!v)</div><div class="line"><a name="l01572"></a><span class="lineno"> 1572</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l01573"></a><span class="lineno"> 1573</span>  c = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)zds[i + i] + v * v;</div><div class="line"><a name="l01574"></a><span class="lineno"> 1574</span>  zds[i + i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(c);</div><div class="line"><a name="l01575"></a><span class="lineno"> 1575</span>  c = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(c);</div><div class="line"><a name="l01576"></a><span class="lineno"> 1576</span>  v *= 2;</div><div class="line"><a name="l01577"></a><span class="lineno"> 1577</span>  vl = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(v);</div><div class="line"><a name="l01578"></a><span class="lineno"> 1578</span>  vh = (int)<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(v);</div><div class="line"><a name="l01579"></a><span class="lineno"> 1579</span>  <span class="keywordflow">for</span> (j = i + 1; j < xn; j++) {</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>  w = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[j];</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>  c += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)zds[i + j] + vl * w;</div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>  zds[i + j] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(c);</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>  c = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(c);</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>  <span class="keywordflow">if</span> (vh)</div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>  c += w;</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>  }</div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>  <span class="keywordflow">if</span> (c) {</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>  c += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)zds[i + xn];</div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>  zds[i + xn] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(c);</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>  c = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(c);</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>  <span class="keywordflow">if</span> (c)</div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>  zds[i + xn + 1] += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)c;</div><div class="line"><a name="l01593"></a><span class="lineno"> 1593</span>  }</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>  }</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span> </div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>  <span class="comment">/* i == xn-1 */</span></div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>  v = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[i];</div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>  <span class="keywordflow">if</span> (!v)</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>  c = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)zds[i + i] + v * v;</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>  zds[i + i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(c);</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>  c = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(c);</div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>  <span class="keywordflow">if</span> (c) {</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>  zds[i + xn] += <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(c);</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>  }</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span> }</div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span> </div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01609"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a363cf15310be0b36820ece4965692ac4"> 1609</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a363cf15310be0b36820ece4965692ac4">rb_big_sq_fast</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span> {</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), zn = 2 * xn;</div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 1);</div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn);</div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span> }</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span> </div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span> <span class="comment">/* balancing multiplication by slicing larger argument */</span></div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01620"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06"> 1620</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06">bary_mul_balance_with_mulfunc</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn, <a class="code" href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420">mulfunc_t</a> *mulfunc)</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span> {</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> work = 0;</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>  <span class="keywordtype">size_t</span> yn0 = yn;</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>  <span class="keywordtype">size_t</span> r, n;</div><div class="line"><a name="l01625"></a><span class="lineno"> 1625</span> </div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= yn);</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(!<a class="code" href="../../d1/dcc/bignum_8c.html#a5abddc95277ae9fc652190608e53e28c">KARATSUBA_BALANCED</a>(xn, yn) || !<a class="code" href="../../d1/dcc/bignum_8c.html#ad16689892f192aecebbce697c4409d45">TOOM3_BALANCED</a>(xn, yn));</div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span> </div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds, xn);</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span> </div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>  n = 0;</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>  <span class="keywordflow">while</span> (yn > 0) {</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *tds;</div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>  <span class="keywordtype">size_t</span> tn;</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>  r = xn > yn ? yn : xn;</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>  tn = xn + r;</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>  <span class="keywordflow">if</span> (2 * (xn + r) <= zn - n) {</div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>  tds = zds + n + xn + r;</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>  mulfunc(tds, tn, xds, xn, yds + n, r, wds, wn);</div><div class="line"><a name="l01641"></a><span class="lineno"> 1641</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds + n + xn, r);</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds + n, tn,</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>  zds + n, tn,</div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>  tds, tn);</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>  }</div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01647"></a><span class="lineno"> 1647</span>  <span class="keywordflow">if</span> (wn < xn) {</div><div class="line"><a name="l01648"></a><span class="lineno"> 1648</span>  wn = xn;</div><div class="line"><a name="l01649"></a><span class="lineno"> 1649</span>  wds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, work, wn);</div><div class="line"><a name="l01650"></a><span class="lineno"> 1650</span>  }</div><div class="line"><a name="l01651"></a><span class="lineno"> 1651</span>  tds = zds + n;</div><div class="line"><a name="l01652"></a><span class="lineno"> 1652</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(wds, zds + n, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, xn);</div><div class="line"><a name="l01653"></a><span class="lineno"> 1653</span>  mulfunc(tds, tn, xds, xn, yds + n, r, wds+xn, wn-xn);</div><div class="line"><a name="l01654"></a><span class="lineno"> 1654</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds + n, tn,</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>  zds + n, tn,</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>  wds, xn);</div><div class="line"><a name="l01657"></a><span class="lineno"> 1657</span>  }</div><div class="line"><a name="l01658"></a><span class="lineno"> 1658</span>  yn -= r;</div><div class="line"><a name="l01659"></a><span class="lineno"> 1659</span>  n += r;</div><div class="line"><a name="l01660"></a><span class="lineno"> 1660</span>  }</div><div class="line"><a name="l01661"></a><span class="lineno"> 1661</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds+xn+yn0, zn - (xn+yn0));</div><div class="line"><a name="l01662"></a><span class="lineno"> 1662</span> </div><div class="line"><a name="l01663"></a><span class="lineno"> 1663</span>  <span class="keywordflow">if</span> (work)</div><div class="line"><a name="l01664"></a><span class="lineno"> 1664</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(work);</div><div class="line"><a name="l01665"></a><span class="lineno"> 1665</span> }</div><div class="line"><a name="l01666"></a><span class="lineno"> 1666</span> </div><div class="line"><a name="l01667"></a><span class="lineno"> 1667</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01668"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#adcc3f078ed2c9123ce5f79a5e2609005"> 1668</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#adcc3f078ed2c9123ce5f79a5e2609005">rb_big_mul_balance</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l01669"></a><span class="lineno"> 1669</span> {</div><div class="line"><a name="l01670"></a><span class="lineno"> 1670</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), zn = xn + yn;</div><div class="line"><a name="l01671"></a><span class="lineno"> 1671</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l01672"></a><span class="lineno"> 1672</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06">bary_mul_balance_with_mulfunc</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), yn, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0, <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>);</div><div class="line"><a name="l01673"></a><span class="lineno"> 1673</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l01674"></a><span class="lineno"> 1674</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l01675"></a><span class="lineno"> 1675</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l01676"></a><span class="lineno"> 1676</span> }</div><div class="line"><a name="l01677"></a><span class="lineno"> 1677</span> </div><div class="line"><a name="l01678"></a><span class="lineno"> 1678</span> <span class="comment">/* multiplication by karatsuba method */</span></div><div class="line"><a name="l01679"></a><span class="lineno"> 1679</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01680"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac115cfc17fb230dc2e834e9afa201cc3"> 1680</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac115cfc17fb230dc2e834e9afa201cc3">bary_mul_karatsuba</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l01681"></a><span class="lineno"> 1681</span> {</div><div class="line"><a name="l01682"></a><span class="lineno"> 1682</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> work = 0;</div><div class="line"><a name="l01683"></a><span class="lineno"> 1683</span> </div><div class="line"><a name="l01684"></a><span class="lineno"> 1684</span>  <span class="keywordtype">size_t</span> n;</div><div class="line"><a name="l01685"></a><span class="lineno"> 1685</span>  <span class="keywordtype">int</span> sub_p, borrow, carry1, carry2, carry3;</div><div class="line"><a name="l01686"></a><span class="lineno"> 1686</span> </div><div class="line"><a name="l01687"></a><span class="lineno"> 1687</span>  <span class="keywordtype">int</span> odd_y = 0;</div><div class="line"><a name="l01688"></a><span class="lineno"> 1688</span>  <span class="keywordtype">int</span> odd_xy = 0;</div><div class="line"><a name="l01689"></a><span class="lineno"> 1689</span>  <span class="keywordtype">int</span> sq;</div><div class="line"><a name="l01690"></a><span class="lineno"> 1690</span> </div><div class="line"><a name="l01691"></a><span class="lineno"> 1691</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds0, *xds1, *yds0, *yds1;</div><div class="line"><a name="l01692"></a><span class="lineno"> 1692</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds0, *zds1, *zds2, *zds3;</div><div class="line"><a name="l01693"></a><span class="lineno"> 1693</span> </div><div class="line"><a name="l01694"></a><span class="lineno"> 1694</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l01695"></a><span class="lineno"> 1695</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= yn);</div><div class="line"><a name="l01696"></a><span class="lineno"> 1696</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(yn < 2 * xn);</div><div class="line"><a name="l01697"></a><span class="lineno"> 1697</span> </div><div class="line"><a name="l01698"></a><span class="lineno"> 1698</span>  sq = xds == yds && xn == yn;</div><div class="line"><a name="l01699"></a><span class="lineno"> 1699</span> </div><div class="line"><a name="l01700"></a><span class="lineno"> 1700</span>  <span class="keywordflow">if</span> (yn & 1) {</div><div class="line"><a name="l01701"></a><span class="lineno"> 1701</span>  odd_y = 1;</div><div class="line"><a name="l01702"></a><span class="lineno"> 1702</span>  yn--;</div><div class="line"><a name="l01703"></a><span class="lineno"> 1703</span>  <span class="keywordflow">if</span> (yn < xn) {</div><div class="line"><a name="l01704"></a><span class="lineno"> 1704</span>  odd_xy = 1;</div><div class="line"><a name="l01705"></a><span class="lineno"> 1705</span>  xn--;</div><div class="line"><a name="l01706"></a><span class="lineno"> 1706</span>  }</div><div class="line"><a name="l01707"></a><span class="lineno"> 1707</span>  }</div><div class="line"><a name="l01708"></a><span class="lineno"> 1708</span> </div><div class="line"><a name="l01709"></a><span class="lineno"> 1709</span>  n = yn / 2;</div><div class="line"><a name="l01710"></a><span class="lineno"> 1710</span> </div><div class="line"><a name="l01711"></a><span class="lineno"> 1711</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(n < xn);</div><div class="line"><a name="l01712"></a><span class="lineno"> 1712</span> </div><div class="line"><a name="l01713"></a><span class="lineno"> 1713</span>  <span class="keywordflow">if</span> (wn < n) {</div><div class="line"><a name="l01714"></a><span class="lineno"> 1714</span>  <span class="comment">/* This function itself needs only n BDIGITs for work area.</span></div><div class="line"><a name="l01715"></a><span class="lineno"> 1715</span> <span class="comment"> * However this function calls bary_mul_karatsuba and</span></div><div class="line"><a name="l01716"></a><span class="lineno"> 1716</span> <span class="comment"> * bary_mul_balance recursively.</span></div><div class="line"><a name="l01717"></a><span class="lineno"> 1717</span> <span class="comment"> * 2n BDIGITs are enough to avoid allocations in</span></div><div class="line"><a name="l01718"></a><span class="lineno"> 1718</span> <span class="comment"> * the recursively called functions.</span></div><div class="line"><a name="l01719"></a><span class="lineno"> 1719</span> <span class="comment"> */</span></div><div class="line"><a name="l01720"></a><span class="lineno"> 1720</span>  wn = 2*n;</div><div class="line"><a name="l01721"></a><span class="lineno"> 1721</span>  wds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, work, wn);</div><div class="line"><a name="l01722"></a><span class="lineno"> 1722</span>  }</div><div class="line"><a name="l01723"></a><span class="lineno"> 1723</span> </div><div class="line"><a name="l01724"></a><span class="lineno"> 1724</span>  <span class="comment">/* Karatsuba algorithm:</span></div><div class="line"><a name="l01725"></a><span class="lineno"> 1725</span> <span class="comment"> *</span></div><div class="line"><a name="l01726"></a><span class="lineno"> 1726</span> <span class="comment"> * x = x0 + r*x1</span></div><div class="line"><a name="l01727"></a><span class="lineno"> 1727</span> <span class="comment"> * y = y0 + r*y1</span></div><div class="line"><a name="l01728"></a><span class="lineno"> 1728</span> <span class="comment"> * z = x*y</span></div><div class="line"><a name="l01729"></a><span class="lineno"> 1729</span> <span class="comment"> * = (x0 + r*x1) * (y0 + r*y1)</span></div><div class="line"><a name="l01730"></a><span class="lineno"> 1730</span> <span class="comment"> * = x0*y0 + r*(x1*y0 + x0*y1) + r*r*x1*y1</span></div><div class="line"><a name="l01731"></a><span class="lineno"> 1731</span> <span class="comment"> * = x0*y0 + r*(x0*y0 + x1*y1 - (x1-x0)*(y1-y0)) + r*r*x1*y1</span></div><div class="line"><a name="l01732"></a><span class="lineno"> 1732</span> <span class="comment"> * = x0*y0 + r*(x0*y0 + x1*y1 - (x0-x1)*(y0-y1)) + r*r*x1*y1</span></div><div class="line"><a name="l01733"></a><span class="lineno"> 1733</span> <span class="comment"> */</span></div><div class="line"><a name="l01734"></a><span class="lineno"> 1734</span> </div><div class="line"><a name="l01735"></a><span class="lineno"> 1735</span>  xds0 = xds;</div><div class="line"><a name="l01736"></a><span class="lineno"> 1736</span>  xds1 = xds + n;</div><div class="line"><a name="l01737"></a><span class="lineno"> 1737</span>  yds0 = yds;</div><div class="line"><a name="l01738"></a><span class="lineno"> 1738</span>  yds1 = yds + n;</div><div class="line"><a name="l01739"></a><span class="lineno"> 1739</span>  zds0 = zds;</div><div class="line"><a name="l01740"></a><span class="lineno"> 1740</span>  zds1 = zds + n;</div><div class="line"><a name="l01741"></a><span class="lineno"> 1741</span>  zds2 = zds + 2*n;</div><div class="line"><a name="l01742"></a><span class="lineno"> 1742</span>  zds3 = zds + 3*n;</div><div class="line"><a name="l01743"></a><span class="lineno"> 1743</span> </div><div class="line"><a name="l01744"></a><span class="lineno"> 1744</span>  sub_p = 1;</div><div class="line"><a name="l01745"></a><span class="lineno"> 1745</span> </div><div class="line"><a name="l01746"></a><span class="lineno"> 1746</span>  <span class="comment">/* zds0:? zds1:? zds2:? zds3:? wds:? */</span></div><div class="line"><a name="l01747"></a><span class="lineno"> 1747</span> </div><div class="line"><a name="l01748"></a><span class="lineno"> 1748</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(zds0, n, xds, n, xds+n, xn-n)) {</div><div class="line"><a name="l01749"></a><span class="lineno"> 1749</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(zds0, n);</div><div class="line"><a name="l01750"></a><span class="lineno"> 1750</span>  sub_p = !sub_p;</div><div class="line"><a name="l01751"></a><span class="lineno"> 1751</span>  }</div><div class="line"><a name="l01752"></a><span class="lineno"> 1752</span> </div><div class="line"><a name="l01753"></a><span class="lineno"> 1753</span>  <span class="comment">/* zds0:|x1-x0| zds1:? zds2:? zds3:? wds:? */</span></div><div class="line"><a name="l01754"></a><span class="lineno"> 1754</span> </div><div class="line"><a name="l01755"></a><span class="lineno"> 1755</span>  <span class="keywordflow">if</span> (sq) {</div><div class="line"><a name="l01756"></a><span class="lineno"> 1756</span>  sub_p = 1;</div><div class="line"><a name="l01757"></a><span class="lineno"> 1757</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>(zds1, 2*n, zds0, n, zds0, n, wds, wn);</div><div class="line"><a name="l01758"></a><span class="lineno"> 1758</span>  }</div><div class="line"><a name="l01759"></a><span class="lineno"> 1759</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01760"></a><span class="lineno"> 1760</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(wds, n, yds, n, yds+n, n)) {</div><div class="line"><a name="l01761"></a><span class="lineno"> 1761</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(wds, n);</div><div class="line"><a name="l01762"></a><span class="lineno"> 1762</span>  sub_p = !sub_p;</div><div class="line"><a name="l01763"></a><span class="lineno"> 1763</span>  }</div><div class="line"><a name="l01764"></a><span class="lineno"> 1764</span> </div><div class="line"><a name="l01765"></a><span class="lineno"> 1765</span>  <span class="comment">/* zds0:|x1-x0| zds1:? zds2:? zds3:? wds:|y1-y0| */</span></div><div class="line"><a name="l01766"></a><span class="lineno"> 1766</span> </div><div class="line"><a name="l01767"></a><span class="lineno"> 1767</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>(zds1, 2*n, zds0, n, wds, n, wds+n, wn-n);</div><div class="line"><a name="l01768"></a><span class="lineno"> 1768</span>  }</div><div class="line"><a name="l01769"></a><span class="lineno"> 1769</span> </div><div class="line"><a name="l01770"></a><span class="lineno"> 1770</span>  <span class="comment">/* zds0:|x1-x0| zds1,zds2:|x1-x0|*|y1-y0| zds3:? wds:|y1-y0| */</span></div><div class="line"><a name="l01771"></a><span class="lineno"> 1771</span> </div><div class="line"><a name="l01772"></a><span class="lineno"> 1772</span>  borrow = 0;</div><div class="line"><a name="l01773"></a><span class="lineno"> 1773</span>  <span class="keywordflow">if</span> (sub_p) {</div><div class="line"><a name="l01774"></a><span class="lineno"> 1774</span>  borrow = !<a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(zds1, 2*n);</div><div class="line"><a name="l01775"></a><span class="lineno"> 1775</span>  }</div><div class="line"><a name="l01776"></a><span class="lineno"> 1776</span>  <span class="comment">/* zds0:|x1-x0| zds1,zds2:-?|x1-x0|*|y1-y0| zds3:? wds:|y1-y0| */</span></div><div class="line"><a name="l01777"></a><span class="lineno"> 1777</span> </div><div class="line"><a name="l01778"></a><span class="lineno"> 1778</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(wds, zds1, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, n);</div><div class="line"><a name="l01779"></a><span class="lineno"> 1779</span> </div><div class="line"><a name="l01780"></a><span class="lineno"> 1780</span>  <span class="comment">/* zds0:|x1-x0| zds1,zds2:-?|x1-x0|*|y1-y0| zds3:? wds:lo(-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01781"></a><span class="lineno"> 1781</span> </div><div class="line"><a name="l01782"></a><span class="lineno"> 1782</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>(zds0, 2*n, xds0, n, yds0, n, wds+n, wn-n);</div><div class="line"><a name="l01783"></a><span class="lineno"> 1783</span> </div><div class="line"><a name="l01784"></a><span class="lineno"> 1784</span>  <span class="comment">/* zds0,zds1:x0*y0 zds2:hi(-?|x1-x0|*|y1-y0|) zds3:? wds:lo(-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01785"></a><span class="lineno"> 1785</span> </div><div class="line"><a name="l01786"></a><span class="lineno"> 1786</span>  carry1 = <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(wds, n, wds, n, zds0, n);</div><div class="line"><a name="l01787"></a><span class="lineno"> 1787</span>  carry1 = <a class="code" href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29">bary_addc</a>(zds2, n, zds2, n, zds1, n, carry1);</div><div class="line"><a name="l01788"></a><span class="lineno"> 1788</span> </div><div class="line"><a name="l01789"></a><span class="lineno"> 1789</span>  <span class="comment">/* zds0,zds1:x0*y0 zds2:hi(x0*y0-?|x1-x0|*|y1-y0|) zds3:? wds:lo(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01790"></a><span class="lineno"> 1790</span> </div><div class="line"><a name="l01791"></a><span class="lineno"> 1791</span>  carry2 = <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds1, n, zds1, n, wds, n);</div><div class="line"><a name="l01792"></a><span class="lineno"> 1792</span> </div><div class="line"><a name="l01793"></a><span class="lineno"> 1793</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|) zds2:hi(x0*y0-?|x1-x0|*|y1-y0|) zds3:? wds:lo(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01794"></a><span class="lineno"> 1794</span> </div><div class="line"><a name="l01795"></a><span class="lineno"> 1795</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(wds, zds2, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, n);</div><div class="line"><a name="l01796"></a><span class="lineno"> 1796</span> </div><div class="line"><a name="l01797"></a><span class="lineno"> 1797</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|) zds2:_ zds3:? wds:hi(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01798"></a><span class="lineno"> 1798</span> </div><div class="line"><a name="l01799"></a><span class="lineno"> 1799</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>(zds2, zn-2*n, xds1, xn-n, yds1, n, wds+n, wn-n);</div><div class="line"><a name="l01800"></a><span class="lineno"> 1800</span> </div><div class="line"><a name="l01801"></a><span class="lineno"> 1801</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|) zds2,zds3:x1*y1 wds:hi(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01802"></a><span class="lineno"> 1802</span> </div><div class="line"><a name="l01803"></a><span class="lineno"> 1803</span>  carry3 = <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds1, n, zds1, n, zds2, n);</div><div class="line"><a name="l01804"></a><span class="lineno"> 1804</span> </div><div class="line"><a name="l01805"></a><span class="lineno"> 1805</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|)+lo(x1*y1) zds2,zds3:x1*y1 wds:hi(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01806"></a><span class="lineno"> 1806</span> </div><div class="line"><a name="l01807"></a><span class="lineno"> 1807</span>  carry3 = <a class="code" href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29">bary_addc</a>(zds2, n, zds2, n, zds3, (4*n < zn ? n : zn-3*n), carry3);</div><div class="line"><a name="l01808"></a><span class="lineno"> 1808</span> </div><div class="line"><a name="l01809"></a><span class="lineno"> 1809</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|)+lo(x1*y1) zds2,zds3:x1*y1+hi(x1*y1) wds:hi(x0*y0-?|x1-x0|*|y1-y0|) */</span></div><div class="line"><a name="l01810"></a><span class="lineno"> 1810</span> </div><div class="line"><a name="l01811"></a><span class="lineno"> 1811</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds2, zn-2*n, zds2, zn-2*n, wds, n);</div><div class="line"><a name="l01812"></a><span class="lineno"> 1812</span> </div><div class="line"><a name="l01813"></a><span class="lineno"> 1813</span>  <span class="comment">/* zds0:lo(x0*y0) zds1:hi(x0*y0)+lo(x0*y0-?|x1-x0|*|y1-y0|)+lo(x1*y1) zds2,zds3:x1*y1+hi(x1*y1)+hi(x0*y0-?|x1-x0|*|y1-y0|) wds:_ */</span></div><div class="line"><a name="l01814"></a><span class="lineno"> 1814</span> </div><div class="line"><a name="l01815"></a><span class="lineno"> 1815</span>  <span class="keywordflow">if</span> (carry2)</div><div class="line"><a name="l01816"></a><span class="lineno"> 1816</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6">bary_add_one</a>(zds2, zn-2*n);</div><div class="line"><a name="l01817"></a><span class="lineno"> 1817</span> </div><div class="line"><a name="l01818"></a><span class="lineno"> 1818</span>  <span class="keywordflow">if</span> (carry1 + carry3 - borrow < 0)</div><div class="line"><a name="l01819"></a><span class="lineno"> 1819</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a83ac33c373462cc1d7c996be196cfb68">bary_sub_one</a>(zds3, zn-3*n);</div><div class="line"><a name="l01820"></a><span class="lineno"> 1820</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (carry1 + carry3 - borrow > 0) {</div><div class="line"><a name="l01821"></a><span class="lineno"> 1821</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> c = carry1 + carry3 - borrow;</div><div class="line"><a name="l01822"></a><span class="lineno"> 1822</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zds3, zn-3*n, zds3, zn-3*n, &c, 1);</div><div class="line"><a name="l01823"></a><span class="lineno"> 1823</span>  }</div><div class="line"><a name="l01824"></a><span class="lineno"> 1824</span> </div><div class="line"><a name="l01825"></a><span class="lineno"> 1825</span>  <span class="comment">/*</span></div><div class="line"><a name="l01826"></a><span class="lineno"> 1826</span> <span class="comment"> if (SIZEOF_BDIGITS * zn <= 16) {</span></div><div class="line"><a name="l01827"></a><span class="lineno"> 1827</span> <span class="comment"> uint128_t z, x, y;</span></div><div class="line"><a name="l01828"></a><span class="lineno"> 1828</span> <span class="comment"> ssize_t i;</span></div><div class="line"><a name="l01829"></a><span class="lineno"> 1829</span> <span class="comment"> for (x = 0, i = xn-1; 0 <= i; i--) { x <<= SIZEOF_BDIGITS*CHAR_BIT; x |= xds[i]; }</span></div><div class="line"><a name="l01830"></a><span class="lineno"> 1830</span> <span class="comment"> for (y = 0, i = yn-1; 0 <= i; i--) { y <<= SIZEOF_BDIGITS*CHAR_BIT; y |= yds[i]; }</span></div><div class="line"><a name="l01831"></a><span class="lineno"> 1831</span> <span class="comment"> for (z = 0, i = zn-1; 0 <= i; i--) { z <<= SIZEOF_BDIGITS*CHAR_BIT; z |= zds[i]; }</span></div><div class="line"><a name="l01832"></a><span class="lineno"> 1832</span> <span class="comment"> assert(z == x * y);</span></div><div class="line"><a name="l01833"></a><span class="lineno"> 1833</span> <span class="comment"> }</span></div><div class="line"><a name="l01834"></a><span class="lineno"> 1834</span> <span class="comment"> */</span></div><div class="line"><a name="l01835"></a><span class="lineno"> 1835</span> </div><div class="line"><a name="l01836"></a><span class="lineno"> 1836</span>  <span class="keywordflow">if</span> (odd_xy) {</div><div class="line"><a name="l01837"></a><span class="lineno"> 1837</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(zds+yn, zn-yn, yds[yn], xds, xn);</div><div class="line"><a name="l01838"></a><span class="lineno"> 1838</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(zds+xn, zn-xn, xds[xn], yds, yn+1);</div><div class="line"><a name="l01839"></a><span class="lineno"> 1839</span>  }</div><div class="line"><a name="l01840"></a><span class="lineno"> 1840</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (odd_y) {</div><div class="line"><a name="l01841"></a><span class="lineno"> 1841</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(zds+yn, zn-yn, yds[yn], xds, xn);</div><div class="line"><a name="l01842"></a><span class="lineno"> 1842</span>  }</div><div class="line"><a name="l01843"></a><span class="lineno"> 1843</span> </div><div class="line"><a name="l01844"></a><span class="lineno"> 1844</span>  <span class="keywordflow">if</span> (work)</div><div class="line"><a name="l01845"></a><span class="lineno"> 1845</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(work);</div><div class="line"><a name="l01846"></a><span class="lineno"> 1846</span> }</div><div class="line"><a name="l01847"></a><span class="lineno"> 1847</span> </div><div class="line"><a name="l01848"></a><span class="lineno"> 1848</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01849"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a9d1267fbb36f74bb13efbc1d3765dc87"> 1849</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a9d1267fbb36f74bb13efbc1d3765dc87">rb_big_mul_karatsuba</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l01850"></a><span class="lineno"> 1850</span> {</div><div class="line"><a name="l01851"></a><span class="lineno"> 1851</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), zn = xn + yn;</div><div class="line"><a name="l01852"></a><span class="lineno"> 1852</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l01853"></a><span class="lineno"> 1853</span>  <span class="keywordflow">if</span> (!((xn <= yn && yn < 2) || <a class="code" href="../../d1/dcc/bignum_8c.html#a5abddc95277ae9fc652190608e53e28c">KARATSUBA_BALANCED</a>(xn, yn)))</div><div class="line"><a name="l01854"></a><span class="lineno"> 1854</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unexpected bignum length for karatsuba"</span>);</div><div class="line"><a name="l01855"></a><span class="lineno"> 1855</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac115cfc17fb230dc2e834e9afa201cc3">bary_mul_karatsuba</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), yn, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l01856"></a><span class="lineno"> 1856</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l01857"></a><span class="lineno"> 1857</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l01858"></a><span class="lineno"> 1858</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l01859"></a><span class="lineno"> 1859</span> }</div><div class="line"><a name="l01860"></a><span class="lineno"> 1860</span> </div><div class="line"><a name="l01861"></a><span class="lineno"> 1861</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01862"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee"> 1862</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee">bary_mul_toom3</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l01863"></a><span class="lineno"> 1863</span> {</div><div class="line"><a name="l01864"></a><span class="lineno"> 1864</span>  <span class="keywordtype">size_t</span> n;</div><div class="line"><a name="l01865"></a><span class="lineno"> 1865</span>  <span class="keywordtype">size_t</span> wnc;</div><div class="line"><a name="l01866"></a><span class="lineno"> 1866</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> work = 0;</div><div class="line"><a name="l01867"></a><span class="lineno"> 1867</span> </div><div class="line"><a name="l01868"></a><span class="lineno"> 1868</span>  <span class="comment">/* "p" stands for "positive". Actually it means "non-negative", though. */</span></div><div class="line"><a name="l01869"></a><span class="lineno"> 1869</span>  <span class="keywordtype">size_t</span> x0n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *x0ds;</div><div class="line"><a name="l01870"></a><span class="lineno"> 1870</span>  <span class="keywordtype">size_t</span> x1n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *x1ds;</div><div class="line"><a name="l01871"></a><span class="lineno"> 1871</span>  <span class="keywordtype">size_t</span> x2n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *x2ds;</div><div class="line"><a name="l01872"></a><span class="lineno"> 1872</span>  <span class="keywordtype">size_t</span> y0n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *y0ds;</div><div class="line"><a name="l01873"></a><span class="lineno"> 1873</span>  <span class="keywordtype">size_t</span> y1n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *y1ds;</div><div class="line"><a name="l01874"></a><span class="lineno"> 1874</span>  <span class="keywordtype">size_t</span> y2n; <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *y2ds;</div><div class="line"><a name="l01875"></a><span class="lineno"> 1875</span> </div><div class="line"><a name="l01876"></a><span class="lineno"> 1876</span>  <span class="keywordtype">size_t</span> u1n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *u1ds; <span class="keywordtype">int</span> u1p;</div><div class="line"><a name="l01877"></a><span class="lineno"> 1877</span>  <span class="keywordtype">size_t</span> u2n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *u2ds; <span class="keywordtype">int</span> u2p;</div><div class="line"><a name="l01878"></a><span class="lineno"> 1878</span>  <span class="keywordtype">size_t</span> u3n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *u3ds; <span class="keywordtype">int</span> u3p;</div><div class="line"><a name="l01879"></a><span class="lineno"> 1879</span> </div><div class="line"><a name="l01880"></a><span class="lineno"> 1880</span>  <span class="keywordtype">size_t</span> v1n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *v1ds; <span class="keywordtype">int</span> v1p;</div><div class="line"><a name="l01881"></a><span class="lineno"> 1881</span>  <span class="keywordtype">size_t</span> v2n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *v2ds; <span class="keywordtype">int</span> v2p;</div><div class="line"><a name="l01882"></a><span class="lineno"> 1882</span>  <span class="keywordtype">size_t</span> v3n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *v3ds; <span class="keywordtype">int</span> v3p;</div><div class="line"><a name="l01883"></a><span class="lineno"> 1883</span> </div><div class="line"><a name="l01884"></a><span class="lineno"> 1884</span>  <span class="keywordtype">size_t</span> t0n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *t0ds; <span class="keywordtype">int</span> t0p;</div><div class="line"><a name="l01885"></a><span class="lineno"> 1885</span>  <span class="keywordtype">size_t</span> t1n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *t1ds; <span class="keywordtype">int</span> t1p;</div><div class="line"><a name="l01886"></a><span class="lineno"> 1886</span>  <span class="keywordtype">size_t</span> t2n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *t2ds; <span class="keywordtype">int</span> t2p;</div><div class="line"><a name="l01887"></a><span class="lineno"> 1887</span>  <span class="keywordtype">size_t</span> t3n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *t3ds; <span class="keywordtype">int</span> t3p;</div><div class="line"><a name="l01888"></a><span class="lineno"> 1888</span>  <span class="keywordtype">size_t</span> t4n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *t4ds; <span class="keywordtype">int</span> t4p;</div><div class="line"><a name="l01889"></a><span class="lineno"> 1889</span> </div><div class="line"><a name="l01890"></a><span class="lineno"> 1890</span>  <span class="keywordtype">size_t</span> z0n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *z0ds;</div><div class="line"><a name="l01891"></a><span class="lineno"> 1891</span>  <span class="keywordtype">size_t</span> z1n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *z1ds; <span class="keywordtype">int</span> z1p;</div><div class="line"><a name="l01892"></a><span class="lineno"> 1892</span>  <span class="keywordtype">size_t</span> z2n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *z2ds; <span class="keywordtype">int</span> z2p;</div><div class="line"><a name="l01893"></a><span class="lineno"> 1893</span>  <span class="keywordtype">size_t</span> z3n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *z3ds; <span class="keywordtype">int</span> z3p;</div><div class="line"><a name="l01894"></a><span class="lineno"> 1894</span>  <span class="keywordtype">size_t</span> z4n; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *z4ds;</div><div class="line"><a name="l01895"></a><span class="lineno"> 1895</span> </div><div class="line"><a name="l01896"></a><span class="lineno"> 1896</span>  <span class="keywordtype">size_t</span> zzn; <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zzds;</div><div class="line"><a name="l01897"></a><span class="lineno"> 1897</span> </div><div class="line"><a name="l01898"></a><span class="lineno"> 1898</span>  <span class="keywordtype">int</span> sq = xds == yds && xn == yn;</div><div class="line"><a name="l01899"></a><span class="lineno"> 1899</span> </div><div class="line"><a name="l01900"></a><span class="lineno"> 1900</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= yn); <span class="comment">/* assume y >= x */</span></div><div class="line"><a name="l01901"></a><span class="lineno"> 1901</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l01902"></a><span class="lineno"> 1902</span> </div><div class="line"><a name="l01903"></a><span class="lineno"> 1903</span>  n = (yn + 2) / 3;</div><div class="line"><a name="l01904"></a><span class="lineno"> 1904</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(2*n < xn);</div><div class="line"><a name="l01905"></a><span class="lineno"> 1905</span> </div><div class="line"><a name="l01906"></a><span class="lineno"> 1906</span>  wnc = 0;</div><div class="line"><a name="l01907"></a><span class="lineno"> 1907</span> </div><div class="line"><a name="l01908"></a><span class="lineno"> 1908</span>  wnc += (u1n = n+1); <span class="comment">/* BITSPERDIG*n+2 bits */</span></div><div class="line"><a name="l01909"></a><span class="lineno"> 1909</span>  wnc += (u2n = n+1); <span class="comment">/* BITSPERDIG*n+1 bits */</span></div><div class="line"><a name="l01910"></a><span class="lineno"> 1910</span>  wnc += (u3n = n+1); <span class="comment">/* BITSPERDIG*n+3 bits */</span></div><div class="line"><a name="l01911"></a><span class="lineno"> 1911</span>  wnc += (v1n = n+1); <span class="comment">/* BITSPERDIG*n+2 bits */</span></div><div class="line"><a name="l01912"></a><span class="lineno"> 1912</span>  wnc += (v2n = n+1); <span class="comment">/* BITSPERDIG*n+1 bits */</span></div><div class="line"><a name="l01913"></a><span class="lineno"> 1913</span>  wnc += (v3n = n+1); <span class="comment">/* BITSPERDIG*n+3 bits */</span></div><div class="line"><a name="l01914"></a><span class="lineno"> 1914</span> </div><div class="line"><a name="l01915"></a><span class="lineno"> 1915</span>  wnc += (t0n = 2*n); <span class="comment">/* BITSPERDIG*2*n bits */</span></div><div class="line"><a name="l01916"></a><span class="lineno"> 1916</span>  wnc += (t1n = 2*n+2); <span class="comment">/* BITSPERDIG*2*n+4 bits but bary_mul needs u1n+v1n */</span></div><div class="line"><a name="l01917"></a><span class="lineno"> 1917</span>  wnc += (t2n = 2*n+2); <span class="comment">/* BITSPERDIG*2*n+2 bits but bary_mul needs u2n+v2n */</span></div><div class="line"><a name="l01918"></a><span class="lineno"> 1918</span>  wnc += (t3n = 2*n+2); <span class="comment">/* BITSPERDIG*2*n+6 bits but bary_mul needs u3n+v3n */</span></div><div class="line"><a name="l01919"></a><span class="lineno"> 1919</span>  wnc += (t4n = 2*n); <span class="comment">/* BITSPERDIG*2*n bits */</span></div><div class="line"><a name="l01920"></a><span class="lineno"> 1920</span> </div><div class="line"><a name="l01921"></a><span class="lineno"> 1921</span>  wnc += (z1n = 2*n+1); <span class="comment">/* BITSPERDIG*2*n+5 bits */</span></div><div class="line"><a name="l01922"></a><span class="lineno"> 1922</span>  wnc += (z2n = 2*n+1); <span class="comment">/* BITSPERDIG*2*n+6 bits */</span></div><div class="line"><a name="l01923"></a><span class="lineno"> 1923</span>  wnc += (z3n = 2*n+1); <span class="comment">/* BITSPERDIG*2*n+8 bits */</span></div><div class="line"><a name="l01924"></a><span class="lineno"> 1924</span> </div><div class="line"><a name="l01925"></a><span class="lineno"> 1925</span>  <span class="keywordflow">if</span> (wn < wnc) {</div><div class="line"><a name="l01926"></a><span class="lineno"> 1926</span>  wn = wnc * 3 / 2; <span class="comment">/* Allocate working memory for whole recursion at once. */</span></div><div class="line"><a name="l01927"></a><span class="lineno"> 1927</span>  wds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, work, wn);</div><div class="line"><a name="l01928"></a><span class="lineno"> 1928</span>  }</div><div class="line"><a name="l01929"></a><span class="lineno"> 1929</span> </div><div class="line"><a name="l01930"></a><span class="lineno"> 1930</span>  u1ds = wds; wds += u1n;</div><div class="line"><a name="l01931"></a><span class="lineno"> 1931</span>  u2ds = wds; wds += u2n;</div><div class="line"><a name="l01932"></a><span class="lineno"> 1932</span>  u3ds = wds; wds += u3n;</div><div class="line"><a name="l01933"></a><span class="lineno"> 1933</span> </div><div class="line"><a name="l01934"></a><span class="lineno"> 1934</span>  v1ds = wds; wds += v1n;</div><div class="line"><a name="l01935"></a><span class="lineno"> 1935</span>  v2ds = wds; wds += v2n;</div><div class="line"><a name="l01936"></a><span class="lineno"> 1936</span>  v3ds = wds; wds += v3n;</div><div class="line"><a name="l01937"></a><span class="lineno"> 1937</span> </div><div class="line"><a name="l01938"></a><span class="lineno"> 1938</span>  t0ds = wds; wds += t0n;</div><div class="line"><a name="l01939"></a><span class="lineno"> 1939</span>  t1ds = wds; wds += t1n;</div><div class="line"><a name="l01940"></a><span class="lineno"> 1940</span>  t2ds = wds; wds += t2n;</div><div class="line"><a name="l01941"></a><span class="lineno"> 1941</span>  t3ds = wds; wds += t3n;</div><div class="line"><a name="l01942"></a><span class="lineno"> 1942</span>  t4ds = wds; wds += t4n;</div><div class="line"><a name="l01943"></a><span class="lineno"> 1943</span> </div><div class="line"><a name="l01944"></a><span class="lineno"> 1944</span>  z1ds = wds; wds += z1n;</div><div class="line"><a name="l01945"></a><span class="lineno"> 1945</span>  z2ds = wds; wds += z2n;</div><div class="line"><a name="l01946"></a><span class="lineno"> 1946</span>  z3ds = wds; wds += z3n;</div><div class="line"><a name="l01947"></a><span class="lineno"> 1947</span> </div><div class="line"><a name="l01948"></a><span class="lineno"> 1948</span>  wn -= wnc;</div><div class="line"><a name="l01949"></a><span class="lineno"> 1949</span> </div><div class="line"><a name="l01950"></a><span class="lineno"> 1950</span>  zzds = u1ds;</div><div class="line"><a name="l01951"></a><span class="lineno"> 1951</span>  zzn = 6*n+1;</div><div class="line"><a name="l01952"></a><span class="lineno"> 1952</span> </div><div class="line"><a name="l01953"></a><span class="lineno"> 1953</span>  x0n = n;</div><div class="line"><a name="l01954"></a><span class="lineno"> 1954</span>  x1n = n;</div><div class="line"><a name="l01955"></a><span class="lineno"> 1955</span>  x2n = xn - 2*n;</div><div class="line"><a name="l01956"></a><span class="lineno"> 1956</span>  x0ds = xds;</div><div class="line"><a name="l01957"></a><span class="lineno"> 1957</span>  x1ds = xds + n;</div><div class="line"><a name="l01958"></a><span class="lineno"> 1958</span>  x2ds = xds + 2*n;</div><div class="line"><a name="l01959"></a><span class="lineno"> 1959</span> </div><div class="line"><a name="l01960"></a><span class="lineno"> 1960</span>  <span class="keywordflow">if</span> (sq) {</div><div class="line"><a name="l01961"></a><span class="lineno"> 1961</span>  y0n = x0n;</div><div class="line"><a name="l01962"></a><span class="lineno"> 1962</span>  y1n = x1n;</div><div class="line"><a name="l01963"></a><span class="lineno"> 1963</span>  y2n = x2n;</div><div class="line"><a name="l01964"></a><span class="lineno"> 1964</span>  y0ds = x0ds;</div><div class="line"><a name="l01965"></a><span class="lineno"> 1965</span>  y1ds = x1ds;</div><div class="line"><a name="l01966"></a><span class="lineno"> 1966</span>  y2ds = x2ds;</div><div class="line"><a name="l01967"></a><span class="lineno"> 1967</span>  }</div><div class="line"><a name="l01968"></a><span class="lineno"> 1968</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01969"></a><span class="lineno"> 1969</span>  y0n = n;</div><div class="line"><a name="l01970"></a><span class="lineno"> 1970</span>  y1n = n;</div><div class="line"><a name="l01971"></a><span class="lineno"> 1971</span>  y2n = yn - 2*n;</div><div class="line"><a name="l01972"></a><span class="lineno"> 1972</span>  y0ds = yds;</div><div class="line"><a name="l01973"></a><span class="lineno"> 1973</span>  y1ds = yds + n;</div><div class="line"><a name="l01974"></a><span class="lineno"> 1974</span>  y2ds = yds + 2*n;</div><div class="line"><a name="l01975"></a><span class="lineno"> 1975</span>  }</div><div class="line"><a name="l01976"></a><span class="lineno"> 1976</span> </div><div class="line"><a name="l01977"></a><span class="lineno"> 1977</span>  <span class="comment">/*</span></div><div class="line"><a name="l01978"></a><span class="lineno"> 1978</span> <span class="comment"> * ref. http://en.wikipedia.org/wiki/Toom%E2%80%93Cook_multiplication</span></div><div class="line"><a name="l01979"></a><span class="lineno"> 1979</span> <span class="comment"> *</span></div><div class="line"><a name="l01980"></a><span class="lineno"> 1980</span> <span class="comment"> * x(b) = x0 * b^0 + x1 * b^1 + x2 * b^2</span></div><div class="line"><a name="l01981"></a><span class="lineno"> 1981</span> <span class="comment"> * y(b) = y0 * b^0 + y1 * b^1 + y2 * b^2</span></div><div class="line"><a name="l01982"></a><span class="lineno"> 1982</span> <span class="comment"> *</span></div><div class="line"><a name="l01983"></a><span class="lineno"> 1983</span> <span class="comment"> * z(b) = x(b) * y(b)</span></div><div class="line"><a name="l01984"></a><span class="lineno"> 1984</span> <span class="comment"> * z(b) = z0 * b^0 + z1 * b^1 + z2 * b^2 + z3 * b^3 + z4 * b^4</span></div><div class="line"><a name="l01985"></a><span class="lineno"> 1985</span> <span class="comment"> * where:</span></div><div class="line"><a name="l01986"></a><span class="lineno"> 1986</span> <span class="comment"> * z0 = x0 * y0</span></div><div class="line"><a name="l01987"></a><span class="lineno"> 1987</span> <span class="comment"> * z1 = x0 * y1 + x1 * y0</span></div><div class="line"><a name="l01988"></a><span class="lineno"> 1988</span> <span class="comment"> * z2 = x0 * y2 + x1 * y1 + x2 * y0</span></div><div class="line"><a name="l01989"></a><span class="lineno"> 1989</span> <span class="comment"> * z3 = x1 * y2 + x2 * y1</span></div><div class="line"><a name="l01990"></a><span class="lineno"> 1990</span> <span class="comment"> * z4 = x2 * y2</span></div><div class="line"><a name="l01991"></a><span class="lineno"> 1991</span> <span class="comment"> *</span></div><div class="line"><a name="l01992"></a><span class="lineno"> 1992</span> <span class="comment"> * Toom3 method (a.k.a. Toom-Cook method):</span></div><div class="line"><a name="l01993"></a><span class="lineno"> 1993</span> <span class="comment"> * (Step1) calculating 5 points z(b0), z(b1), z(b2), z(b3), z(b4),</span></div><div class="line"><a name="l01994"></a><span class="lineno"> 1994</span> <span class="comment"> * where:</span></div><div class="line"><a name="l01995"></a><span class="lineno"> 1995</span> <span class="comment"> * b0 = 0, b1 = 1, b2 = -1, b3 = -2, b4 = inf,</span></div><div class="line"><a name="l01996"></a><span class="lineno"> 1996</span> <span class="comment"> * z(0) = x(0) * y(0) = x0 * y0</span></div><div class="line"><a name="l01997"></a><span class="lineno"> 1997</span> <span class="comment"> * z(1) = x(1) * y(1) = (x0 + x1 + x2) * (y0 + y1 + y2)</span></div><div class="line"><a name="l01998"></a><span class="lineno"> 1998</span> <span class="comment"> * z(-1) = x(-1) * y(-1) = (x0 - x1 + x2) * (y0 - y1 + y2)</span></div><div class="line"><a name="l01999"></a><span class="lineno"> 1999</span> <span class="comment"> * z(-2) = x(-2) * y(-2) = (x0 - 2 * (x1 - 2 * x2)) * (y0 - 2 * (y1 - 2 * y2))</span></div><div class="line"><a name="l02000"></a><span class="lineno"> 2000</span> <span class="comment"> * z(inf) = x(inf) * y(inf) = x2 * y2</span></div><div class="line"><a name="l02001"></a><span class="lineno"> 2001</span> <span class="comment"> *</span></div><div class="line"><a name="l02002"></a><span class="lineno"> 2002</span> <span class="comment"> * (Step2) interpolating z0, z1, z2, z3 and z4.</span></div><div class="line"><a name="l02003"></a><span class="lineno"> 2003</span> <span class="comment"> *</span></div><div class="line"><a name="l02004"></a><span class="lineno"> 2004</span> <span class="comment"> * (Step3) Substituting base value into b of the polynomial z(b),</span></div><div class="line"><a name="l02005"></a><span class="lineno"> 2005</span> <span class="comment"> */</span></div><div class="line"><a name="l02006"></a><span class="lineno"> 2006</span> </div><div class="line"><a name="l02007"></a><span class="lineno"> 2007</span>  <span class="comment">/*</span></div><div class="line"><a name="l02008"></a><span class="lineno"> 2008</span> <span class="comment"> * [Step1] calculating 5 points z(b0), z(b1), z(b2), z(b3), z(b4)</span></div><div class="line"><a name="l02009"></a><span class="lineno"> 2009</span> <span class="comment"> */</span></div><div class="line"><a name="l02010"></a><span class="lineno"> 2010</span> </div><div class="line"><a name="l02011"></a><span class="lineno"> 2011</span>  <span class="comment">/* u1 <- x0 + x2 */</span></div><div class="line"><a name="l02012"></a><span class="lineno"> 2012</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(u1ds, u1n, x0ds, x0n, x2ds, x2n);</div><div class="line"><a name="l02013"></a><span class="lineno"> 2013</span>  u1p = 1;</div><div class="line"><a name="l02014"></a><span class="lineno"> 2014</span> </div><div class="line"><a name="l02015"></a><span class="lineno"> 2015</span>  <span class="comment">/* x(-1) : u2 <- u1 - x1 = x0 - x1 + x2 */</span></div><div class="line"><a name="l02016"></a><span class="lineno"> 2016</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(u2ds, u2n, u1ds, u1n, x1ds, x1n)) {</div><div class="line"><a name="l02017"></a><span class="lineno"> 2017</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(u2ds, u2n);</div><div class="line"><a name="l02018"></a><span class="lineno"> 2018</span>  u2p = 0;</div><div class="line"><a name="l02019"></a><span class="lineno"> 2019</span>  }</div><div class="line"><a name="l02020"></a><span class="lineno"> 2020</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02021"></a><span class="lineno"> 2021</span>  u2p = 1;</div><div class="line"><a name="l02022"></a><span class="lineno"> 2022</span>  }</div><div class="line"><a name="l02023"></a><span class="lineno"> 2023</span> </div><div class="line"><a name="l02024"></a><span class="lineno"> 2024</span>  <span class="comment">/* x(1) : u1 <- u1 + x1 = x0 + x1 + x2 */</span></div><div class="line"><a name="l02025"></a><span class="lineno"> 2025</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(u1ds, u1n, u1ds, u1n, x1ds, x1n);</div><div class="line"><a name="l02026"></a><span class="lineno"> 2026</span> </div><div class="line"><a name="l02027"></a><span class="lineno"> 2027</span>  <span class="comment">/* x(-2) : u3 <- 2 * (u2 + x2) - x0 = x0 - 2 * (x1 - 2 * x2) */</span></div><div class="line"><a name="l02028"></a><span class="lineno"> 2028</span>  u3p = 1;</div><div class="line"><a name="l02029"></a><span class="lineno"> 2029</span>  <span class="keywordflow">if</span> (u2p) {</div><div class="line"><a name="l02030"></a><span class="lineno"> 2030</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(u3ds, u3n, u2ds, u2n, x2ds, x2n);</div><div class="line"><a name="l02031"></a><span class="lineno"> 2031</span>  }</div><div class="line"><a name="l02032"></a><span class="lineno"> 2032</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(u3ds, u3n, x2ds, x2n, u2ds, u2n)) {</div><div class="line"><a name="l02033"></a><span class="lineno"> 2033</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(u3ds, u3n);</div><div class="line"><a name="l02034"></a><span class="lineno"> 2034</span>  u3p = 0;</div><div class="line"><a name="l02035"></a><span class="lineno"> 2035</span>  }</div><div class="line"><a name="l02036"></a><span class="lineno"> 2036</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(u3ds, u3ds, u3n, 1);</div><div class="line"><a name="l02037"></a><span class="lineno"> 2037</span>  <span class="keywordflow">if</span> (!u3p) {</div><div class="line"><a name="l02038"></a><span class="lineno"> 2038</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(u3ds, u3n, u3ds, u3n, x0ds, x0n);</div><div class="line"><a name="l02039"></a><span class="lineno"> 2039</span>  }</div><div class="line"><a name="l02040"></a><span class="lineno"> 2040</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(u3ds, u3n, u3ds, u3n, x0ds, x0n)) {</div><div class="line"><a name="l02041"></a><span class="lineno"> 2041</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(u3ds, u3n);</div><div class="line"><a name="l02042"></a><span class="lineno"> 2042</span>  u3p = 0;</div><div class="line"><a name="l02043"></a><span class="lineno"> 2043</span>  }</div><div class="line"><a name="l02044"></a><span class="lineno"> 2044</span> </div><div class="line"><a name="l02045"></a><span class="lineno"> 2045</span>  <span class="keywordflow">if</span> (sq) {</div><div class="line"><a name="l02046"></a><span class="lineno"> 2046</span>  v1n = u1n; v1ds = u1ds; v1p = u1p;</div><div class="line"><a name="l02047"></a><span class="lineno"> 2047</span>  v2n = u2n; v2ds = u2ds; v2p = u2p;</div><div class="line"><a name="l02048"></a><span class="lineno"> 2048</span>  v3n = u3n; v3ds = u3ds; v3p = u3p;</div><div class="line"><a name="l02049"></a><span class="lineno"> 2049</span>  }</div><div class="line"><a name="l02050"></a><span class="lineno"> 2050</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02051"></a><span class="lineno"> 2051</span>  <span class="comment">/* v1 <- y0 + y2 */</span></div><div class="line"><a name="l02052"></a><span class="lineno"> 2052</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(v1ds, v1n, y0ds, y0n, y2ds, y2n);</div><div class="line"><a name="l02053"></a><span class="lineno"> 2053</span>  v1p = 1;</div><div class="line"><a name="l02054"></a><span class="lineno"> 2054</span> </div><div class="line"><a name="l02055"></a><span class="lineno"> 2055</span>  <span class="comment">/* y(-1) : v2 <- v1 - y1 = y0 - y1 + y2 */</span></div><div class="line"><a name="l02056"></a><span class="lineno"> 2056</span>  v2p = 1;</div><div class="line"><a name="l02057"></a><span class="lineno"> 2057</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(v2ds, v2n, v1ds, v1n, y1ds, y1n)) {</div><div class="line"><a name="l02058"></a><span class="lineno"> 2058</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(v2ds, v2n);</div><div class="line"><a name="l02059"></a><span class="lineno"> 2059</span>  v2p = 0;</div><div class="line"><a name="l02060"></a><span class="lineno"> 2060</span>  }</div><div class="line"><a name="l02061"></a><span class="lineno"> 2061</span> </div><div class="line"><a name="l02062"></a><span class="lineno"> 2062</span>  <span class="comment">/* y(1) : v1 <- v1 + y1 = y0 + y1 + y2 */</span></div><div class="line"><a name="l02063"></a><span class="lineno"> 2063</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(v1ds, v1n, v1ds, v1n, y1ds, y1n);</div><div class="line"><a name="l02064"></a><span class="lineno"> 2064</span> </div><div class="line"><a name="l02065"></a><span class="lineno"> 2065</span>  <span class="comment">/* y(-2) : v3 <- 2 * (v2 + y2) - y0 = y0 - 2 * (y1 - 2 * y2) */</span></div><div class="line"><a name="l02066"></a><span class="lineno"> 2066</span>  v3p = 1;</div><div class="line"><a name="l02067"></a><span class="lineno"> 2067</span>  <span class="keywordflow">if</span> (v2p) {</div><div class="line"><a name="l02068"></a><span class="lineno"> 2068</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(v3ds, v3n, v2ds, v2n, y2ds, y2n);</div><div class="line"><a name="l02069"></a><span class="lineno"> 2069</span>  }</div><div class="line"><a name="l02070"></a><span class="lineno"> 2070</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(v3ds, v3n, y2ds, y2n, v2ds, v2n)) {</div><div class="line"><a name="l02071"></a><span class="lineno"> 2071</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(v3ds, v3n);</div><div class="line"><a name="l02072"></a><span class="lineno"> 2072</span>  v3p = 0;</div><div class="line"><a name="l02073"></a><span class="lineno"> 2073</span>  }</div><div class="line"><a name="l02074"></a><span class="lineno"> 2074</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(v3ds, v3ds, v3n, 1);</div><div class="line"><a name="l02075"></a><span class="lineno"> 2075</span>  <span class="keywordflow">if</span> (!v3p) {</div><div class="line"><a name="l02076"></a><span class="lineno"> 2076</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(v3ds, v3n, v3ds, v3n, y0ds, y0n);</div><div class="line"><a name="l02077"></a><span class="lineno"> 2077</span>  }</div><div class="line"><a name="l02078"></a><span class="lineno"> 2078</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(v3ds, v3n, v3ds, v3n, y0ds, y0n)) {</div><div class="line"><a name="l02079"></a><span class="lineno"> 2079</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(v3ds, v3n);</div><div class="line"><a name="l02080"></a><span class="lineno"> 2080</span>  v3p = 0;</div><div class="line"><a name="l02081"></a><span class="lineno"> 2081</span>  }</div><div class="line"><a name="l02082"></a><span class="lineno"> 2082</span>  }</div><div class="line"><a name="l02083"></a><span class="lineno"> 2083</span> </div><div class="line"><a name="l02084"></a><span class="lineno"> 2084</span>  <span class="comment">/* z(0) : t0 <- x0 * y0 */</span></div><div class="line"><a name="l02085"></a><span class="lineno"> 2085</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(t0ds, t0n, x0ds, x0n, y0ds, y0n, wds, wn);</div><div class="line"><a name="l02086"></a><span class="lineno"> 2086</span>  t0p = 1;</div><div class="line"><a name="l02087"></a><span class="lineno"> 2087</span> </div><div class="line"><a name="l02088"></a><span class="lineno"> 2088</span>  <span class="comment">/* z(1) : t1 <- u1 * v1 */</span></div><div class="line"><a name="l02089"></a><span class="lineno"> 2089</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(t1ds, t1n, u1ds, u1n, v1ds, v1n, wds, wn);</div><div class="line"><a name="l02090"></a><span class="lineno"> 2090</span>  t1p = u1p == v1p;</div><div class="line"><a name="l02091"></a><span class="lineno"> 2091</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(t1ds[t1n-1] == 0);</div><div class="line"><a name="l02092"></a><span class="lineno"> 2092</span>  t1n--;</div><div class="line"><a name="l02093"></a><span class="lineno"> 2093</span> </div><div class="line"><a name="l02094"></a><span class="lineno"> 2094</span>  <span class="comment">/* z(-1) : t2 <- u2 * v2 */</span></div><div class="line"><a name="l02095"></a><span class="lineno"> 2095</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(t2ds, t2n, u2ds, u2n, v2ds, v2n, wds, wn);</div><div class="line"><a name="l02096"></a><span class="lineno"> 2096</span>  t2p = u2p == v2p;</div><div class="line"><a name="l02097"></a><span class="lineno"> 2097</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(t2ds[t2n-1] == 0);</div><div class="line"><a name="l02098"></a><span class="lineno"> 2098</span>  t2n--;</div><div class="line"><a name="l02099"></a><span class="lineno"> 2099</span> </div><div class="line"><a name="l02100"></a><span class="lineno"> 2100</span>  <span class="comment">/* z(-2) : t3 <- u3 * v3 */</span></div><div class="line"><a name="l02101"></a><span class="lineno"> 2101</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(t3ds, t3n, u3ds, u3n, v3ds, v3n, wds, wn);</div><div class="line"><a name="l02102"></a><span class="lineno"> 2102</span>  t3p = u3p == v3p;</div><div class="line"><a name="l02103"></a><span class="lineno"> 2103</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(t3ds[t3n-1] == 0);</div><div class="line"><a name="l02104"></a><span class="lineno"> 2104</span>  t3n--;</div><div class="line"><a name="l02105"></a><span class="lineno"> 2105</span> </div><div class="line"><a name="l02106"></a><span class="lineno"> 2106</span>  <span class="comment">/* z(inf) : t4 <- x2 * y2 */</span></div><div class="line"><a name="l02107"></a><span class="lineno"> 2107</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(t4ds, t4n, x2ds, x2n, y2ds, y2n, wds, wn);</div><div class="line"><a name="l02108"></a><span class="lineno"> 2108</span>  t4p = 1;</div><div class="line"><a name="l02109"></a><span class="lineno"> 2109</span> </div><div class="line"><a name="l02110"></a><span class="lineno"> 2110</span>  <span class="comment">/*</span></div><div class="line"><a name="l02111"></a><span class="lineno"> 2111</span> <span class="comment"> * [Step2] interpolating z0, z1, z2, z3 and z4.</span></div><div class="line"><a name="l02112"></a><span class="lineno"> 2112</span> <span class="comment"> */</span></div><div class="line"><a name="l02113"></a><span class="lineno"> 2113</span> </div><div class="line"><a name="l02114"></a><span class="lineno"> 2114</span>  <span class="comment">/* z0 <- z(0) == t0 */</span></div><div class="line"><a name="l02115"></a><span class="lineno"> 2115</span>  z0n = t0n; z0ds = t0ds;</div><div class="line"><a name="l02116"></a><span class="lineno"> 2116</span> </div><div class="line"><a name="l02117"></a><span class="lineno"> 2117</span>  <span class="comment">/* z4 <- z(inf) == t4 */</span></div><div class="line"><a name="l02118"></a><span class="lineno"> 2118</span>  z4n = t4n; z4ds = t4ds;</div><div class="line"><a name="l02119"></a><span class="lineno"> 2119</span> </div><div class="line"><a name="l02120"></a><span class="lineno"> 2120</span>  <span class="comment">/* z3 <- (z(-2) - z(1)) / 3 == (t3 - t1) / 3 */</span></div><div class="line"><a name="l02121"></a><span class="lineno"> 2121</span>  <span class="keywordflow">if</span> (t3p == t1p) {</div><div class="line"><a name="l02122"></a><span class="lineno"> 2122</span>  z3p = t3p;</div><div class="line"><a name="l02123"></a><span class="lineno"> 2123</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z3ds, z3n, t3ds, t3n, t1ds, t1n)) {</div><div class="line"><a name="l02124"></a><span class="lineno"> 2124</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z3ds, z3n);</div><div class="line"><a name="l02125"></a><span class="lineno"> 2125</span>  z3p = !z3p;</div><div class="line"><a name="l02126"></a><span class="lineno"> 2126</span>  }</div><div class="line"><a name="l02127"></a><span class="lineno"> 2127</span>  }</div><div class="line"><a name="l02128"></a><span class="lineno"> 2128</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02129"></a><span class="lineno"> 2129</span>  z3p = t3p;</div><div class="line"><a name="l02130"></a><span class="lineno"> 2130</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z3ds, z3n, t3ds, t3n, t1ds, t1n);</div><div class="line"><a name="l02131"></a><span class="lineno"> 2131</span>  }</div><div class="line"><a name="l02132"></a><span class="lineno"> 2132</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a>(z3ds, z3ds, z3n, 3);</div><div class="line"><a name="l02133"></a><span class="lineno"> 2133</span> </div><div class="line"><a name="l02134"></a><span class="lineno"> 2134</span>  <span class="comment">/* z1 <- (z(1) - z(-1)) / 2 == (t1 - t2) / 2 */</span></div><div class="line"><a name="l02135"></a><span class="lineno"> 2135</span>  <span class="keywordflow">if</span> (t1p == t2p) {</div><div class="line"><a name="l02136"></a><span class="lineno"> 2136</span>  z1p = t1p;</div><div class="line"><a name="l02137"></a><span class="lineno"> 2137</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z1ds, z1n, t1ds, t1n, t2ds, t2n)) {</div><div class="line"><a name="l02138"></a><span class="lineno"> 2138</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z1ds, z1n);</div><div class="line"><a name="l02139"></a><span class="lineno"> 2139</span>  z1p = !z1p;</div><div class="line"><a name="l02140"></a><span class="lineno"> 2140</span>  }</div><div class="line"><a name="l02141"></a><span class="lineno"> 2141</span>  }</div><div class="line"><a name="l02142"></a><span class="lineno"> 2142</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02143"></a><span class="lineno"> 2143</span>  z1p = t1p;</div><div class="line"><a name="l02144"></a><span class="lineno"> 2144</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z1ds, z1n, t1ds, t1n, t2ds, t2n);</div><div class="line"><a name="l02145"></a><span class="lineno"> 2145</span>  }</div><div class="line"><a name="l02146"></a><span class="lineno"> 2146</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(z1ds, z1ds, z1n, 1, 0);</div><div class="line"><a name="l02147"></a><span class="lineno"> 2147</span> </div><div class="line"><a name="l02148"></a><span class="lineno"> 2148</span>  <span class="comment">/* z2 <- z(-1) - z(0) == t2 - t0 */</span></div><div class="line"><a name="l02149"></a><span class="lineno"> 2149</span>  <span class="keywordflow">if</span> (t2p == t0p) {</div><div class="line"><a name="l02150"></a><span class="lineno"> 2150</span>  z2p = t2p;</div><div class="line"><a name="l02151"></a><span class="lineno"> 2151</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z2ds, z2n, t2ds, t2n, t0ds, t0n)) {</div><div class="line"><a name="l02152"></a><span class="lineno"> 2152</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z2ds, z2n);</div><div class="line"><a name="l02153"></a><span class="lineno"> 2153</span>  z2p = !z2p;</div><div class="line"><a name="l02154"></a><span class="lineno"> 2154</span>  }</div><div class="line"><a name="l02155"></a><span class="lineno"> 2155</span>  }</div><div class="line"><a name="l02156"></a><span class="lineno"> 2156</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02157"></a><span class="lineno"> 2157</span>  z2p = t2p;</div><div class="line"><a name="l02158"></a><span class="lineno"> 2158</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z2ds, z2n, t2ds, t2n, t0ds, t0n);</div><div class="line"><a name="l02159"></a><span class="lineno"> 2159</span>  }</div><div class="line"><a name="l02160"></a><span class="lineno"> 2160</span> </div><div class="line"><a name="l02161"></a><span class="lineno"> 2161</span>  <span class="comment">/* z3 <- (z2 - z3) / 2 + 2 * z(inf) == (z2 - z3) / 2 + 2 * t4 */</span></div><div class="line"><a name="l02162"></a><span class="lineno"> 2162</span>  <span class="keywordflow">if</span> (z2p == z3p) {</div><div class="line"><a name="l02163"></a><span class="lineno"> 2163</span>  z3p = z2p;</div><div class="line"><a name="l02164"></a><span class="lineno"> 2164</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z3ds, z3n, z2ds, z2n, z3ds, z3n)) {</div><div class="line"><a name="l02165"></a><span class="lineno"> 2165</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z3ds, z3n);</div><div class="line"><a name="l02166"></a><span class="lineno"> 2166</span>  z3p = !z3p;</div><div class="line"><a name="l02167"></a><span class="lineno"> 2167</span>  }</div><div class="line"><a name="l02168"></a><span class="lineno"> 2168</span>  }</div><div class="line"><a name="l02169"></a><span class="lineno"> 2169</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02170"></a><span class="lineno"> 2170</span>  z3p = z2p;</div><div class="line"><a name="l02171"></a><span class="lineno"> 2171</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z3ds, z3n, z2ds, z2n, z3ds, z3n);</div><div class="line"><a name="l02172"></a><span class="lineno"> 2172</span>  }</div><div class="line"><a name="l02173"></a><span class="lineno"> 2173</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(z3ds, z3ds, z3n, 1, 0);</div><div class="line"><a name="l02174"></a><span class="lineno"> 2174</span>  <span class="keywordflow">if</span> (z3p == t4p) {</div><div class="line"><a name="l02175"></a><span class="lineno"> 2175</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a>(z3ds, z3n, 2, t4ds, t4n);</div><div class="line"><a name="l02176"></a><span class="lineno"> 2176</span>  }</div><div class="line"><a name="l02177"></a><span class="lineno"> 2177</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02178"></a><span class="lineno"> 2178</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ab0ea4afa2707d7faefa3ff10f86e1fd9">bary_mulsub_1xN</a>(z3ds, z3n, 2, t4ds, t4n)) {</div><div class="line"><a name="l02179"></a><span class="lineno"> 2179</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z3ds, z3n);</div><div class="line"><a name="l02180"></a><span class="lineno"> 2180</span>  z3p = !z3p;</div><div class="line"><a name="l02181"></a><span class="lineno"> 2181</span>  }</div><div class="line"><a name="l02182"></a><span class="lineno"> 2182</span>  }</div><div class="line"><a name="l02183"></a><span class="lineno"> 2183</span> </div><div class="line"><a name="l02184"></a><span class="lineno"> 2184</span>  <span class="comment">/* z2 <- z2 + z1 - z(inf) == z2 + z1 - t4 */</span></div><div class="line"><a name="l02185"></a><span class="lineno"> 2185</span>  <span class="keywordflow">if</span> (z2p == z1p) {</div><div class="line"><a name="l02186"></a><span class="lineno"> 2186</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z2ds, z2n, z2ds, z2n, z1ds, z1n);</div><div class="line"><a name="l02187"></a><span class="lineno"> 2187</span>  }</div><div class="line"><a name="l02188"></a><span class="lineno"> 2188</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02189"></a><span class="lineno"> 2189</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z2ds, z2n, z2ds, z2n, z1ds, z1n)) {</div><div class="line"><a name="l02190"></a><span class="lineno"> 2190</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z2ds, z2n);</div><div class="line"><a name="l02191"></a><span class="lineno"> 2191</span>  z2p = !z2p;</div><div class="line"><a name="l02192"></a><span class="lineno"> 2192</span>  }</div><div class="line"><a name="l02193"></a><span class="lineno"> 2193</span>  }</div><div class="line"><a name="l02194"></a><span class="lineno"> 2194</span> </div><div class="line"><a name="l02195"></a><span class="lineno"> 2195</span>  <span class="keywordflow">if</span> (z2p == t4p) {</div><div class="line"><a name="l02196"></a><span class="lineno"> 2196</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z2ds, z2n, z2ds, z2n, t4ds, t4n)) {</div><div class="line"><a name="l02197"></a><span class="lineno"> 2197</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z2ds, z2n);</div><div class="line"><a name="l02198"></a><span class="lineno"> 2198</span>  z2p = !z2p;</div><div class="line"><a name="l02199"></a><span class="lineno"> 2199</span>  }</div><div class="line"><a name="l02200"></a><span class="lineno"> 2200</span>  }</div><div class="line"><a name="l02201"></a><span class="lineno"> 2201</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02202"></a><span class="lineno"> 2202</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z2ds, z2n, z2ds, z2n, t4ds, t4n);</div><div class="line"><a name="l02203"></a><span class="lineno"> 2203</span>  }</div><div class="line"><a name="l02204"></a><span class="lineno"> 2204</span> </div><div class="line"><a name="l02205"></a><span class="lineno"> 2205</span>  <span class="comment">/* z1 <- z1 - z3 */</span></div><div class="line"><a name="l02206"></a><span class="lineno"> 2206</span>  <span class="keywordflow">if</span> (z1p == z3p) {</div><div class="line"><a name="l02207"></a><span class="lineno"> 2207</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(z1ds, z1n, z1ds, z1n, z3ds, z3n)) {</div><div class="line"><a name="l02208"></a><span class="lineno"> 2208</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(z1ds, z1n);</div><div class="line"><a name="l02209"></a><span class="lineno"> 2209</span>  z1p = !z1p;</div><div class="line"><a name="l02210"></a><span class="lineno"> 2210</span>  }</div><div class="line"><a name="l02211"></a><span class="lineno"> 2211</span>  }</div><div class="line"><a name="l02212"></a><span class="lineno"> 2212</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02213"></a><span class="lineno"> 2213</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(z1ds, z1n, z1ds, z1n, z3ds, z3n);</div><div class="line"><a name="l02214"></a><span class="lineno"> 2214</span>  }</div><div class="line"><a name="l02215"></a><span class="lineno"> 2215</span> </div><div class="line"><a name="l02216"></a><span class="lineno"> 2216</span>  <span class="comment">/*</span></div><div class="line"><a name="l02217"></a><span class="lineno"> 2217</span> <span class="comment"> * [Step3] Substituting base value into b of the polynomial z(b),</span></div><div class="line"><a name="l02218"></a><span class="lineno"> 2218</span> <span class="comment"> */</span></div><div class="line"><a name="l02219"></a><span class="lineno"> 2219</span> </div><div class="line"><a name="l02220"></a><span class="lineno"> 2220</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(zzds, z0ds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, z0n);</div><div class="line"><a name="l02221"></a><span class="lineno"> 2221</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zzds + z0n, 4*n - z0n);</div><div class="line"><a name="l02222"></a><span class="lineno"> 2222</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(zzds + 4*n, z4ds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, z4n);</div><div class="line"><a name="l02223"></a><span class="lineno"> 2223</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zzds + 4*n + z4n, zzn - (4*n + z4n));</div><div class="line"><a name="l02224"></a><span class="lineno"> 2224</span>  <span class="keywordflow">if</span> (z1p)</div><div class="line"><a name="l02225"></a><span class="lineno"> 2225</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zzds + n, zzn - n, zzds + n, zzn - n, z1ds, z1n);</div><div class="line"><a name="l02226"></a><span class="lineno"> 2226</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02227"></a><span class="lineno"> 2227</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(zzds + n, zzn - n, zzds + n, zzn - n, z1ds, z1n);</div><div class="line"><a name="l02228"></a><span class="lineno"> 2228</span>  <span class="keywordflow">if</span> (z2p)</div><div class="line"><a name="l02229"></a><span class="lineno"> 2229</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zzds + 2*n, zzn - 2*n, zzds + 2*n, zzn - 2*n, z2ds, z2n);</div><div class="line"><a name="l02230"></a><span class="lineno"> 2230</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02231"></a><span class="lineno"> 2231</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(zzds + 2*n, zzn - 2*n, zzds + 2*n, zzn - 2*n, z2ds, z2n);</div><div class="line"><a name="l02232"></a><span class="lineno"> 2232</span>  <span class="keywordflow">if</span> (z3p)</div><div class="line"><a name="l02233"></a><span class="lineno"> 2233</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(zzds + 3*n, zzn - 3*n, zzds + 3*n, zzn - 3*n, z3ds, z3n);</div><div class="line"><a name="l02234"></a><span class="lineno"> 2234</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02235"></a><span class="lineno"> 2235</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(zzds + 3*n, zzn - 3*n, zzds + 3*n, zzn - 3*n, z3ds, z3n);</div><div class="line"><a name="l02236"></a><span class="lineno"> 2236</span> </div><div class="line"><a name="l02237"></a><span class="lineno"> 2237</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(zzds, zzn);</div><div class="line"><a name="l02238"></a><span class="lineno"> 2238</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(zds, zzds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, zzn);</div><div class="line"><a name="l02239"></a><span class="lineno"> 2239</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds + zzn, zn - zzn);</div><div class="line"><a name="l02240"></a><span class="lineno"> 2240</span> </div><div class="line"><a name="l02241"></a><span class="lineno"> 2241</span>  <span class="keywordflow">if</span> (work)</div><div class="line"><a name="l02242"></a><span class="lineno"> 2242</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(work);</div><div class="line"><a name="l02243"></a><span class="lineno"> 2243</span> }</div><div class="line"><a name="l02244"></a><span class="lineno"> 2244</span> </div><div class="line"><a name="l02245"></a><span class="lineno"> 2245</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02246"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a2eca831268141bc720526436c74b2d33"> 2246</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a2eca831268141bc720526436c74b2d33">rb_big_mul_toom3</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l02247"></a><span class="lineno"> 2247</span> {</div><div class="line"><a name="l02248"></a><span class="lineno"> 2248</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), zn = xn + yn;</div><div class="line"><a name="l02249"></a><span class="lineno"> 2249</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l02250"></a><span class="lineno"> 2250</span>  <span class="keywordflow">if</span> (xn > yn || yn < 3 || !<a class="code" href="../../d1/dcc/bignum_8c.html#ad16689892f192aecebbce697c4409d45">TOOM3_BALANCED</a>(xn,yn))</div><div class="line"><a name="l02251"></a><span class="lineno"> 2251</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unexpected bignum length for toom3"</span>);</div><div class="line"><a name="l02252"></a><span class="lineno"> 2252</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee">bary_mul_toom3</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), yn, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l02253"></a><span class="lineno"> 2253</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l02254"></a><span class="lineno"> 2254</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l02255"></a><span class="lineno"> 2255</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l02256"></a><span class="lineno"> 2256</span> }</div><div class="line"><a name="l02257"></a><span class="lineno"> 2257</span> </div><div class="line"><a name="l02258"></a><span class="lineno"> 2258</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l02259"></a><span class="lineno"> 2259</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02260"></a><span class="lineno"> 2260</span> bary_mul_gmp(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l02261"></a><span class="lineno"> 2261</span> {</div><div class="line"><a name="l02262"></a><span class="lineno"> 2262</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> nails = (<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>)*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l02263"></a><span class="lineno"> 2263</span>  mpz_t x, y, z;</div><div class="line"><a name="l02264"></a><span class="lineno"> 2264</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l02265"></a><span class="lineno"> 2265</span> </div><div class="line"><a name="l02266"></a><span class="lineno"> 2266</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l02267"></a><span class="lineno"> 2267</span> </div><div class="line"><a name="l02268"></a><span class="lineno"> 2268</span>  mpz_init(x);</div><div class="line"><a name="l02269"></a><span class="lineno"> 2269</span>  mpz_init(y);</div><div class="line"><a name="l02270"></a><span class="lineno"> 2270</span>  mpz_init(z);</div><div class="line"><a name="l02271"></a><span class="lineno"> 2271</span>  mpz_import(x, xn, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, xds);</div><div class="line"><a name="l02272"></a><span class="lineno"> 2272</span>  <span class="keywordflow">if</span> (xds == yds && xn == yn) {</div><div class="line"><a name="l02273"></a><span class="lineno"> 2273</span>  mpz_mul(z, x, x);</div><div class="line"><a name="l02274"></a><span class="lineno"> 2274</span>  }</div><div class="line"><a name="l02275"></a><span class="lineno"> 2275</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02276"></a><span class="lineno"> 2276</span>  mpz_import(y, yn, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, yds);</div><div class="line"><a name="l02277"></a><span class="lineno"> 2277</span>  mpz_mul(z, x, y);</div><div class="line"><a name="l02278"></a><span class="lineno"> 2278</span>  }</div><div class="line"><a name="l02279"></a><span class="lineno"> 2279</span>  mpz_export(zds, &<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, z);</div><div class="line"><a name="l02280"></a><span class="lineno"> 2280</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds+<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, zn-<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>);</div><div class="line"><a name="l02281"></a><span class="lineno"> 2281</span>  mpz_clear(x);</div><div class="line"><a name="l02282"></a><span class="lineno"> 2282</span>  mpz_clear(y);</div><div class="line"><a name="l02283"></a><span class="lineno"> 2283</span>  mpz_clear(z);</div><div class="line"><a name="l02284"></a><span class="lineno"> 2284</span> }</div><div class="line"><a name="l02285"></a><span class="lineno"> 2285</span> </div><div class="line"><a name="l02286"></a><span class="lineno"> 2286</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02287"></a><span class="lineno"> 2287</span> rb_big_mul_gmp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l02288"></a><span class="lineno"> 2288</span> {</div><div class="line"><a name="l02289"></a><span class="lineno"> 2289</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), zn = xn + yn;</div><div class="line"><a name="l02290"></a><span class="lineno"> 2290</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l02291"></a><span class="lineno"> 2291</span>  bary_mul_gmp(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), zn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), xn, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), yn);</div><div class="line"><a name="l02292"></a><span class="lineno"> 2292</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l02293"></a><span class="lineno"> 2293</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l02294"></a><span class="lineno"> 2294</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l02295"></a><span class="lineno"> 2295</span> }</div><div class="line"><a name="l02296"></a><span class="lineno"> 2296</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02297"></a><span class="lineno"> 2297</span> </div><div class="line"><a name="l02298"></a><span class="lineno"> 2298</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02299"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482"> 2299</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l02300"></a><span class="lineno"> 2300</span> {</div><div class="line"><a name="l02301"></a><span class="lineno"> 2301</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l02302"></a><span class="lineno"> 2302</span> </div><div class="line"><a name="l02303"></a><span class="lineno"> 2303</span>  <span class="keywordflow">if</span> (xn == 1 && yn == 1) {</div><div class="line"><a name="l02304"></a><span class="lineno"> 2304</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae8ba6f0e65c442333168ac2d8956cb4c">bary_mul_single</a>(zds, zn, xds[0], yds[0]);</div><div class="line"><a name="l02305"></a><span class="lineno"> 2305</span>  }</div><div class="line"><a name="l02306"></a><span class="lineno"> 2306</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02307"></a><span class="lineno"> 2307</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199">bary_mul_normal</a>(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l02308"></a><span class="lineno"> 2308</span>  <a class="code" href="../../db/d2e/intern_8h.html#a9c9bfa5b17b2be949b3ca843e6a0ee9e">rb_thread_check_ints</a>();</div><div class="line"><a name="l02309"></a><span class="lineno"> 2309</span>  }</div><div class="line"><a name="l02310"></a><span class="lineno"> 2310</span> }</div><div class="line"><a name="l02311"></a><span class="lineno"> 2311</span> </div><div class="line"><a name="l02312"></a><span class="lineno"> 2312</span> <span class="comment">/* determine whether a bignum is sparse or not by random sampling */</span></div><div class="line"><a name="l02313"></a><span class="lineno"> 2313</span> <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">int</span></div><div class="line"><a name="l02314"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae009a19bd520e46eedfa5f0cd544918f"> 2314</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae009a19bd520e46eedfa5f0cd544918f">bary_sparse_p</a>(<span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds, <span class="keywordtype">size_t</span> n)</div><div class="line"><a name="l02315"></a><span class="lineno"> 2315</span> {</div><div class="line"><a name="l02316"></a><span class="lineno"> 2316</span>  <span class="keywordtype">long</span> c = 0;</div><div class="line"><a name="l02317"></a><span class="lineno"> 2317</span> </div><div class="line"><a name="l02318"></a><span class="lineno"> 2318</span>  <span class="keywordflow">if</span> ( ds[<a class="code" href="../../db/d2e/intern_8h.html#a027794599c81c7682cf165ab815eec5c">rb_genrand_ulong_limited</a>(n / 2) + n / 4]) c++;</div><div class="line"><a name="l02319"></a><span class="lineno"> 2319</span>  <span class="keywordflow">if</span> (c <= 1 && ds[<a class="code" href="../../db/d2e/intern_8h.html#a027794599c81c7682cf165ab815eec5c">rb_genrand_ulong_limited</a>(n / 2) + n / 4]) c++;</div><div class="line"><a name="l02320"></a><span class="lineno"> 2320</span>  <span class="keywordflow">if</span> (c <= 1 && ds[<a class="code" href="../../db/d2e/intern_8h.html#a027794599c81c7682cf165ab815eec5c">rb_genrand_ulong_limited</a>(n / 2) + n / 4]) c++;</div><div class="line"><a name="l02321"></a><span class="lineno"> 2321</span> </div><div class="line"><a name="l02322"></a><span class="lineno"> 2322</span>  <span class="keywordflow">return</span> (c <= 1) ? 1 : 0;</div><div class="line"><a name="l02323"></a><span class="lineno"> 2323</span> }</div><div class="line"><a name="l02324"></a><span class="lineno"> 2324</span> </div><div class="line"><a name="l02325"></a><span class="lineno"> 2325</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l02326"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a43775d1107b5c81b027869eea4bd20cd"> 2326</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a43775d1107b5c81b027869eea4bd20cd">bary_mul_precheck</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **zdsp, <span class="keywordtype">size_t</span> *znp, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **xdsp, <span class="keywordtype">size_t</span> *xnp, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> **ydsp, <span class="keywordtype">size_t</span> *ynp)</div><div class="line"><a name="l02327"></a><span class="lineno"> 2327</span> {</div><div class="line"><a name="l02328"></a><span class="lineno"> 2328</span>  <span class="keywordtype">size_t</span> nlsz; <span class="comment">/* number of least significant zero BDIGITs */</span></div><div class="line"><a name="l02329"></a><span class="lineno"> 2329</span> </div><div class="line"><a name="l02330"></a><span class="lineno"> 2330</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds = *zdsp;</div><div class="line"><a name="l02331"></a><span class="lineno"> 2331</span>  <span class="keywordtype">size_t</span> zn = *znp;</div><div class="line"><a name="l02332"></a><span class="lineno"> 2332</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds = *xdsp;</div><div class="line"><a name="l02333"></a><span class="lineno"> 2333</span>  <span class="keywordtype">size_t</span> xn = *xnp;</div><div class="line"><a name="l02334"></a><span class="lineno"> 2334</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds = *ydsp;</div><div class="line"><a name="l02335"></a><span class="lineno"> 2335</span>  <span class="keywordtype">size_t</span> yn = *ynp;</div><div class="line"><a name="l02336"></a><span class="lineno"> 2336</span> </div><div class="line"><a name="l02337"></a><span class="lineno"> 2337</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn + yn <= zn);</div><div class="line"><a name="l02338"></a><span class="lineno"> 2338</span> </div><div class="line"><a name="l02339"></a><span class="lineno"> 2339</span>  nlsz = 0;</div><div class="line"><a name="l02340"></a><span class="lineno"> 2340</span> </div><div class="line"><a name="l02341"></a><span class="lineno"> 2341</span>  <span class="keywordflow">while</span> (0 < xn) {</div><div class="line"><a name="l02342"></a><span class="lineno"> 2342</span>  <span class="keywordflow">if</span> (xds[xn-1] == 0) {</div><div class="line"><a name="l02343"></a><span class="lineno"> 2343</span>  xn--;</div><div class="line"><a name="l02344"></a><span class="lineno"> 2344</span>  }</div><div class="line"><a name="l02345"></a><span class="lineno"> 2345</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02346"></a><span class="lineno"> 2346</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l02347"></a><span class="lineno"> 2347</span>  <span class="keywordflow">if</span> (xds[0] != 0)</div><div class="line"><a name="l02348"></a><span class="lineno"> 2348</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02349"></a><span class="lineno"> 2349</span>  xds++;</div><div class="line"><a name="l02350"></a><span class="lineno"> 2350</span>  xn--;</div><div class="line"><a name="l02351"></a><span class="lineno"> 2351</span>  nlsz++;</div><div class="line"><a name="l02352"></a><span class="lineno"> 2352</span>  } <span class="keywordflow">while</span> (0 < xn);</div><div class="line"><a name="l02353"></a><span class="lineno"> 2353</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02354"></a><span class="lineno"> 2354</span>  }</div><div class="line"><a name="l02355"></a><span class="lineno"> 2355</span>  }</div><div class="line"><a name="l02356"></a><span class="lineno"> 2356</span> </div><div class="line"><a name="l02357"></a><span class="lineno"> 2357</span>  <span class="keywordflow">while</span> (0 < yn) {</div><div class="line"><a name="l02358"></a><span class="lineno"> 2358</span>  <span class="keywordflow">if</span> (yds[yn-1] == 0) {</div><div class="line"><a name="l02359"></a><span class="lineno"> 2359</span>  yn--;</div><div class="line"><a name="l02360"></a><span class="lineno"> 2360</span>  }</div><div class="line"><a name="l02361"></a><span class="lineno"> 2361</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02362"></a><span class="lineno"> 2362</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l02363"></a><span class="lineno"> 2363</span>  <span class="keywordflow">if</span> (xds[0] != 0)</div><div class="line"><a name="l02364"></a><span class="lineno"> 2364</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02365"></a><span class="lineno"> 2365</span>  yds++;</div><div class="line"><a name="l02366"></a><span class="lineno"> 2366</span>  yn--;</div><div class="line"><a name="l02367"></a><span class="lineno"> 2367</span>  nlsz++;</div><div class="line"><a name="l02368"></a><span class="lineno"> 2368</span>  } <span class="keywordflow">while</span> (0 < yn);</div><div class="line"><a name="l02369"></a><span class="lineno"> 2369</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02370"></a><span class="lineno"> 2370</span>  }</div><div class="line"><a name="l02371"></a><span class="lineno"> 2371</span>  }</div><div class="line"><a name="l02372"></a><span class="lineno"> 2372</span> </div><div class="line"><a name="l02373"></a><span class="lineno"> 2373</span>  <span class="keywordflow">if</span> (nlsz) {</div><div class="line"><a name="l02374"></a><span class="lineno"> 2374</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds, nlsz);</div><div class="line"><a name="l02375"></a><span class="lineno"> 2375</span>  zds += nlsz;</div><div class="line"><a name="l02376"></a><span class="lineno"> 2376</span>  zn -= nlsz;</div><div class="line"><a name="l02377"></a><span class="lineno"> 2377</span>  }</div><div class="line"><a name="l02378"></a><span class="lineno"> 2378</span> </div><div class="line"><a name="l02379"></a><span class="lineno"> 2379</span>  <span class="comment">/* make sure that y is longer than x */</span></div><div class="line"><a name="l02380"></a><span class="lineno"> 2380</span>  <span class="keywordflow">if</span> (xn > yn) {</div><div class="line"><a name="l02381"></a><span class="lineno"> 2381</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *tds;</div><div class="line"><a name="l02382"></a><span class="lineno"> 2382</span>  <span class="keywordtype">size_t</span> tn;</div><div class="line"><a name="l02383"></a><span class="lineno"> 2383</span>  tds = xds; xds = yds; yds = tds;</div><div class="line"><a name="l02384"></a><span class="lineno"> 2384</span>  tn = xn; xn = yn; yn = tn;</div><div class="line"><a name="l02385"></a><span class="lineno"> 2385</span>  }</div><div class="line"><a name="l02386"></a><span class="lineno"> 2386</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= yn);</div><div class="line"><a name="l02387"></a><span class="lineno"> 2387</span> </div><div class="line"><a name="l02388"></a><span class="lineno"> 2388</span>  <span class="keywordflow">if</span> (xn <= 1) {</div><div class="line"><a name="l02389"></a><span class="lineno"> 2389</span>  <span class="keywordflow">if</span> (xn == 0) {</div><div class="line"><a name="l02390"></a><span class="lineno"> 2390</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds, zn);</div><div class="line"><a name="l02391"></a><span class="lineno"> 2391</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02392"></a><span class="lineno"> 2392</span>  }</div><div class="line"><a name="l02393"></a><span class="lineno"> 2393</span> </div><div class="line"><a name="l02394"></a><span class="lineno"> 2394</span>  <span class="keywordflow">if</span> (xds[0] == 1) {</div><div class="line"><a name="l02395"></a><span class="lineno"> 2395</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(zds, yds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, yn);</div><div class="line"><a name="l02396"></a><span class="lineno"> 2396</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds+yn, zn-yn);</div><div class="line"><a name="l02397"></a><span class="lineno"> 2397</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02398"></a><span class="lineno"> 2398</span>  }</div><div class="line"><a name="l02399"></a><span class="lineno"> 2399</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(xds[0])) {</div><div class="line"><a name="l02400"></a><span class="lineno"> 2400</span>  zds[yn] = <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(zds, yds, yn, <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(xds[0])-1);</div><div class="line"><a name="l02401"></a><span class="lineno"> 2401</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds+yn+1, zn-yn-1);</div><div class="line"><a name="l02402"></a><span class="lineno"> 2402</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02403"></a><span class="lineno"> 2403</span>  }</div><div class="line"><a name="l02404"></a><span class="lineno"> 2404</span>  <span class="keywordflow">if</span> (yn == 1 && yds[0] == 1) {</div><div class="line"><a name="l02405"></a><span class="lineno"> 2405</span>  zds[0] = xds[0];</div><div class="line"><a name="l02406"></a><span class="lineno"> 2406</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(zds+1, zn-1);</div><div class="line"><a name="l02407"></a><span class="lineno"> 2407</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02408"></a><span class="lineno"> 2408</span>  }</div><div class="line"><a name="l02409"></a><span class="lineno"> 2409</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199">bary_mul_normal</a>(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l02410"></a><span class="lineno"> 2410</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02411"></a><span class="lineno"> 2411</span>  }</div><div class="line"><a name="l02412"></a><span class="lineno"> 2412</span> </div><div class="line"><a name="l02413"></a><span class="lineno"> 2413</span>  *zdsp = zds;</div><div class="line"><a name="l02414"></a><span class="lineno"> 2414</span>  *znp = zn;</div><div class="line"><a name="l02415"></a><span class="lineno"> 2415</span>  *xdsp = xds;</div><div class="line"><a name="l02416"></a><span class="lineno"> 2416</span>  *xnp = xn;</div><div class="line"><a name="l02417"></a><span class="lineno"> 2417</span>  *ydsp = yds;</div><div class="line"><a name="l02418"></a><span class="lineno"> 2418</span>  *ynp = yn;</div><div class="line"><a name="l02419"></a><span class="lineno"> 2419</span> </div><div class="line"><a name="l02420"></a><span class="lineno"> 2420</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02421"></a><span class="lineno"> 2421</span> }</div><div class="line"><a name="l02422"></a><span class="lineno"> 2422</span> </div><div class="line"><a name="l02423"></a><span class="lineno"> 2423</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02424"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a42d6c491ad6b5a939c9529ef41d2db32"> 2424</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a42d6c491ad6b5a939c9529ef41d2db32">bary_mul_karatsuba_branch</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l02425"></a><span class="lineno"> 2425</span> {</div><div class="line"><a name="l02426"></a><span class="lineno"> 2426</span>  <span class="comment">/* normal multiplication when x is small */</span></div><div class="line"><a name="l02427"></a><span class="lineno"> 2427</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2">KARATSUBA_MUL_DIGITS</a>) {</div><div class="line"><a name="l02428"></a><span class="lineno"> 2428</span>  normal:</div><div class="line"><a name="l02429"></a><span class="lineno"> 2429</span>  <span class="keywordflow">if</span> (xds == yds && xn == yn)</div><div class="line"><a name="l02430"></a><span class="lineno"> 2430</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(zds, zn, xds, xn);</div><div class="line"><a name="l02431"></a><span class="lineno"> 2431</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02432"></a><span class="lineno"> 2432</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a>(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l02433"></a><span class="lineno"> 2433</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02434"></a><span class="lineno"> 2434</span>  }</div><div class="line"><a name="l02435"></a><span class="lineno"> 2435</span> </div><div class="line"><a name="l02436"></a><span class="lineno"> 2436</span>  <span class="comment">/* normal multiplication when x or y is a sparse bignum */</span></div><div class="line"><a name="l02437"></a><span class="lineno"> 2437</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ae009a19bd520e46eedfa5f0cd544918f">bary_sparse_p</a>(xds, xn)) <span class="keywordflow">goto</span> normal;</div><div class="line"><a name="l02438"></a><span class="lineno"> 2438</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ae009a19bd520e46eedfa5f0cd544918f">bary_sparse_p</a>(yds, yn)) {</div><div class="line"><a name="l02439"></a><span class="lineno"> 2439</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a>(zds, zn, yds, yn, xds, xn);</div><div class="line"><a name="l02440"></a><span class="lineno"> 2440</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02441"></a><span class="lineno"> 2441</span>  }</div><div class="line"><a name="l02442"></a><span class="lineno"> 2442</span> </div><div class="line"><a name="l02443"></a><span class="lineno"> 2443</span>  <span class="comment">/* balance multiplication by slicing y when x is much smaller than y */</span></div><div class="line"><a name="l02444"></a><span class="lineno"> 2444</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a5abddc95277ae9fc652190608e53e28c">KARATSUBA_BALANCED</a>(xn, yn)) {</div><div class="line"><a name="l02445"></a><span class="lineno"> 2445</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06">bary_mul_balance_with_mulfunc</a>(zds, zn, xds, xn, yds, yn, wds, wn, <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>);</div><div class="line"><a name="l02446"></a><span class="lineno"> 2446</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02447"></a><span class="lineno"> 2447</span>  }</div><div class="line"><a name="l02448"></a><span class="lineno"> 2448</span> </div><div class="line"><a name="l02449"></a><span class="lineno"> 2449</span>  <span class="comment">/* multiplication by karatsuba method */</span></div><div class="line"><a name="l02450"></a><span class="lineno"> 2450</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac115cfc17fb230dc2e834e9afa201cc3">bary_mul_karatsuba</a>(zds, zn, xds, xn, yds, yn, wds, wn);</div><div class="line"><a name="l02451"></a><span class="lineno"> 2451</span> }</div><div class="line"><a name="l02452"></a><span class="lineno"> 2452</span> </div><div class="line"><a name="l02453"></a><span class="lineno"> 2453</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02454"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa5366399773cf27dbf3865eeeb544fab"> 2454</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l02455"></a><span class="lineno"> 2455</span> {</div><div class="line"><a name="l02456"></a><span class="lineno"> 2456</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a43775d1107b5c81b027869eea4bd20cd">bary_mul_precheck</a>(&zds, &zn, &xds, &xn, &yds, &yn))</div><div class="line"><a name="l02457"></a><span class="lineno"> 2457</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02458"></a><span class="lineno"> 2458</span> </div><div class="line"><a name="l02459"></a><span class="lineno"> 2459</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a42d6c491ad6b5a939c9529ef41d2db32">bary_mul_karatsuba_branch</a>(zds, zn, xds, xn, yds, yn, wds, wn);</div><div class="line"><a name="l02460"></a><span class="lineno"> 2460</span> }</div><div class="line"><a name="l02461"></a><span class="lineno"> 2461</span> </div><div class="line"><a name="l02462"></a><span class="lineno"> 2462</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02463"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a1c6049ab714a0cbeb6fb43a36a882556"> 2463</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1c6049ab714a0cbeb6fb43a36a882556">bary_mul_toom3_branch</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l02464"></a><span class="lineno"> 2464</span> {</div><div class="line"><a name="l02465"></a><span class="lineno"> 2465</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../d1/dcc/bignum_8c.html#aba4a162b1237a6a25e6e8b31af64b53c">TOOM3_MUL_DIGITS</a>) {</div><div class="line"><a name="l02466"></a><span class="lineno"> 2466</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a42d6c491ad6b5a939c9529ef41d2db32">bary_mul_karatsuba_branch</a>(zds, zn, xds, xn, yds, yn, wds, wn);</div><div class="line"><a name="l02467"></a><span class="lineno"> 2467</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02468"></a><span class="lineno"> 2468</span>  }</div><div class="line"><a name="l02469"></a><span class="lineno"> 2469</span> </div><div class="line"><a name="l02470"></a><span class="lineno"> 2470</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#ad16689892f192aecebbce697c4409d45">TOOM3_BALANCED</a>(xn, yn)) {</div><div class="line"><a name="l02471"></a><span class="lineno"> 2471</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06">bary_mul_balance_with_mulfunc</a>(zds, zn, xds, xn, yds, yn, wds, wn, <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>);</div><div class="line"><a name="l02472"></a><span class="lineno"> 2472</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02473"></a><span class="lineno"> 2473</span>  }</div><div class="line"><a name="l02474"></a><span class="lineno"> 2474</span> </div><div class="line"><a name="l02475"></a><span class="lineno"> 2475</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee">bary_mul_toom3</a>(zds, zn, xds, xn, yds, yn, wds, wn);</div><div class="line"><a name="l02476"></a><span class="lineno"> 2476</span> }</div><div class="line"><a name="l02477"></a><span class="lineno"> 2477</span> </div><div class="line"><a name="l02478"></a><span class="lineno"> 2478</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02479"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a61ca5f9b62fcda6ea581e2bc2b051c42"> 2479</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds, <span class="keywordtype">size_t</span> wn)</div><div class="line"><a name="l02480"></a><span class="lineno"> 2480</span> {</div><div class="line"><a name="l02481"></a><span class="lineno"> 2481</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a43775d1107b5c81b027869eea4bd20cd">bary_mul_precheck</a>(&zds, &zn, &xds, &xn, &yds, &yn))</div><div class="line"><a name="l02482"></a><span class="lineno"> 2482</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02483"></a><span class="lineno"> 2483</span> </div><div class="line"><a name="l02484"></a><span class="lineno"> 2484</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a1c6049ab714a0cbeb6fb43a36a882556">bary_mul_toom3_branch</a>(zds, zn, xds, xn, yds, yn, wds, wn);</div><div class="line"><a name="l02485"></a><span class="lineno"> 2485</span> }</div><div class="line"><a name="l02486"></a><span class="lineno"> 2486</span> </div><div class="line"><a name="l02487"></a><span class="lineno"> 2487</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02488"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952"> 2488</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *zds, <span class="keywordtype">size_t</span> zn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *yds, <span class="keywordtype">size_t</span> yn)</div><div class="line"><a name="l02489"></a><span class="lineno"> 2489</span> {</div><div class="line"><a name="l02490"></a><span class="lineno"> 2490</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l02491"></a><span class="lineno"> 2491</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> naive_threshold = <a class="code" href="../../d1/dcc/bignum_8c.html#a17b66a15a998788405dc38045e09216c">GMP_MUL_DIGITS</a>;</div><div class="line"><a name="l02492"></a><span class="lineno"> 2492</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l02493"></a><span class="lineno"> 2493</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> naive_threshold = <a class="code" href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2">KARATSUBA_MUL_DIGITS</a>;</div><div class="line"><a name="l02494"></a><span class="lineno"> 2494</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02495"></a><span class="lineno"> 2495</span>  <span class="keywordflow">if</span> (xn <= yn) {</div><div class="line"><a name="l02496"></a><span class="lineno"> 2496</span>  <span class="keywordflow">if</span> (xn < naive_threshold) {</div><div class="line"><a name="l02497"></a><span class="lineno"> 2497</span>  <span class="keywordflow">if</span> (xds == yds && xn == yn)</div><div class="line"><a name="l02498"></a><span class="lineno"> 2498</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(zds, zn, xds, xn);</div><div class="line"><a name="l02499"></a><span class="lineno"> 2499</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02500"></a><span class="lineno"> 2500</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a>(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l02501"></a><span class="lineno"> 2501</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02502"></a><span class="lineno"> 2502</span>  }</div><div class="line"><a name="l02503"></a><span class="lineno"> 2503</span>  }</div><div class="line"><a name="l02504"></a><span class="lineno"> 2504</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02505"></a><span class="lineno"> 2505</span>  <span class="keywordflow">if</span> (yn < naive_threshold) {</div><div class="line"><a name="l02506"></a><span class="lineno"> 2506</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a>(zds, zn, yds, yn, xds, xn);</div><div class="line"><a name="l02507"></a><span class="lineno"> 2507</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02508"></a><span class="lineno"> 2508</span>  }</div><div class="line"><a name="l02509"></a><span class="lineno"> 2509</span>  }</div><div class="line"><a name="l02510"></a><span class="lineno"> 2510</span> </div><div class="line"><a name="l02511"></a><span class="lineno"> 2511</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l02512"></a><span class="lineno"> 2512</span>  bary_mul_gmp(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l02513"></a><span class="lineno"> 2513</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l02514"></a><span class="lineno"> 2514</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a>(zds, zn, xds, xn, yds, yn, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l02515"></a><span class="lineno"> 2515</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02516"></a><span class="lineno"> 2516</span> }</div><div class="line"><a name="l02517"></a><span class="lineno"> 2517</span> </div><div class="line"><a name="l02518"></a><span class="lineno"><a class="line" href="../../de/df0/structbig__div__struct.html"> 2518</a></span> <span class="keyword">struct </span><a class="code" href="../../de/df0/structbig__div__struct.html">big_div_struct</a> {</div><div class="line"><a name="l02519"></a><span class="lineno"><a class="line" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce"> 2519</a></span>  <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l02520"></a><span class="lineno"><a class="line" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134"> 2520</a></span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>;</div><div class="line"><a name="l02521"></a><span class="lineno"><a class="line" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261"> 2521</a></span>  <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a>;</div><div class="line"><a name="l02522"></a><span class="lineno"> 2522</span> };</div><div class="line"><a name="l02523"></a><span class="lineno"> 2523</span> </div><div class="line"><a name="l02524"></a><span class="lineno"> 2524</span> <span class="keyword">static</span> <span class="keywordtype">void</span> *</div><div class="line"><a name="l02525"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a77d827a78a743884bbbac83efd178e4c"> 2525</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a77d827a78a743884bbbac83efd178e4c">bigdivrem1</a>(<span class="keywordtype">void</span> *ptr)</div><div class="line"><a name="l02526"></a><span class="lineno"> 2526</span> {</div><div class="line"><a name="l02527"></a><span class="lineno"> 2527</span>  <span class="keyword">struct </span><a class="code" href="../../de/df0/structbig__div__struct.html">big_div_struct</a> *bds = (<span class="keyword">struct </span><a class="code" href="../../de/df0/structbig__div__struct.html">big_div_struct</a>*)ptr;</div><div class="line"><a name="l02528"></a><span class="lineno"> 2528</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> = bds-><a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>;</div><div class="line"><a name="l02529"></a><span class="lineno"> 2529</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = bds-><a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l02530"></a><span class="lineno"> 2530</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a> = bds-><a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = bds-><a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>;</div><div class="line"><a name="l02531"></a><span class="lineno"> 2531</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> num;</div><div class="line"><a name="l02532"></a><span class="lineno"> 2532</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> q;</div><div class="line"><a name="l02533"></a><span class="lineno"> 2533</span> </div><div class="line"><a name="l02534"></a><span class="lineno"> 2534</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l02535"></a><span class="lineno"> 2535</span>  <span class="keywordflow">if</span> (bds-><a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a>) {</div><div class="line"><a name="l02536"></a><span class="lineno"> 2536</span>  bds-><a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l02537"></a><span class="lineno"> 2537</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02538"></a><span class="lineno"> 2538</span>  }</div><div class="line"><a name="l02539"></a><span class="lineno"> 2539</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-1] == <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>-1]) q = <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l02540"></a><span class="lineno"> 2540</span>  <span class="keywordflow">else</span> q = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)((<a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-1]) + <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-2])/<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>-1]);</div><div class="line"><a name="l02541"></a><span class="lineno"> 2541</span>  <span class="keywordflow">if</span> (q) {</div><div class="line"><a name="l02542"></a><span class="lineno"> 2542</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#ac521d08f5ca64f5574183c91e8932b8c">bigdivrem_mulsub</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>+1), <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>+1,</div><div class="line"><a name="l02543"></a><span class="lineno"> 2543</span>  q,</div><div class="line"><a name="l02544"></a><span class="lineno"> 2544</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02545"></a><span class="lineno"> 2545</span>  <span class="keywordflow">while</span> (num) { <span class="comment">/* "add back" required */</span></div><div class="line"><a name="l02546"></a><span class="lineno"> 2546</span>  q--;</div><div class="line"><a name="l02547"></a><span class="lineno"> 2547</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>+1), <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>,</div><div class="line"><a name="l02548"></a><span class="lineno"> 2548</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>+1), <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>,</div><div class="line"><a name="l02549"></a><span class="lineno"> 2549</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02550"></a><span class="lineno"> 2550</span>  num--;</div><div class="line"><a name="l02551"></a><span class="lineno"> 2551</span>  }</div><div class="line"><a name="l02552"></a><span class="lineno"> 2552</span>  }</div><div class="line"><a name="l02553"></a><span class="lineno"> 2553</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>--;</div><div class="line"><a name="l02554"></a><span class="lineno"> 2554</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>] = q;</div><div class="line"><a name="l02555"></a><span class="lineno"> 2555</span>  } <span class="keywordflow">while</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> > <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02556"></a><span class="lineno"> 2556</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02557"></a><span class="lineno"> 2557</span> }</div><div class="line"><a name="l02558"></a><span class="lineno"> 2558</span> </div><div class="line"><a name="l02559"></a><span class="lineno"> 2559</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02560"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aec387ede0f4c4b8400c9c9ef1a70ebcf"> 2560</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aec387ede0f4c4b8400c9c9ef1a70ebcf">rb_big_stop</a>(<span class="keywordtype">void</span> *ptr)</div><div class="line"><a name="l02561"></a><span class="lineno"> 2561</span> {</div><div class="line"><a name="l02562"></a><span class="lineno"> 2562</span>  <span class="keyword">struct </span><a class="code" href="../../de/df0/structbig__div__struct.html">big_div_struct</a> *bds = ptr;</div><div class="line"><a name="l02563"></a><span class="lineno"> 2563</span>  bds-><a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l02564"></a><span class="lineno"> 2564</span> }</div><div class="line"><a name="l02565"></a><span class="lineno"> 2565</span> </div><div class="line"><a name="l02566"></a><span class="lineno"> 2566</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a></div><div class="line"><a name="l02567"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a8edf3360688fdbf0544b3bfe86090484"> 2567</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8edf3360688fdbf0544b3bfe86090484">bigdivrem_single1</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> x_higher_bdigit, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> y)</div><div class="line"><a name="l02568"></a><span class="lineno"> 2568</span> {</div><div class="line"><a name="l02569"></a><span class="lineno"> 2569</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(0 < xn);</div><div class="line"><a name="l02570"></a><span class="lineno"> 2570</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(x_higher_bdigit < y);</div><div class="line"><a name="l02571"></a><span class="lineno"> 2571</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(y)) {</div><div class="line"><a name="l02572"></a><span class="lineno"> 2572</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> r;</div><div class="line"><a name="l02573"></a><span class="lineno"> 2573</span>  r = xds[0] & (y-1);</div><div class="line"><a name="l02574"></a><span class="lineno"> 2574</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(qds, xds, xn, <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(y)-1, x_higher_bdigit);</div><div class="line"><a name="l02575"></a><span class="lineno"> 2575</span>  <span class="keywordflow">return</span> r;</div><div class="line"><a name="l02576"></a><span class="lineno"> 2576</span>  }</div><div class="line"><a name="l02577"></a><span class="lineno"> 2577</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02578"></a><span class="lineno"> 2578</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l02579"></a><span class="lineno"> 2579</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> t2;</div><div class="line"><a name="l02580"></a><span class="lineno"> 2580</span>  t2 = x_higher_bdigit;</div><div class="line"><a name="l02581"></a><span class="lineno"> 2581</span>  i = xn;</div><div class="line"><a name="l02582"></a><span class="lineno"> 2582</span>  <span class="keywordflow">while</span> (i--) {</div><div class="line"><a name="l02583"></a><span class="lineno"> 2583</span>  t2 = <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(t2) + xds[i];</div><div class="line"><a name="l02584"></a><span class="lineno"> 2584</span>  qds[i] = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)(t2 / y);</div><div class="line"><a name="l02585"></a><span class="lineno"> 2585</span>  t2 %= y;</div><div class="line"><a name="l02586"></a><span class="lineno"> 2586</span>  }</div><div class="line"><a name="l02587"></a><span class="lineno"> 2587</span>  <span class="keywordflow">return</span> (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)t2;</div><div class="line"><a name="l02588"></a><span class="lineno"> 2588</span>  }</div><div class="line"><a name="l02589"></a><span class="lineno"> 2589</span> }</div><div class="line"><a name="l02590"></a><span class="lineno"> 2590</span> </div><div class="line"><a name="l02591"></a><span class="lineno"> 2591</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a></div><div class="line"><a name="l02592"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77"> 2592</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> y)</div><div class="line"><a name="l02593"></a><span class="lineno"> 2593</span> {</div><div class="line"><a name="l02594"></a><span class="lineno"> 2594</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8edf3360688fdbf0544b3bfe86090484">bigdivrem_single1</a>(qds, xds, xn, 0, y);</div><div class="line"><a name="l02595"></a><span class="lineno"> 2595</span> }</div><div class="line"><a name="l02596"></a><span class="lineno"> 2596</span> </div><div class="line"><a name="l02597"></a><span class="lineno"> 2597</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02598"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa66bf4e492bf67f68d75efbfa1ed0d92"> 2598</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa66bf4e492bf67f68d75efbfa1ed0d92">bigdivrem_restoring</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>)</div><div class="line"><a name="l02599"></a><span class="lineno"> 2599</span> {</div><div class="line"><a name="l02600"></a><span class="lineno"> 2600</span>  <span class="keyword">struct </span><a class="code" href="../../de/df0/structbig__div__struct.html">big_div_struct</a> bds;</div><div class="line"><a name="l02601"></a><span class="lineno"> 2601</span>  <span class="keywordtype">size_t</span> ynzero;</div><div class="line"><a name="l02602"></a><span class="lineno"> 2602</span> </div><div class="line"><a name="l02603"></a><span class="lineno"> 2603</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> < <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>);</div><div class="line"><a name="l02604"></a><span class="lineno"> 2604</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db">BDIGIT_MSB</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>-1]));</div><div class="line"><a name="l02605"></a><span class="lineno"> 2605</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-1] < <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>-1]);</div><div class="line"><a name="l02606"></a><span class="lineno"> 2606</span> </div><div class="line"><a name="l02607"></a><span class="lineno"> 2607</span>  <span class="keywordflow">for</span> (ynzero = 0; !<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[ynzero]; ynzero++);</div><div class="line"><a name="l02608"></a><span class="lineno"> 2608</span> </div><div class="line"><a name="l02609"></a><span class="lineno"> 2609</span>  <span class="keywordflow">if</span> (ynzero+1 == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>) {</div><div class="line"><a name="l02610"></a><span class="lineno"> 2610</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> r;</div><div class="line"><a name="l02611"></a><span class="lineno"> 2611</span>  r = <a class="code" href="../../d1/dcc/bignum_8c.html#a8edf3360688fdbf0544b3bfe86090484">bigdivrem_single1</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+ynzero, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-1], <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[ynzero]);</div><div class="line"><a name="l02612"></a><span class="lineno"> 2612</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[ynzero] = r;</div><div class="line"><a name="l02613"></a><span class="lineno"> 2613</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02614"></a><span class="lineno"> 2614</span>  }</div><div class="line"><a name="l02615"></a><span class="lineno"> 2615</span> </div><div class="line"><a name="l02616"></a><span class="lineno"> 2616</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> = <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - ynzero;</div><div class="line"><a name="l02617"></a><span class="lineno"> 2617</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> + ynzero;</div><div class="line"><a name="l02618"></a><span class="lineno"> 2618</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a> = <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a> + ynzero;</div><div class="line"><a name="l02619"></a><span class="lineno"> 2619</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l02620"></a><span class="lineno"> 2620</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> - ynzero;</div><div class="line"><a name="l02621"></a><span class="lineno"> 2621</span>  <span class="keywordflow">if</span> (bds.<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> > 10000 || bds.<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> > 10000) {</div><div class="line"><a name="l02622"></a><span class="lineno"> 2622</span>  retry:</div><div class="line"><a name="l02623"></a><span class="lineno"> 2623</span>  bds.<a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l02624"></a><span class="lineno"> 2624</span>  <a class="code" href="../../db/dd5/thread_8h.html#ad21de1b2d50de18b428dba6bd45b1c50">rb_thread_call_without_gvl</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a77d827a78a743884bbbac83efd178e4c">bigdivrem1</a>, &bds, <a class="code" href="../../d1/dcc/bignum_8c.html#aec387ede0f4c4b8400c9c9ef1a70ebcf">rb_big_stop</a>, &bds);</div><div class="line"><a name="l02625"></a><span class="lineno"> 2625</span> </div><div class="line"><a name="l02626"></a><span class="lineno"> 2626</span>  <span class="keywordflow">if</span> (bds.<a class="code" href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">stop</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>) {</div><div class="line"><a name="l02627"></a><span class="lineno"> 2627</span>  <span class="comment">/* execute trap handler, but exception was not raised. */</span></div><div class="line"><a name="l02628"></a><span class="lineno"> 2628</span>  <span class="keywordflow">goto</span> retry;</div><div class="line"><a name="l02629"></a><span class="lineno"> 2629</span>  }</div><div class="line"><a name="l02630"></a><span class="lineno"> 2630</span>  }</div><div class="line"><a name="l02631"></a><span class="lineno"> 2631</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02632"></a><span class="lineno"> 2632</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a77d827a78a743884bbbac83efd178e4c">bigdivrem1</a>(&bds);</div><div class="line"><a name="l02633"></a><span class="lineno"> 2633</span>  }</div><div class="line"><a name="l02634"></a><span class="lineno"> 2634</span> }</div><div class="line"><a name="l02635"></a><span class="lineno"> 2635</span> </div><div class="line"><a name="l02636"></a><span class="lineno"> 2636</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02637"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a16fa218f374c607d043c554d02f95190"> 2637</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a16fa218f374c607d043c554d02f95190">bary_divmod_normal</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keywordtype">size_t</span> qn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *rds, <span class="keywordtype">size_t</span> rn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>)</div><div class="line"><a name="l02638"></a><span class="lineno"> 2638</span> {</div><div class="line"><a name="l02639"></a><span class="lineno"> 2639</span>  <span class="keywordtype">int</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l02640"></a><span class="lineno"> 2640</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, *yyds;</div><div class="line"><a name="l02641"></a><span class="lineno"> 2641</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l02642"></a><span class="lineno"> 2642</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpyz = 0;</div><div class="line"><a name="l02643"></a><span class="lineno"> 2643</span> </div><div class="line"><a name="l02644"></a><span class="lineno"> 2644</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> < xn || (xn == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> && <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - 1] <= xds[xn - 1]));</div><div class="line"><a name="l02645"></a><span class="lineno"> 2645</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(qds ? (xn - <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> + 1) <= qn : 1);</div><div class="line"><a name="l02646"></a><span class="lineno"> 2646</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(rds ? <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> <= rn : 1);</div><div class="line"><a name="l02647"></a><span class="lineno"> 2647</span> </div><div class="line"><a name="l02648"></a><span class="lineno"> 2648</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = xn + <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a>;</div><div class="line"><a name="l02649"></a><span class="lineno"> 2649</span> </div><div class="line"><a name="l02650"></a><span class="lineno"> 2650</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>-1]);</div><div class="line"><a name="l02651"></a><span class="lineno"> 2651</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>) {</div><div class="line"><a name="l02652"></a><span class="lineno"> 2652</span>  <span class="keywordtype">int</span> alloc_y = !rds;</div><div class="line"><a name="l02653"></a><span class="lineno"> 2653</span>  <span class="keywordtype">int</span> alloc_z = !qds || qn < <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l02654"></a><span class="lineno"> 2654</span>  <span class="keywordflow">if</span> (alloc_y && alloc_z) {</div><div class="line"><a name="l02655"></a><span class="lineno"> 2655</span>  yyds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpyz, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>);</div><div class="line"><a name="l02656"></a><span class="lineno"> 2656</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = yyds + <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>;</div><div class="line"><a name="l02657"></a><span class="lineno"> 2657</span>  }</div><div class="line"><a name="l02658"></a><span class="lineno"> 2658</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02659"></a><span class="lineno"> 2659</span>  yyds = alloc_y ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpyz, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>) : rds;</div><div class="line"><a name="l02660"></a><span class="lineno"> 2660</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = alloc_z ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpyz, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>) : qds;</div><div class="line"><a name="l02661"></a><span class="lineno"> 2661</span>  }</div><div class="line"><a name="l02662"></a><span class="lineno"> 2662</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[xn] = <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, xds, xn, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>);</div><div class="line"><a name="l02663"></a><span class="lineno"> 2663</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(yyds, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>);</div><div class="line"><a name="l02664"></a><span class="lineno"> 2664</span>  }</div><div class="line"><a name="l02665"></a><span class="lineno"> 2665</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02666"></a><span class="lineno"> 2666</span>  <span class="keywordflow">if</span> (qds && <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> <= qn)</div><div class="line"><a name="l02667"></a><span class="lineno"> 2667</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = qds;</div><div class="line"><a name="l02668"></a><span class="lineno"> 2668</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02669"></a><span class="lineno"> 2669</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpyz, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>);</div><div class="line"><a name="l02670"></a><span class="lineno"> 2670</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, xds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, xn);</div><div class="line"><a name="l02671"></a><span class="lineno"> 2671</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[xn] = 0;</div><div class="line"><a name="l02672"></a><span class="lineno"> 2672</span>  <span class="comment">/* bigdivrem_restoring will not modify y.</span></div><div class="line"><a name="l02673"></a><span class="lineno"> 2673</span> <span class="comment"> * So use yds directly. */</span></div><div class="line"><a name="l02674"></a><span class="lineno"> 2674</span>  yyds = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *)<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>;</div><div class="line"><a name="l02675"></a><span class="lineno"> 2675</span>  }</div><div class="line"><a name="l02676"></a><span class="lineno"> 2676</span> </div><div class="line"><a name="l02677"></a><span class="lineno"> 2677</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa66bf4e492bf67f68d75efbfa1ed0d92">bigdivrem_restoring</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, yyds, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02678"></a><span class="lineno"> 2678</span> </div><div class="line"><a name="l02679"></a><span class="lineno"> 2679</span>  <span class="keywordflow">if</span> (rds) {</div><div class="line"><a name="l02680"></a><span class="lineno"> 2680</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>)</div><div class="line"><a name="l02681"></a><span class="lineno"> 2681</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(rds, <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>, 0);</div><div class="line"><a name="l02682"></a><span class="lineno"> 2682</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02683"></a><span class="lineno"> 2683</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(rds, <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02684"></a><span class="lineno"> 2684</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds+<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, rn-<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02685"></a><span class="lineno"> 2685</span>  }</div><div class="line"><a name="l02686"></a><span class="lineno"> 2686</span> </div><div class="line"><a name="l02687"></a><span class="lineno"> 2687</span>  <span class="keywordflow">if</span> (qds) {</div><div class="line"><a name="l02688"></a><span class="lineno"> 2688</span>  <span class="keywordtype">size_t</span> j = <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> - <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>;</div><div class="line"><a name="l02689"></a><span class="lineno"> 2689</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aad09de334c9b8c7f717d314b14679e62">MEMMOVE</a>(qds, <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, j);</div><div class="line"><a name="l02690"></a><span class="lineno"> 2690</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds+j, qn-j);</div><div class="line"><a name="l02691"></a><span class="lineno"> 2691</span>  }</div><div class="line"><a name="l02692"></a><span class="lineno"> 2692</span> </div><div class="line"><a name="l02693"></a><span class="lineno"> 2693</span>  <span class="keywordflow">if</span> (tmpyz)</div><div class="line"><a name="l02694"></a><span class="lineno"> 2694</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(tmpyz);</div><div class="line"><a name="l02695"></a><span class="lineno"> 2695</span> }</div><div class="line"><a name="l02696"></a><span class="lineno"> 2696</span> </div><div class="line"><a name="l02697"></a><span class="lineno"> 2697</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02698"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#ac7a90b8e37b5cf33b8a1ea41557d39b7"> 2698</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac7a90b8e37b5cf33b8a1ea41557d39b7">rb_big_divrem_normal</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l02699"></a><span class="lineno"> 2699</span> {</div><div class="line"><a name="l02700"></a><span class="lineno"> 2700</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), qn, rn;</div><div class="line"><a name="l02701"></a><span class="lineno"> 2701</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), *qds, *rds;</div><div class="line"><a name="l02702"></a><span class="lineno"> 2702</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> q, r;</div><div class="line"><a name="l02703"></a><span class="lineno"> 2703</span> </div><div class="line"><a name="l02704"></a><span class="lineno"> 2704</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02705"></a><span class="lineno"> 2705</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> == 0)</div><div class="line"><a name="l02706"></a><span class="lineno"> 2706</span>  <a class="code" href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a>();</div><div class="line"><a name="l02707"></a><span class="lineno"> 2707</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l02708"></a><span class="lineno"> 2708</span> </div><div class="line"><a name="l02709"></a><span class="lineno"> 2709</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> || (xn == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> && xds[xn - 1] < <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - 1]))</div><div class="line"><a name="l02710"></a><span class="lineno"> 2710</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(0), x);</div><div class="line"><a name="l02711"></a><span class="lineno"> 2711</span> </div><div class="line"><a name="l02712"></a><span class="lineno"> 2712</span>  qn = xn + <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a>;</div><div class="line"><a name="l02713"></a><span class="lineno"> 2713</span>  q = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(qn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l02714"></a><span class="lineno"> 2714</span>  qds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(q);</div><div class="line"><a name="l02715"></a><span class="lineno"> 2715</span> </div><div class="line"><a name="l02716"></a><span class="lineno"> 2716</span>  rn = <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>;</div><div class="line"><a name="l02717"></a><span class="lineno"> 2717</span>  r = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(rn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l02718"></a><span class="lineno"> 2718</span>  rds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(r);</div><div class="line"><a name="l02719"></a><span class="lineno"> 2719</span> </div><div class="line"><a name="l02720"></a><span class="lineno"> 2720</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16fa218f374c607d043c554d02f95190">bary_divmod_normal</a>(qds, qn, rds, rn, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02721"></a><span class="lineno"> 2721</span> </div><div class="line"><a name="l02722"></a><span class="lineno"> 2722</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(q);</div><div class="line"><a name="l02723"></a><span class="lineno"> 2723</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(r);</div><div class="line"><a name="l02724"></a><span class="lineno"> 2724</span> </div><div class="line"><a name="l02725"></a><span class="lineno"> 2725</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l02726"></a><span class="lineno"> 2726</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l02727"></a><span class="lineno"> 2727</span> </div><div class="line"><a name="l02728"></a><span class="lineno"> 2728</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(q, r);</div><div class="line"><a name="l02729"></a><span class="lineno"> 2729</span> }</div><div class="line"><a name="l02730"></a><span class="lineno"> 2730</span> </div><div class="line"><a name="l02731"></a><span class="lineno"> 2731</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l02732"></a><span class="lineno"> 2732</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02733"></a><span class="lineno"> 2733</span> bary_divmod_gmp(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keywordtype">size_t</span> qn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *rds, <span class="keywordtype">size_t</span> rn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>)</div><div class="line"><a name="l02734"></a><span class="lineno"> 2734</span> {</div><div class="line"><a name="l02735"></a><span class="lineno"> 2735</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> nails = (<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>)*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l02736"></a><span class="lineno"> 2736</span>  mpz_t x, y, q, r;</div><div class="line"><a name="l02737"></a><span class="lineno"> 2737</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l02738"></a><span class="lineno"> 2738</span> </div><div class="line"><a name="l02739"></a><span class="lineno"> 2739</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> < xn || (xn == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> && <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - 1] <= xds[xn - 1]));</div><div class="line"><a name="l02740"></a><span class="lineno"> 2740</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(qds ? (xn - <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> + 1) <= qn : 1);</div><div class="line"><a name="l02741"></a><span class="lineno"> 2741</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(rds ? <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> <= rn : 1);</div><div class="line"><a name="l02742"></a><span class="lineno"> 2742</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(qds || rds);</div><div class="line"><a name="l02743"></a><span class="lineno"> 2743</span> </div><div class="line"><a name="l02744"></a><span class="lineno"> 2744</span>  mpz_init(x);</div><div class="line"><a name="l02745"></a><span class="lineno"> 2745</span>  mpz_init(y);</div><div class="line"><a name="l02746"></a><span class="lineno"> 2746</span>  <span class="keywordflow">if</span> (qds) mpz_init(q);</div><div class="line"><a name="l02747"></a><span class="lineno"> 2747</span>  <span class="keywordflow">if</span> (rds) mpz_init(r);</div><div class="line"><a name="l02748"></a><span class="lineno"> 2748</span> </div><div class="line"><a name="l02749"></a><span class="lineno"> 2749</span>  mpz_import(x, xn, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, xds);</div><div class="line"><a name="l02750"></a><span class="lineno"> 2750</span>  mpz_import(y, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>);</div><div class="line"><a name="l02751"></a><span class="lineno"> 2751</span> </div><div class="line"><a name="l02752"></a><span class="lineno"> 2752</span>  <span class="keywordflow">if</span> (!rds) {</div><div class="line"><a name="l02753"></a><span class="lineno"> 2753</span>  mpz_fdiv_q(q, x, y);</div><div class="line"><a name="l02754"></a><span class="lineno"> 2754</span>  }</div><div class="line"><a name="l02755"></a><span class="lineno"> 2755</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (!qds) {</div><div class="line"><a name="l02756"></a><span class="lineno"> 2756</span>  mpz_fdiv_r(r, x, y);</div><div class="line"><a name="l02757"></a><span class="lineno"> 2757</span>  }</div><div class="line"><a name="l02758"></a><span class="lineno"> 2758</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02759"></a><span class="lineno"> 2759</span>  mpz_fdiv_qr(q, r, x, y);</div><div class="line"><a name="l02760"></a><span class="lineno"> 2760</span>  }</div><div class="line"><a name="l02761"></a><span class="lineno"> 2761</span> </div><div class="line"><a name="l02762"></a><span class="lineno"> 2762</span>  mpz_clear(x);</div><div class="line"><a name="l02763"></a><span class="lineno"> 2763</span>  mpz_clear(y);</div><div class="line"><a name="l02764"></a><span class="lineno"> 2764</span> </div><div class="line"><a name="l02765"></a><span class="lineno"> 2765</span>  <span class="keywordflow">if</span> (qds) {</div><div class="line"><a name="l02766"></a><span class="lineno"> 2766</span>  mpz_export(qds, &<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, q);</div><div class="line"><a name="l02767"></a><span class="lineno"> 2767</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds+<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, qn-<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>);</div><div class="line"><a name="l02768"></a><span class="lineno"> 2768</span>  mpz_clear(q);</div><div class="line"><a name="l02769"></a><span class="lineno"> 2769</span>  }</div><div class="line"><a name="l02770"></a><span class="lineno"> 2770</span> </div><div class="line"><a name="l02771"></a><span class="lineno"> 2771</span>  <span class="keywordflow">if</span> (rds) {</div><div class="line"><a name="l02772"></a><span class="lineno"> 2772</span>  mpz_export(rds, &<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, r);</div><div class="line"><a name="l02773"></a><span class="lineno"> 2773</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds+<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, rn-<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>);</div><div class="line"><a name="l02774"></a><span class="lineno"> 2774</span>  mpz_clear(r);</div><div class="line"><a name="l02775"></a><span class="lineno"> 2775</span>  }</div><div class="line"><a name="l02776"></a><span class="lineno"> 2776</span> }</div><div class="line"><a name="l02777"></a><span class="lineno"> 2777</span> </div><div class="line"><a name="l02778"></a><span class="lineno"> 2778</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02779"></a><span class="lineno"> 2779</span> rb_big_divrem_gmp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l02780"></a><span class="lineno"> 2780</span> {</div><div class="line"><a name="l02781"></a><span class="lineno"> 2781</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y), qn, rn;</div><div class="line"><a name="l02782"></a><span class="lineno"> 2782</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), *qds, *rds;</div><div class="line"><a name="l02783"></a><span class="lineno"> 2783</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> q, r;</div><div class="line"><a name="l02784"></a><span class="lineno"> 2784</span> </div><div class="line"><a name="l02785"></a><span class="lineno"> 2785</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02786"></a><span class="lineno"> 2786</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> == 0)</div><div class="line"><a name="l02787"></a><span class="lineno"> 2787</span>  <a class="code" href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a>();</div><div class="line"><a name="l02788"></a><span class="lineno"> 2788</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l02789"></a><span class="lineno"> 2789</span> </div><div class="line"><a name="l02790"></a><span class="lineno"> 2790</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> || (xn == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> && xds[xn - 1] < <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - 1]))</div><div class="line"><a name="l02791"></a><span class="lineno"> 2791</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(0), x);</div><div class="line"><a name="l02792"></a><span class="lineno"> 2792</span> </div><div class="line"><a name="l02793"></a><span class="lineno"> 2793</span>  qn = xn - <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> + 1;</div><div class="line"><a name="l02794"></a><span class="lineno"> 2794</span>  q = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(qn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l02795"></a><span class="lineno"> 2795</span>  qds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(q);</div><div class="line"><a name="l02796"></a><span class="lineno"> 2796</span> </div><div class="line"><a name="l02797"></a><span class="lineno"> 2797</span>  rn = <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>;</div><div class="line"><a name="l02798"></a><span class="lineno"> 2798</span>  r = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(rn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l02799"></a><span class="lineno"> 2799</span>  rds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(r);</div><div class="line"><a name="l02800"></a><span class="lineno"> 2800</span> </div><div class="line"><a name="l02801"></a><span class="lineno"> 2801</span>  bary_divmod_gmp(qds, qn, rds, rn, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02802"></a><span class="lineno"> 2802</span> </div><div class="line"><a name="l02803"></a><span class="lineno"> 2803</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(q);</div><div class="line"><a name="l02804"></a><span class="lineno"> 2804</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(r);</div><div class="line"><a name="l02805"></a><span class="lineno"> 2805</span> </div><div class="line"><a name="l02806"></a><span class="lineno"> 2806</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l02807"></a><span class="lineno"> 2807</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l02808"></a><span class="lineno"> 2808</span> </div><div class="line"><a name="l02809"></a><span class="lineno"> 2809</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(q, r);</div><div class="line"><a name="l02810"></a><span class="lineno"> 2810</span> }</div><div class="line"><a name="l02811"></a><span class="lineno"> 2811</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02812"></a><span class="lineno"> 2812</span> </div><div class="line"><a name="l02813"></a><span class="lineno"> 2813</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02814"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa789cbec5f248ea8ed2e99ceb14951f7"> 2814</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa789cbec5f248ea8ed2e99ceb14951f7">bary_divmod_branch</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keywordtype">size_t</span> qn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *rds, <span class="keywordtype">size_t</span> rn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>)</div><div class="line"><a name="l02815"></a><span class="lineno"> 2815</span> {</div><div class="line"><a name="l02816"></a><span class="lineno"> 2816</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l02817"></a><span class="lineno"> 2817</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a26761962ce3cba5c8938c3ad2dff914e">GMP_DIV_DIGITS</a> < xn) {</div><div class="line"><a name="l02818"></a><span class="lineno"> 2818</span>  bary_divmod_gmp(qds, qn, rds, rn, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02819"></a><span class="lineno"> 2819</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02820"></a><span class="lineno"> 2820</span>  }</div><div class="line"><a name="l02821"></a><span class="lineno"> 2821</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02822"></a><span class="lineno"> 2822</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a16fa218f374c607d043c554d02f95190">bary_divmod_normal</a>(qds, qn, rds, rn, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02823"></a><span class="lineno"> 2823</span> }</div><div class="line"><a name="l02824"></a><span class="lineno"> 2824</span> </div><div class="line"><a name="l02825"></a><span class="lineno"> 2825</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02826"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a7a2b8c90e640fa26f4870d8a359552d9"> 2826</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7a2b8c90e640fa26f4870d8a359552d9">bary_divmod</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, <span class="keywordtype">size_t</span> qn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *rds, <span class="keywordtype">size_t</span> rn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>)</div><div class="line"><a name="l02827"></a><span class="lineno"> 2827</span> {</div><div class="line"><a name="l02828"></a><span class="lineno"> 2828</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= qn);</div><div class="line"><a name="l02829"></a><span class="lineno"> 2829</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> <= rn);</div><div class="line"><a name="l02830"></a><span class="lineno"> 2830</span> </div><div class="line"><a name="l02831"></a><span class="lineno"> 2831</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02832"></a><span class="lineno"> 2832</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> == 0)</div><div class="line"><a name="l02833"></a><span class="lineno"> 2833</span>  <a class="code" href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a>();</div><div class="line"><a name="l02834"></a><span class="lineno"> 2834</span> </div><div class="line"><a name="l02835"></a><span class="lineno"> 2835</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l02836"></a><span class="lineno"> 2836</span>  <span class="keywordflow">if</span> (xn == 0) {</div><div class="line"><a name="l02837"></a><span class="lineno"> 2837</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds, qn);</div><div class="line"><a name="l02838"></a><span class="lineno"> 2838</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds, rn);</div><div class="line"><a name="l02839"></a><span class="lineno"> 2839</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l02840"></a><span class="lineno"> 2840</span>  }</div><div class="line"><a name="l02841"></a><span class="lineno"> 2841</span> </div><div class="line"><a name="l02842"></a><span class="lineno"> 2842</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> || (xn == <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> && xds[xn - 1] < <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> - 1])) {</div><div class="line"><a name="l02843"></a><span class="lineno"> 2843</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(rds, xds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, xn);</div><div class="line"><a name="l02844"></a><span class="lineno"> 2844</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds+xn, rn-xn);</div><div class="line"><a name="l02845"></a><span class="lineno"> 2845</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds, qn);</div><div class="line"><a name="l02846"></a><span class="lineno"> 2846</span>  }</div><div class="line"><a name="l02847"></a><span class="lineno"> 2847</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> == 1) {</div><div class="line"><a name="l02848"></a><span class="lineno"> 2848</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(qds, xds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, xn);</div><div class="line"><a name="l02849"></a><span class="lineno"> 2849</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds+xn, qn-xn);</div><div class="line"><a name="l02850"></a><span class="lineno"> 2850</span>  rds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a>(qds, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>[0]);</div><div class="line"><a name="l02851"></a><span class="lineno"> 2851</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds+1, rn-1);</div><div class="line"><a name="l02852"></a><span class="lineno"> 2852</span>  }</div><div class="line"><a name="l02853"></a><span class="lineno"> 2853</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (xn == 2 && <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a> == 2) {</div><div class="line"><a name="l02854"></a><span class="lineno"> 2854</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> x = <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(xds, 2);</div><div class="line"><a name="l02855"></a><span class="lineno"> 2855</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> y = <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, 2);</div><div class="line"><a name="l02856"></a><span class="lineno"> 2856</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> q = x / y;</div><div class="line"><a name="l02857"></a><span class="lineno"> 2857</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> r = x % y;</div><div class="line"><a name="l02858"></a><span class="lineno"> 2858</span>  qds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(q);</div><div class="line"><a name="l02859"></a><span class="lineno"> 2859</span>  qds[1] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(q));</div><div class="line"><a name="l02860"></a><span class="lineno"> 2860</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(qds+2, qn-2);</div><div class="line"><a name="l02861"></a><span class="lineno"> 2861</span>  rds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(r);</div><div class="line"><a name="l02862"></a><span class="lineno"> 2862</span>  rds[1] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(r));</div><div class="line"><a name="l02863"></a><span class="lineno"> 2863</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(rds+2, rn-2);</div><div class="line"><a name="l02864"></a><span class="lineno"> 2864</span>  }</div><div class="line"><a name="l02865"></a><span class="lineno"> 2865</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02866"></a><span class="lineno"> 2866</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa789cbec5f248ea8ed2e99ceb14951f7">bary_divmod_branch</a>(qds, qn, rds, rn, xds, xn, <a class="code" href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">yds</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">yn</a>);</div><div class="line"><a name="l02867"></a><span class="lineno"> 2867</span>  }</div><div class="line"><a name="l02868"></a><span class="lineno"> 2868</span> }</div><div class="line"><a name="l02869"></a><span class="lineno"> 2869</span> </div><div class="line"><a name="l02870"></a><span class="lineno"> 2870</span> </div><div class="line"><a name="l02871"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a4d2ba23d537707bbc06d9d7487382fd3"> 2871</a></span> <span class="preprocessor">#define BIGNUM_DEBUG 0</span></div><div class="line"><a name="l02872"></a><span class="lineno"> 2872</span> <span class="preprocessor">#if BIGNUM_DEBUG</span></div><div class="line"><a name="l02873"></a><span class="lineno"> 2873</span> <span class="preprocessor">#define ON_DEBUG(x) do { x; } while (0)</span></div><div class="line"><a name="l02874"></a><span class="lineno"> 2874</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02875"></a><span class="lineno"> 2875</span> dump_bignum(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l02876"></a><span class="lineno"> 2876</span> {</div><div class="line"><a name="l02877"></a><span class="lineno"> 2877</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l02878"></a><span class="lineno"> 2878</span>  printf(<span class="stringliteral">"%c0x0"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) ? <span class="charliteral">'+'</span> : <span class="charliteral">'-'</span>);</div><div class="line"><a name="l02879"></a><span class="lineno"> 2879</span>  <span class="keywordflow">for</span> (i = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x); i--; ) {</div><div class="line"><a name="l02880"></a><span class="lineno"> 2880</span>  printf(<span class="stringliteral">"_%0*"</span><a class="code" href="../../d8/db0/defines_8h.html#a265962262d611ccce5c77f193bcc3a4a">PRIxBDIGIT</a>, <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>*2, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x)[i]);</div><div class="line"><a name="l02881"></a><span class="lineno"> 2881</span>  }</div><div class="line"><a name="l02882"></a><span class="lineno"> 2882</span>  printf(<span class="stringliteral">", len=%lu"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x));</div><div class="line"><a name="l02883"></a><span class="lineno"> 2883</span>  puts(<span class="stringliteral">""</span>);</div><div class="line"><a name="l02884"></a><span class="lineno"> 2884</span> }</div><div class="line"><a name="l02885"></a><span class="lineno"> 2885</span> </div><div class="line"><a name="l02886"></a><span class="lineno"> 2886</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02887"></a><span class="lineno"> 2887</span> rb_big_dump(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l02888"></a><span class="lineno"> 2888</span> {</div><div class="line"><a name="l02889"></a><span class="lineno"> 2889</span>  dump_bignum(x);</div><div class="line"><a name="l02890"></a><span class="lineno"> 2890</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l02891"></a><span class="lineno"> 2891</span> }</div><div class="line"><a name="l02892"></a><span class="lineno"> 2892</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l02893"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa468ac3641c4bf69b8fbbc92ef763aba"> 2893</a></span> <span class="preprocessor">#define ON_DEBUG(x)</span></div><div class="line"><a name="l02894"></a><span class="lineno"> 2894</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02895"></a><span class="lineno"> 2895</span> </div><div class="line"><a name="l02896"></a><span class="lineno"> 2896</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l02897"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a90d5bd45f73a443c9f0ab692626c70f5"> 2897</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a90d5bd45f73a443c9f0ab692626c70f5">bigzero_p</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l02898"></a><span class="lineno"> 2898</span> {</div><div class="line"><a name="l02899"></a><span class="lineno"> 2899</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x));</div><div class="line"><a name="l02900"></a><span class="lineno"> 2900</span> }</div><div class="line"><a name="l02901"></a><span class="lineno"> 2901</span> </div><div class="line"><a name="l02902"></a><span class="lineno"> 2902</span> <span class="keywordtype">int</span></div><div class="line"><a name="l02903"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a280d5ce74114cdfa63f249f960a262c3"> 2903</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a280d5ce74114cdfa63f249f960a262c3">rb_bigzero_p</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l02904"></a><span class="lineno"> 2904</span> {</div><div class="line"><a name="l02905"></a><span class="lineno"> 2905</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(x);</div><div class="line"><a name="l02906"></a><span class="lineno"> 2906</span> }</div><div class="line"><a name="l02907"></a><span class="lineno"> 2907</span> </div><div class="line"><a name="l02908"></a><span class="lineno"> 2908</span> <span class="keywordtype">int</span></div><div class="line"><a name="l02909"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#ab3e99f4cf3f8bd3a3d89d13bbd8c28d2"> 2909</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a178460e9f3ea7ee183fe951123a08a50">rb_cmpint</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> a, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> b)</div><div class="line"><a name="l02910"></a><span class="lineno"> 2910</span> {</div><div class="line"><a name="l02911"></a><span class="lineno"> 2911</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l02912"></a><span class="lineno"> 2912</span>  <a class="code" href="../../de/d6d/compar_8c.html#ae167ee135d7bb4178188c2ad356dfcc7">rb_cmperr</a>(a, b);</div><div class="line"><a name="l02913"></a><span class="lineno"> 2913</span>  }</div><div class="line"><a name="l02914"></a><span class="lineno"> 2914</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l02915"></a><span class="lineno"> 2915</span>  <span class="keywordtype">long</span> l = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l02916"></a><span class="lineno"> 2916</span>  <span class="keywordflow">if</span> (l > 0) <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02917"></a><span class="lineno"> 2917</span>  <span class="keywordflow">if</span> (l < 0) <span class="keywordflow">return</span> -1;</div><div class="line"><a name="l02918"></a><span class="lineno"> 2918</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02919"></a><span class="lineno"> 2919</span>  }</div><div class="line"><a name="l02920"></a><span class="lineno"> 2920</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l02921"></a><span class="lineno"> 2921</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02922"></a><span class="lineno"> 2922</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02923"></a><span class="lineno"> 2923</span>  <span class="keywordflow">return</span> -1;</div><div class="line"><a name="l02924"></a><span class="lineno"> 2924</span>  }</div><div class="line"><a name="l02925"></a><span class="lineno"> 2925</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a117741045763c090b26e30a85bd0e0a6">RTEST</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="charliteral">'>'</span>, 1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0)))) <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l02926"></a><span class="lineno"> 2926</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a117741045763c090b26e30a85bd0e0a6">RTEST</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="charliteral">'<'</span>, 1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0)))) <span class="keywordflow">return</span> -1;</div><div class="line"><a name="l02927"></a><span class="lineno"> 2927</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l02928"></a><span class="lineno"> 2928</span> }</div><div class="line"><a name="l02929"></a><span class="lineno"> 2929</span> </div><div class="line"><a name="l02930"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7"> 2930</a></span> <span class="preprocessor">#define RBIGNUM_SET_LEN(b,l) \</span></div><div class="line"><a name="l02931"></a><span class="lineno"> 2931</span> <span class="preprocessor"> ((RBASIC(b)->flags & RBIGNUM_EMBED_FLAG) ? \</span></div><div class="line"><a name="l02932"></a><span class="lineno"> 2932</span> <span class="preprocessor"> (void)(RBASIC(b)->flags = \</span></div><div class="line"><a name="l02933"></a><span class="lineno"> 2933</span> <span class="preprocessor"> (RBASIC(b)->flags & ~RBIGNUM_EMBED_LEN_MASK) | \</span></div><div class="line"><a name="l02934"></a><span class="lineno"> 2934</span> <span class="preprocessor"> ((l) << RBIGNUM_EMBED_LEN_SHIFT)) : \</span></div><div class="line"><a name="l02935"></a><span class="lineno"> 2935</span> <span class="preprocessor"> (void)(RBIGNUM(b)->as.heap.len = (l)))</span></div><div class="line"><a name="l02936"></a><span class="lineno"> 2936</span> </div><div class="line"><a name="l02937"></a><span class="lineno"> 2937</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02938"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ab4bdb98cb5bf78165468ac02cd583696"> 2938</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ab4bdb98cb5bf78165468ac02cd583696">rb_big_realloc</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big, <span class="keywordtype">long</span> len)</div><div class="line"><a name="l02939"></a><span class="lineno"> 2939</span> {</div><div class="line"><a name="l02940"></a><span class="lineno"> 2940</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds;</div><div class="line"><a name="l02941"></a><span class="lineno"> 2941</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1d4c05021aacd8cab989ff60f95ebe2d">RBASIC</a>(big)->flags & <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad6856192451c57b81debeb24282a11c8">RBIGNUM_EMBED_FLAG</a>) {</div><div class="line"><a name="l02942"></a><span class="lineno"> 2942</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a> < len) {</div><div class="line"><a name="l02943"></a><span class="lineno"> 2943</span>  ds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l02944"></a><span class="lineno"> 2944</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(ds, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a>);</div><div class="line"><a name="l02945"></a><span class="lineno"> 2945</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(big);</div><div class="line"><a name="l02946"></a><span class="lineno"> 2946</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.digits = ds;</div><div class="line"><a name="l02947"></a><span class="lineno"> 2947</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1d4c05021aacd8cab989ff60f95ebe2d">RBASIC</a>(big)->flags &= ~<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad6856192451c57b81debeb24282a11c8">RBIGNUM_EMBED_FLAG</a>;</div><div class="line"><a name="l02948"></a><span class="lineno"> 2948</span>  }</div><div class="line"><a name="l02949"></a><span class="lineno"> 2949</span>  }</div><div class="line"><a name="l02950"></a><span class="lineno"> 2950</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02951"></a><span class="lineno"> 2951</span>  <span class="keywordflow">if</span> (len <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a>) {</div><div class="line"><a name="l02952"></a><span class="lineno"> 2952</span>  ds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.digits;</div><div class="line"><a name="l02953"></a><span class="lineno"> 2953</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1d4c05021aacd8cab989ff60f95ebe2d">RBASIC</a>(big)->flags |= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad6856192451c57b81debeb24282a11c8">RBIGNUM_EMBED_FLAG</a>;</div><div class="line"><a name="l02954"></a><span class="lineno"> 2954</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a>(big, len);</div><div class="line"><a name="l02955"></a><span class="lineno"> 2955</span>  (void)<a class="code" href="../../db/d74/zlib_8c.html#ae893baae242001d89c2319ab442fc610">VALGRIND_MAKE_MEM_UNDEFINED</a>((<span class="keywordtype">void</span>*)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary, <span class="keyword">sizeof</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary));</div><div class="line"><a name="l02956"></a><span class="lineno"> 2956</span>  <span class="keywordflow">if</span> (ds) {</div><div class="line"><a name="l02957"></a><span class="lineno"> 2957</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary, ds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l02958"></a><span class="lineno"> 2958</span>  <a class="code" href="../../d8/db0/defines_8h.html#a6ff69f8866ae756cb246b3eebf7a4fce">xfree</a>(ds);</div><div class="line"><a name="l02959"></a><span class="lineno"> 2959</span>  }</div><div class="line"><a name="l02960"></a><span class="lineno"> 2960</span>  }</div><div class="line"><a name="l02961"></a><span class="lineno"> 2961</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02962"></a><span class="lineno"> 2962</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(big) == 0) {</div><div class="line"><a name="l02963"></a><span class="lineno"> 2963</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.digits = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l02964"></a><span class="lineno"> 2964</span>  }</div><div class="line"><a name="l02965"></a><span class="lineno"> 2965</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02966"></a><span class="lineno"> 2966</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5160cad2d7d090e4d2e8803f1ba5ee3c">REALLOC_N</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.digits, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l02967"></a><span class="lineno"> 2967</span>  }</div><div class="line"><a name="l02968"></a><span class="lineno"> 2968</span>  }</div><div class="line"><a name="l02969"></a><span class="lineno"> 2969</span>  }</div><div class="line"><a name="l02970"></a><span class="lineno"> 2970</span> }</div><div class="line"><a name="l02971"></a><span class="lineno"> 2971</span> </div><div class="line"><a name="l02972"></a><span class="lineno"> 2972</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02973"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a55db8db3b0dcf17677a89acb561c6574"> 2973</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a55db8db3b0dcf17677a89acb561c6574">rb_big_resize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big, <span class="keywordtype">long</span> len)</div><div class="line"><a name="l02974"></a><span class="lineno"> 2974</span> {</div><div class="line"><a name="l02975"></a><span class="lineno"> 2975</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab4bdb98cb5bf78165468ac02cd583696">rb_big_realloc</a>(big, len);</div><div class="line"><a name="l02976"></a><span class="lineno"> 2976</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a>(big, len);</div><div class="line"><a name="l02977"></a><span class="lineno"> 2977</span> }</div><div class="line"><a name="l02978"></a><span class="lineno"> 2978</span> </div><div class="line"><a name="l02979"></a><span class="lineno"> 2979</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02980"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b"> 2980</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b">bignew_1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <span class="keywordtype">long</span> len, <span class="keywordtype">int</span> sign)</div><div class="line"><a name="l02981"></a><span class="lineno"> 2981</span> {</div><div class="line"><a name="l02982"></a><span class="lineno"> 2982</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a116f0851dec0d74b238008c40e23e783">NEWOBJ_OF</a>(big, <span class="keyword">struct</span> <a class="code" href="../../d3/d44/struct_r_bignum.html">RBignum</a>, klass, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a> | (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae0bf11f904fe1fc3a4bbe0d30c30b2a3">RGENGC_WB_PROTECTED_BIGNUM</a> ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac54404aa353f0d6ef59ccc6be5f8c3e4">FL_WB_PROTECTED</a> : 0));</div><div class="line"><a name="l02983"></a><span class="lineno"> 2983</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(big, sign?1:0);</div><div class="line"><a name="l02984"></a><span class="lineno"> 2984</span>  <span class="keywordflow">if</span> (len <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a>) {</div><div class="line"><a name="l02985"></a><span class="lineno"> 2985</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1d4c05021aacd8cab989ff60f95ebe2d">RBASIC</a>(big)->flags |= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad6856192451c57b81debeb24282a11c8">RBIGNUM_EMBED_FLAG</a>;</div><div class="line"><a name="l02986"></a><span class="lineno"> 2986</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a>(big, len);</div><div class="line"><a name="l02987"></a><span class="lineno"> 2987</span>  (void)<a class="code" href="../../db/d74/zlib_8c.html#ae893baae242001d89c2319ab442fc610">VALGRIND_MAKE_MEM_UNDEFINED</a>((<span class="keywordtype">void</span>*)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary, <span class="keyword">sizeof</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.ary));</div><div class="line"><a name="l02988"></a><span class="lineno"> 2988</span>  }</div><div class="line"><a name="l02989"></a><span class="lineno"> 2989</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02990"></a><span class="lineno"> 2990</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.digits = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l02991"></a><span class="lineno"> 2991</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a>(big)->as.heap.len = len;</div><div class="line"><a name="l02992"></a><span class="lineno"> 2992</span>  }</div><div class="line"><a name="l02993"></a><span class="lineno"> 2993</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7ae8fa209abf837905d53c1c4be7c75d">OBJ_FREEZE</a>(big);</div><div class="line"><a name="l02994"></a><span class="lineno"> 2994</span>  <span class="keywordflow">return</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)big;</div><div class="line"><a name="l02995"></a><span class="lineno"> 2995</span> }</div><div class="line"><a name="l02996"></a><span class="lineno"> 2996</span> </div><div class="line"><a name="l02997"></a><span class="lineno"> 2997</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02998"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a3f22fa1e5f97d2f580e893113bcaa8d1"> 2998</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5a6e04f79e77aad0e3ab1190b07bfabd">rb_big_new</a>(<span class="keywordtype">long</span> len, <span class="keywordtype">int</span> sign)</div><div class="line"><a name="l02999"></a><span class="lineno"> 2999</span> {</div><div class="line"><a name="l03000"></a><span class="lineno"> 3000</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(len, sign != 0);</div><div class="line"><a name="l03001"></a><span class="lineno"> 3001</span> }</div><div class="line"><a name="l03002"></a><span class="lineno"> 3002</span> </div><div class="line"><a name="l03003"></a><span class="lineno"> 3003</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03004"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a39c0968411db82e3ef76e46807c47628"> 3004</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a28fe45fbc613401b17ad1e9d48c81aa2">rb_big_clone</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03005"></a><span class="lineno"> 3005</span> {</div><div class="line"><a name="l03006"></a><span class="lineno"> 3006</span>  <span class="keywordtype">long</span> len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l03007"></a><span class="lineno"> 3007</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b">bignew_1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad07df58de9895cbc33c10f02540d2d4d">CLASS_OF</a>(x), len, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l03008"></a><span class="lineno"> 3008</span> </div><div class="line"><a name="l03009"></a><span class="lineno"> 3009</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, len);</div><div class="line"><a name="l03010"></a><span class="lineno"> 3010</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l03011"></a><span class="lineno"> 3011</span> }</div><div class="line"><a name="l03012"></a><span class="lineno"> 3012</span> </div><div class="line"><a name="l03013"></a><span class="lineno"> 3013</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03014"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4"> 3014</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4">big_extend_carry</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03015"></a><span class="lineno"> 3015</span> {</div><div class="line"><a name="l03016"></a><span class="lineno"> 3016</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a55db8db3b0dcf17677a89acb561c6574">rb_big_resize</a>(x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)+1);</div><div class="line"><a name="l03017"></a><span class="lineno"> 3017</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x)[<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)-1] = 1;</div><div class="line"><a name="l03018"></a><span class="lineno"> 3018</span> }</div><div class="line"><a name="l03019"></a><span class="lineno"> 3019</span> </div><div class="line"><a name="l03020"></a><span class="lineno"> 3020</span> <span class="comment">/* modify a bignum by 2's complement */</span></div><div class="line"><a name="l03021"></a><span class="lineno"> 3021</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03022"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37"> 3022</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37">get2comp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03023"></a><span class="lineno"> 3023</span> {</div><div class="line"><a name="l03024"></a><span class="lineno"> 3024</span>  <span class="keywordtype">long</span> i = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l03025"></a><span class="lineno"> 3025</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l03026"></a><span class="lineno"> 3026</span> </div><div class="line"><a name="l03027"></a><span class="lineno"> 3027</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(ds, i)) {</div><div class="line"><a name="l03028"></a><span class="lineno"> 3028</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4">big_extend_carry</a>(x);</div><div class="line"><a name="l03029"></a><span class="lineno"> 3029</span>  }</div><div class="line"><a name="l03030"></a><span class="lineno"> 3030</span> }</div><div class="line"><a name="l03031"></a><span class="lineno"> 3031</span> </div><div class="line"><a name="l03032"></a><span class="lineno"> 3032</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03033"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a52819d7ad945262076f7fcf49ab71c3f"> 3033</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#adb96439043a2712fa81fbbe13ac6eceb">rb_big_2comp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x) <span class="comment">/* get 2's complement */</span></div><div class="line"><a name="l03034"></a><span class="lineno"> 3034</span> {</div><div class="line"><a name="l03035"></a><span class="lineno"> 3035</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37">get2comp</a>(x);</div><div class="line"><a name="l03036"></a><span class="lineno"> 3036</span> }</div><div class="line"><a name="l03037"></a><span class="lineno"> 3037</span> </div><div class="line"><a name="l03038"></a><span class="lineno"> 3038</span> <span class="keyword">static</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a></div><div class="line"><a name="l03039"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645"> 3039</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *xp, <span class="keywordtype">long</span> *n_ret)</div><div class="line"><a name="l03040"></a><span class="lineno"> 3040</span> {</div><div class="line"><a name="l03041"></a><span class="lineno"> 3041</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x = *xp;</div><div class="line"><a name="l03042"></a><span class="lineno"> 3042</span>  <span class="keywordtype">long</span> n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l03043"></a><span class="lineno"> 3043</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l03044"></a><span class="lineno"> 3044</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibits = 0;</div><div class="line"><a name="l03045"></a><span class="lineno"> 3045</span> </div><div class="line"><a name="l03046"></a><span class="lineno"> 3046</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(ds, n);</div><div class="line"><a name="l03047"></a><span class="lineno"> 3047</span> </div><div class="line"><a name="l03048"></a><span class="lineno"> 3048</span>  <span class="keywordflow">if</span> (n != 0 && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a>(x)) {</div><div class="line"><a name="l03049"></a><span class="lineno"> 3049</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b">bignew_1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad07df58de9895cbc33c10f02540d2d4d">CLASS_OF</a>(x), n, 0);</div><div class="line"><a name="l03050"></a><span class="lineno"> 3050</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), ds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, n);</div><div class="line"><a name="l03051"></a><span class="lineno"> 3051</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), n);</div><div class="line"><a name="l03052"></a><span class="lineno"> 3052</span>  hibits = <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l03053"></a><span class="lineno"> 3053</span>  *xp = z;</div><div class="line"><a name="l03054"></a><span class="lineno"> 3054</span>  }</div><div class="line"><a name="l03055"></a><span class="lineno"> 3055</span>  *n_ret = n;</div><div class="line"><a name="l03056"></a><span class="lineno"> 3056</span>  <span class="keywordflow">return</span> hibits;</div><div class="line"><a name="l03057"></a><span class="lineno"> 3057</span> }</div><div class="line"><a name="l03058"></a><span class="lineno"> 3058</span> </div><div class="line"><a name="l03059"></a><span class="lineno"> 3059</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03060"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f"> 3060</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> hibits)</div><div class="line"><a name="l03061"></a><span class="lineno"> 3061</span> {</div><div class="line"><a name="l03062"></a><span class="lineno"> 3062</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(x, !hibits);</div><div class="line"><a name="l03063"></a><span class="lineno"> 3063</span>  <span class="keywordflow">if</span> (hibits) {</div><div class="line"><a name="l03064"></a><span class="lineno"> 3064</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37">get2comp</a>(x);</div><div class="line"><a name="l03065"></a><span class="lineno"> 3065</span>  }</div><div class="line"><a name="l03066"></a><span class="lineno"> 3066</span> }</div><div class="line"><a name="l03067"></a><span class="lineno"> 3067</span> </div><div class="line"><a name="l03068"></a><span class="lineno"> 3068</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03069"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc"> 3069</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03070"></a><span class="lineno"> 3070</span> {</div><div class="line"><a name="l03071"></a><span class="lineno"> 3071</span>  <span class="keywordtype">long</span> len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l03072"></a><span class="lineno"> 3072</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l03073"></a><span class="lineno"> 3073</span> </div><div class="line"><a name="l03074"></a><span class="lineno"> 3074</span>  <span class="keywordflow">if</span> (len == 0) <span class="keywordflow">return</span> x;</div><div class="line"><a name="l03075"></a><span class="lineno"> 3075</span>  <span class="keywordflow">while</span> (--len && !ds[len]);</div><div class="line"><a name="l03076"></a><span class="lineno"> 3076</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) > len+1) {</div><div class="line"><a name="l03077"></a><span class="lineno"> 3077</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a55db8db3b0dcf17677a89acb561c6574">rb_big_resize</a>(x, len+1);</div><div class="line"><a name="l03078"></a><span class="lineno"> 3078</span>  }</div><div class="line"><a name="l03079"></a><span class="lineno"> 3079</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l03080"></a><span class="lineno"> 3080</span> }</div><div class="line"><a name="l03081"></a><span class="lineno"> 3081</span> </div><div class="line"><a name="l03082"></a><span class="lineno"> 3082</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03083"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a208b018ce6d4eaf11de9043449ed3c82"> 3083</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a208b018ce6d4eaf11de9043449ed3c82">bigfixize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03084"></a><span class="lineno"> 3084</span> {</div><div class="line"><a name="l03085"></a><span class="lineno"> 3085</span>  <span class="keywordtype">size_t</span> n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l03086"></a><span class="lineno"> 3086</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l03087"></a><span class="lineno"> 3087</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l03088"></a><span class="lineno"> 3088</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> u;</div><div class="line"><a name="l03089"></a><span class="lineno"> 3089</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l03090"></a><span class="lineno"> 3090</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> u;</div><div class="line"><a name="l03091"></a><span class="lineno"> 3091</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03092"></a><span class="lineno"> 3092</span> </div><div class="line"><a name="l03093"></a><span class="lineno"> 3093</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(ds, n);</div><div class="line"><a name="l03094"></a><span class="lineno"> 3094</span> </div><div class="line"><a name="l03095"></a><span class="lineno"> 3095</span>  <span class="keywordflow">if</span> (n == 0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l03096"></a><span class="lineno"> 3096</span> </div><div class="line"><a name="l03097"></a><span class="lineno"> 3097</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l03098"></a><span class="lineno"> 3098</span>  <span class="keywordflow">if</span> (<span class="keyword">sizeof</span>(<span class="keywordtype">long</span>)/<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> < n)</div><div class="line"><a name="l03099"></a><span class="lineno"> 3099</span>  <span class="keywordflow">goto</span> return_big;</div><div class="line"><a name="l03100"></a><span class="lineno"> 3100</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03101"></a><span class="lineno"> 3101</span>  <span class="keywordtype">int</span> i = (int)n;</div><div class="line"><a name="l03102"></a><span class="lineno"> 3102</span>  u = 0;</div><div class="line"><a name="l03103"></a><span class="lineno"> 3103</span>  <span class="keywordflow">while</span> (i--) {</div><div class="line"><a name="l03104"></a><span class="lineno"> 3104</span>  u = (<span class="keywordtype">unsigned</span> long)(<a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(u) + ds[i]);</div><div class="line"><a name="l03105"></a><span class="lineno"> 3105</span>  }</div><div class="line"><a name="l03106"></a><span class="lineno"> 3106</span>  }</div><div class="line"><a name="l03107"></a><span class="lineno"> 3107</span> <span class="preprocessor">#else </span><span class="comment">/* SIZEOF_BDIGITS >= SIZEOF_LONG */</span><span class="preprocessor"></span></div><div class="line"><a name="l03108"></a><span class="lineno"> 3108</span>  <span class="keywordflow">if</span> (1 < n)</div><div class="line"><a name="l03109"></a><span class="lineno"> 3109</span>  <span class="keywordflow">goto</span> return_big;</div><div class="line"><a name="l03110"></a><span class="lineno"> 3110</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l03111"></a><span class="lineno"> 3111</span>  u = ds[0];</div><div class="line"><a name="l03112"></a><span class="lineno"> 3112</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03113"></a><span class="lineno"> 3113</span> </div><div class="line"><a name="l03114"></a><span class="lineno"> 3114</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x)) {</div><div class="line"><a name="l03115"></a><span class="lineno"> 3115</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a>(u)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>((<span class="keywordtype">long</span>)u);</div><div class="line"><a name="l03116"></a><span class="lineno"> 3116</span>  }</div><div class="line"><a name="l03117"></a><span class="lineno"> 3117</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03118"></a><span class="lineno"> 3118</span>  <span class="keywordflow">if</span> (u <= -<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa5bd957eb3db4bec258cd36a2cafe352">FIXNUM_MIN</a>) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(-(<span class="keywordtype">long</span>)u);</div><div class="line"><a name="l03119"></a><span class="lineno"> 3119</span>  }</div><div class="line"><a name="l03120"></a><span class="lineno"> 3120</span> </div><div class="line"><a name="l03121"></a><span class="lineno"> 3121</span>  return_big:</div><div class="line"><a name="l03122"></a><span class="lineno"> 3122</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a55db8db3b0dcf17677a89acb561c6574">rb_big_resize</a>(x, n);</div><div class="line"><a name="l03123"></a><span class="lineno"> 3123</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l03124"></a><span class="lineno"> 3124</span> }</div><div class="line"><a name="l03125"></a><span class="lineno"> 3125</span> </div><div class="line"><a name="l03126"></a><span class="lineno"> 3126</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03127"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd"> 3127</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03128"></a><span class="lineno"> 3128</span> {</div><div class="line"><a name="l03129"></a><span class="lineno"> 3129</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(x)) {</div><div class="line"><a name="l03130"></a><span class="lineno"> 3130</span>  x = <a class="code" href="../../d1/dcc/bignum_8c.html#a208b018ce6d4eaf11de9043449ed3c82">bigfixize</a>(x);</div><div class="line"><a name="l03131"></a><span class="lineno"> 3131</span>  }</div><div class="line"><a name="l03132"></a><span class="lineno"> 3132</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l03133"></a><span class="lineno"> 3133</span> }</div><div class="line"><a name="l03134"></a><span class="lineno"> 3134</span> </div><div class="line"><a name="l03135"></a><span class="lineno"> 3135</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03136"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a340121789086b3f927761ff6c061ac1d"> 3136</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#acde5e84214e597615d05433f495dc845">rb_big_norm</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l03137"></a><span class="lineno"> 3137</span> {</div><div class="line"><a name="l03138"></a><span class="lineno"> 3138</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(x);</div><div class="line"><a name="l03139"></a><span class="lineno"> 3139</span> }</div><div class="line"><a name="l03140"></a><span class="lineno"> 3140</span> </div><div class="line"><a name="l03141"></a><span class="lineno"> 3141</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03142"></a><span class="lineno"><a class="line" href="../../de/de6/ruby_2ruby_8h.html#a06a1f1770f81f5d2c35a6e03b700adc3"> 3142</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> n)</div><div class="line"><a name="l03143"></a><span class="lineno"> 3143</span> {</div><div class="line"><a name="l03144"></a><span class="lineno"> 3144</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l03145"></a><span class="lineno"> 3145</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee9b7ba3793585d33b6c1d1338b8169d">SIZEOF_VALUE</a>), 1);</div><div class="line"><a name="l03146"></a><span class="lineno"> 3146</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *digits = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(big);</div><div class="line"><a name="l03147"></a><span class="lineno"> 3147</span> </div><div class="line"><a name="l03148"></a><span class="lineno"> 3148</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_VALUE</span></div><div class="line"><a name="l03149"></a><span class="lineno"> 3149</span>  digits[0] = n;</div><div class="line"><a name="l03150"></a><span class="lineno"> 3150</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l03151"></a><span class="lineno"> 3151</span>  <span class="keywordflow">for</span> (i = 0; i < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee9b7ba3793585d33b6c1d1338b8169d">SIZEOF_VALUE</a>); i++) {</div><div class="line"><a name="l03152"></a><span class="lineno"> 3152</span>  digits[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(n);</div><div class="line"><a name="l03153"></a><span class="lineno"> 3153</span>  n = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(n);</div><div class="line"><a name="l03154"></a><span class="lineno"> 3154</span>  }</div><div class="line"><a name="l03155"></a><span class="lineno"> 3155</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03156"></a><span class="lineno"> 3156</span> </div><div class="line"><a name="l03157"></a><span class="lineno"> 3157</span>  i = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aee9b7ba3793585d33b6c1d1338b8169d">SIZEOF_VALUE</a>);</div><div class="line"><a name="l03158"></a><span class="lineno"> 3158</span>  <span class="keywordflow">while</span> (--i && !digits[i]) ;</div><div class="line"><a name="l03159"></a><span class="lineno"> 3159</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a>(big, i+1);</div><div class="line"><a name="l03160"></a><span class="lineno"> 3160</span>  <span class="keywordflow">return</span> big;</div><div class="line"><a name="l03161"></a><span class="lineno"> 3161</span> }</div><div class="line"><a name="l03162"></a><span class="lineno"> 3162</span> </div><div class="line"><a name="l03163"></a><span class="lineno"> 3163</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03164"></a><span class="lineno"><a class="line" href="../../de/de6/ruby_2ruby_8h.html#a1defecf351ea31f966e78a1972fda34b"> 3164</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a> n)</div><div class="line"><a name="l03165"></a><span class="lineno"> 3165</span> {</div><div class="line"><a name="l03166"></a><span class="lineno"> 3166</span>  <span class="keywordtype">long</span> <a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a> = 0;</div><div class="line"><a name="l03167"></a><span class="lineno"> 3167</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> u;</div><div class="line"><a name="l03168"></a><span class="lineno"> 3168</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big;</div><div class="line"><a name="l03169"></a><span class="lineno"> 3169</span> </div><div class="line"><a name="l03170"></a><span class="lineno"> 3170</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l03171"></a><span class="lineno"> 3171</span>  u = 1 + (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)(-(n + 1)); <span class="comment">/* u = -n avoiding overflow */</span></div><div class="line"><a name="l03172"></a><span class="lineno"> 3172</span>  <a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a> = 1;</div><div class="line"><a name="l03173"></a><span class="lineno"> 3173</span>  }</div><div class="line"><a name="l03174"></a><span class="lineno"> 3174</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03175"></a><span class="lineno"> 3175</span>  u = n;</div><div class="line"><a name="l03176"></a><span class="lineno"> 3176</span>  }</div><div class="line"><a name="l03177"></a><span class="lineno"> 3177</span>  big = <a class="code" href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a>(u);</div><div class="line"><a name="l03178"></a><span class="lineno"> 3178</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a>) {</div><div class="line"><a name="l03179"></a><span class="lineno"> 3179</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(big, 0);</div><div class="line"><a name="l03180"></a><span class="lineno"> 3180</span>  }</div><div class="line"><a name="l03181"></a><span class="lineno"> 3181</span>  <span class="keywordflow">return</span> big;</div><div class="line"><a name="l03182"></a><span class="lineno"> 3182</span> }</div><div class="line"><a name="l03183"></a><span class="lineno"> 3183</span> </div><div class="line"><a name="l03184"></a><span class="lineno"> 3184</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03185"></a><span class="lineno"><a class="line" href="../../de/de6/ruby_2ruby_8h.html#aedaf1103fc1db8515b7acd7452a816ff"> 3185</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae532b50d717d3567bf15d59bf040bdb8">rb_uint2inum</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> n)</div><div class="line"><a name="l03186"></a><span class="lineno"> 3186</span> {</div><div class="line"><a name="l03187"></a><span class="lineno"> 3187</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a>(n)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(n);</div><div class="line"><a name="l03188"></a><span class="lineno"> 3188</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a>(n);</div><div class="line"><a name="l03189"></a><span class="lineno"> 3189</span> }</div><div class="line"><a name="l03190"></a><span class="lineno"> 3190</span> </div><div class="line"><a name="l03191"></a><span class="lineno"> 3191</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03192"></a><span class="lineno"><a class="line" href="../../de/de6/ruby_2ruby_8h.html#a8135e066d6b88d54a2767a6075afd10f"> 3192</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad2beb8bef45e8b6f683ffd2679384337">rb_int2inum</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a> n)</div><div class="line"><a name="l03193"></a><span class="lineno"> 3193</span> {</div><div class="line"><a name="l03194"></a><span class="lineno"> 3194</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac493d4e1ca36d6a84215aad4e6ea1b4d">FIXABLE</a>(n)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(n);</div><div class="line"><a name="l03195"></a><span class="lineno"> 3195</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(n);</div><div class="line"><a name="l03196"></a><span class="lineno"> 3196</span> }</div><div class="line"><a name="l03197"></a><span class="lineno"> 3197</span> </div><div class="line"><a name="l03198"></a><span class="lineno"> 3198</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03199"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#ad3ac9992e7f6cc6ce07ea0ee59302aa8"> 3199</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad3ac9992e7f6cc6ce07ea0ee59302aa8">rb_big_pack</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keywordtype">long</span> num_longs)</div><div class="line"><a name="l03200"></a><span class="lineno"> 3200</span> {</div><div class="line"><a name="l03201"></a><span class="lineno"> 3201</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, num_longs, <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>), 0,</div><div class="line"><a name="l03202"></a><span class="lineno"> 3202</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|<a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l03203"></a><span class="lineno"> 3203</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>);</div><div class="line"><a name="l03204"></a><span class="lineno"> 3204</span> }</div><div class="line"><a name="l03205"></a><span class="lineno"> 3205</span> </div><div class="line"><a name="l03206"></a><span class="lineno"> 3206</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03207"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#aa5376ddc40f044463d5d52d5d120e0d0"> 3207</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa5376ddc40f044463d5d52d5d120e0d0">rb_big_unpack</a>(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keywordtype">long</span> num_longs)</div><div class="line"><a name="l03208"></a><span class="lineno"> 3208</span> {</div><div class="line"><a name="l03209"></a><span class="lineno"> 3209</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f623845f4719716b70e4025508657fc">rb_integer_unpack</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, num_longs, <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>), 0,</div><div class="line"><a name="l03210"></a><span class="lineno"> 3210</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|<a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l03211"></a><span class="lineno"> 3211</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>);</div><div class="line"><a name="l03212"></a><span class="lineno"> 3212</span> }</div><div class="line"><a name="l03213"></a><span class="lineno"> 3213</span> </div><div class="line"><a name="l03214"></a><span class="lineno"> 3214</span> <span class="comment">/*</span></div><div class="line"><a name="l03215"></a><span class="lineno"> 3215</span> <span class="comment"> * Calculate the number of bytes to be required to represent</span></div><div class="line"><a name="l03216"></a><span class="lineno"> 3216</span> <span class="comment"> * the absolute value of the integer given as _val_.</span></div><div class="line"><a name="l03217"></a><span class="lineno"> 3217</span> <span class="comment"> *</span></div><div class="line"><a name="l03218"></a><span class="lineno"> 3218</span> <span class="comment"> * [val] an integer.</span></div><div class="line"><a name="l03219"></a><span class="lineno"> 3219</span> <span class="comment"> * [nlz_bits_ret] number of leading zero bits in the most significant byte is returned if not NULL.</span></div><div class="line"><a name="l03220"></a><span class="lineno"> 3220</span> <span class="comment"> *</span></div><div class="line"><a name="l03221"></a><span class="lineno"> 3221</span> <span class="comment"> * This function returns ((val_numbits * CHAR_BIT + CHAR_BIT - 1) / CHAR_BIT)</span></div><div class="line"><a name="l03222"></a><span class="lineno"> 3222</span> <span class="comment"> * where val_numbits is the number of bits of abs(val).</span></div><div class="line"><a name="l03223"></a><span class="lineno"> 3223</span> <span class="comment"> * This function should not overflow.</span></div><div class="line"><a name="l03224"></a><span class="lineno"> 3224</span> <span class="comment"> *</span></div><div class="line"><a name="l03225"></a><span class="lineno"> 3225</span> <span class="comment"> * If nlz_bits_ret is not NULL,</span></div><div class="line"><a name="l03226"></a><span class="lineno"> 3226</span> <span class="comment"> * (return_value * CHAR_BIT - val_numbits) is stored in *nlz_bits_ret.</span></div><div class="line"><a name="l03227"></a><span class="lineno"> 3227</span> <span class="comment"> * In this case, 0 <= *nlz_bits_ret < CHAR_BIT.</span></div><div class="line"><a name="l03228"></a><span class="lineno"> 3228</span> <span class="comment"> *</span></div><div class="line"><a name="l03229"></a><span class="lineno"> 3229</span> <span class="comment"> */</span></div><div class="line"><a name="l03230"></a><span class="lineno"> 3230</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l03231"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a4cd38736348907841b1dbbb04f364dd9"> 3231</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4cd38736348907841b1dbbb04f364dd9">rb_absint_size</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">int</span> *nlz_bits_ret)</div><div class="line"><a name="l03232"></a><span class="lineno"> 3232</span> {</div><div class="line"><a name="l03233"></a><span class="lineno"> 3233</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l03234"></a><span class="lineno"> 3234</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *de;</div><div class="line"><a name="l03235"></a><span class="lineno"> 3235</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> fixbuf[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<span class="keywordtype">long</span>))];</div><div class="line"><a name="l03236"></a><span class="lineno"> 3236</span> </div><div class="line"><a name="l03237"></a><span class="lineno"> 3237</span>  <span class="keywordtype">int</span> num_leading_zeros;</div><div class="line"><a name="l03238"></a><span class="lineno"> 3238</span> </div><div class="line"><a name="l03239"></a><span class="lineno"> 3239</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03240"></a><span class="lineno"> 3240</span> </div><div class="line"><a name="l03241"></a><span class="lineno"> 3241</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l03242"></a><span class="lineno"> 3242</span>  <span class="keywordtype">long</span> v = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03243"></a><span class="lineno"> 3243</span>  <span class="keywordflow">if</span> (v < 0) {</div><div class="line"><a name="l03244"></a><span class="lineno"> 3244</span>  v = -v;</div><div class="line"><a name="l03245"></a><span class="lineno"> 3245</span>  }</div><div class="line"><a name="l03246"></a><span class="lineno"> 3246</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l03247"></a><span class="lineno"> 3247</span>  fixbuf[0] = v;</div><div class="line"><a name="l03248"></a><span class="lineno"> 3248</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l03249"></a><span class="lineno"> 3249</span>  {</div><div class="line"><a name="l03250"></a><span class="lineno"> 3250</span>  <span class="keywordtype">int</span> i;</div><div class="line"><a name="l03251"></a><span class="lineno"> 3251</span>  <span class="keywordflow">for</span> (i = 0; i < <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf); i++) {</div><div class="line"><a name="l03252"></a><span class="lineno"> 3252</span>  fixbuf[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(v);</div><div class="line"><a name="l03253"></a><span class="lineno"> 3253</span>  v = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(v);</div><div class="line"><a name="l03254"></a><span class="lineno"> 3254</span>  }</div><div class="line"><a name="l03255"></a><span class="lineno"> 3255</span>  }</div><div class="line"><a name="l03256"></a><span class="lineno"> 3256</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03257"></a><span class="lineno"> 3257</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = fixbuf;</div><div class="line"><a name="l03258"></a><span class="lineno"> 3258</span>  de = fixbuf + <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf);</div><div class="line"><a name="l03259"></a><span class="lineno"> 3259</span>  }</div><div class="line"><a name="l03260"></a><span class="lineno"> 3260</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03261"></a><span class="lineno"> 3261</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03262"></a><span class="lineno"> 3262</span>  de = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03263"></a><span class="lineno"> 3263</span>  }</div><div class="line"><a name="l03264"></a><span class="lineno"> 3264</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && de[-1] == 0)</div><div class="line"><a name="l03265"></a><span class="lineno"> 3265</span>  de--;</div><div class="line"><a name="l03266"></a><span class="lineno"> 3266</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == de) {</div><div class="line"><a name="l03267"></a><span class="lineno"> 3267</span>  <span class="keywordflow">if</span> (nlz_bits_ret)</div><div class="line"><a name="l03268"></a><span class="lineno"> 3268</span>  *nlz_bits_ret = 0;</div><div class="line"><a name="l03269"></a><span class="lineno"> 3269</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l03270"></a><span class="lineno"> 3270</span>  }</div><div class="line"><a name="l03271"></a><span class="lineno"> 3271</span>  num_leading_zeros = <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(de[-1]);</div><div class="line"><a name="l03272"></a><span class="lineno"> 3272</span>  <span class="keywordflow">if</span> (nlz_bits_ret)</div><div class="line"><a name="l03273"></a><span class="lineno"> 3273</span>  *nlz_bits_ret = num_leading_zeros % <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l03274"></a><span class="lineno"> 3274</span>  <span class="keywordflow">return</span> (de - <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>) * <a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a> - num_leading_zeros / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l03275"></a><span class="lineno"> 3275</span> }</div><div class="line"><a name="l03276"></a><span class="lineno"> 3276</span> </div><div class="line"><a name="l03277"></a><span class="lineno"> 3277</span> <span class="keyword">static</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l03278"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a1f94180a8f23e1c629f236e95c227328"> 3278</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1f94180a8f23e1c629f236e95c227328">absint_numwords_small</a>(<span class="keywordtype">size_t</span> numbytes, <span class="keywordtype">int</span> nlz_bits_in_msbyte, <span class="keywordtype">size_t</span> word_numbits, <span class="keywordtype">size_t</span> *nlz_bits_ret)</div><div class="line"><a name="l03279"></a><span class="lineno"> 3279</span> {</div><div class="line"><a name="l03280"></a><span class="lineno"> 3280</span>  <span class="keywordtype">size_t</span> val_numbits = numbytes * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - nlz_bits_in_msbyte;</div><div class="line"><a name="l03281"></a><span class="lineno"> 3281</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a> = val_numbits / word_numbits;</div><div class="line"><a name="l03282"></a><span class="lineno"> 3282</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a> = val_numbits % word_numbits;</div><div class="line"><a name="l03283"></a><span class="lineno"> 3283</span>  <span class="keywordtype">size_t</span> numwords;</div><div class="line"><a name="l03284"></a><span class="lineno"> 3284</span>  <span class="keywordtype">size_t</span> nlz_bits;</div><div class="line"><a name="l03285"></a><span class="lineno"> 3285</span>  numwords = <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a> == 0 ? <a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a> : <a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a> + 1;</div><div class="line"><a name="l03286"></a><span class="lineno"> 3286</span>  nlz_bits = <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a> == 0 ? 0 : word_numbits - <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l03287"></a><span class="lineno"> 3287</span>  *nlz_bits_ret = nlz_bits;</div><div class="line"><a name="l03288"></a><span class="lineno"> 3288</span>  <span class="keywordflow">return</span> numwords;</div><div class="line"><a name="l03289"></a><span class="lineno"> 3289</span> }</div><div class="line"><a name="l03290"></a><span class="lineno"> 3290</span> </div><div class="line"><a name="l03291"></a><span class="lineno"> 3291</span> <span class="keyword">static</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l03292"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#afa8905c9338ae9d2907f6adc1ef7ceb0"> 3292</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#afa8905c9338ae9d2907f6adc1ef7ceb0">absint_numwords_generic</a>(<span class="keywordtype">size_t</span> numbytes, <span class="keywordtype">int</span> nlz_bits_in_msbyte, <span class="keywordtype">size_t</span> word_numbits, <span class="keywordtype">size_t</span> *nlz_bits_ret)</div><div class="line"><a name="l03293"></a><span class="lineno"> 3293</span> {</div><div class="line"><a name="l03294"></a><span class="lineno"> 3294</span>  <span class="keyword">static</span> <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> char_bit[1] = { <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> };</div><div class="line"><a name="l03295"></a><span class="lineno"> 3295</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> numbytes_bary[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(numbytes))];</div><div class="line"><a name="l03296"></a><span class="lineno"> 3296</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> val_numbits_bary[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(numbytes) + 1)];</div><div class="line"><a name="l03297"></a><span class="lineno"> 3297</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> nlz_bits_in_msbyte_bary[1];</div><div class="line"><a name="l03298"></a><span class="lineno"> 3298</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> word_numbits_bary[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(word_numbits))];</div><div class="line"><a name="l03299"></a><span class="lineno"> 3299</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> div_bary[<a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(val_numbits_bary) + <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a>];</div><div class="line"><a name="l03300"></a><span class="lineno"> 3300</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> mod_bary[<a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(word_numbits_bary)];</div><div class="line"><a name="l03301"></a><span class="lineno"> 3301</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> <a class="code" href="../../d9/d89/isinf_8c.html#a94762b8530d28b85e67db02b97f3ee37">one</a>[1] = { 1 };</div><div class="line"><a name="l03302"></a><span class="lineno"> 3302</span>  <span class="keywordtype">size_t</span> nlz_bits;</div><div class="line"><a name="l03303"></a><span class="lineno"> 3303</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l03304"></a><span class="lineno"> 3304</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l03305"></a><span class="lineno"> 3305</span>  <span class="keywordtype">size_t</span> numwords;</div><div class="line"><a name="l03306"></a><span class="lineno"> 3306</span> </div><div class="line"><a name="l03307"></a><span class="lineno"> 3307</span>  nlz_bits_in_msbyte_bary[0] = nlz_bits_in_msbyte;</div><div class="line"><a name="l03308"></a><span class="lineno"> 3308</span> </div><div class="line"><a name="l03309"></a><span class="lineno"> 3309</span>  <span class="comment">/*</span></div><div class="line"><a name="l03310"></a><span class="lineno"> 3310</span> <span class="comment"> * val_numbits = numbytes * CHAR_BIT - nlz_bits_in_msbyte</span></div><div class="line"><a name="l03311"></a><span class="lineno"> 3311</span> <span class="comment"> * div, mod = val_numbits.divmod(word_numbits)</span></div><div class="line"><a name="l03312"></a><span class="lineno"> 3312</span> <span class="comment"> * numwords = mod == 0 ? div : div + 1</span></div><div class="line"><a name="l03313"></a><span class="lineno"> 3313</span> <span class="comment"> * nlz_bits = mod == 0 ? 0 : word_numbits - mod</span></div><div class="line"><a name="l03314"></a><span class="lineno"> 3314</span> <span class="comment"> */</span></div><div class="line"><a name="l03315"></a><span class="lineno"> 3315</span> </div><div class="line"><a name="l03316"></a><span class="lineno"> 3316</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a">bary_unpack</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a>(numbytes_bary), &numbytes, 1, <span class="keyword">sizeof</span>(numbytes), 0,</div><div class="line"><a name="l03317"></a><span class="lineno"> 3317</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l03318"></a><span class="lineno"> 3318</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af9bebc3d4ee972ff7419afa73acb49e1">BARY_SHORT_MUL</a>(val_numbits_bary, numbytes_bary, char_bit);</div><div class="line"><a name="l03319"></a><span class="lineno"> 3319</span>  <span class="keywordflow">if</span> (nlz_bits_in_msbyte)</div><div class="line"><a name="l03320"></a><span class="lineno"> 3320</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa99de588906902bc3a4255b72254d9b1">BARY_SUB</a>(val_numbits_bary, val_numbits_bary, nlz_bits_in_msbyte_bary);</div><div class="line"><a name="l03321"></a><span class="lineno"> 3321</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a">bary_unpack</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a>(word_numbits_bary), &word_numbits, 1, <span class="keyword">sizeof</span>(word_numbits), 0,</div><div class="line"><a name="l03322"></a><span class="lineno"> 3322</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l03323"></a><span class="lineno"> 3323</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a9159c5991b021101e23d94963ce19ddd">BARY_DIVMOD</a>(div_bary, mod_bary, val_numbits_bary, word_numbits_bary);</div><div class="line"><a name="l03324"></a><span class="lineno"> 3324</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#abc18250a1bf9ee93cc6257153ded1ccc">BARY_ZERO_P</a>(mod_bary)) {</div><div class="line"><a name="l03325"></a><span class="lineno"> 3325</span>  nlz_bits = 0;</div><div class="line"><a name="l03326"></a><span class="lineno"> 3326</span>  }</div><div class="line"><a name="l03327"></a><span class="lineno"> 3327</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03328"></a><span class="lineno"> 3328</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa096f4faaf8c4a1f90e4ca68f53d28cb">BARY_ADD</a>(div_bary, div_bary, <a class="code" href="../../d9/d89/isinf_8c.html#a94762b8530d28b85e67db02b97f3ee37">one</a>);</div><div class="line"><a name="l03329"></a><span class="lineno"> 3329</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c">bary_pack</a>(+1, <a class="code" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a>(mod_bary), &<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>, 1, <span class="keyword">sizeof</span>(<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>), 0,</div><div class="line"><a name="l03330"></a><span class="lineno"> 3330</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l03331"></a><span class="lineno"> 3331</span>  nlz_bits = word_numbits - <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l03332"></a><span class="lineno"> 3332</span>  }</div><div class="line"><a name="l03333"></a><span class="lineno"> 3333</span>  sign = <a class="code" href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c">bary_pack</a>(+1, <a class="code" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a>(div_bary), &numwords, 1, <span class="keyword">sizeof</span>(numwords), 0,</div><div class="line"><a name="l03334"></a><span class="lineno"> 3334</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l03335"></a><span class="lineno"> 3335</span> </div><div class="line"><a name="l03336"></a><span class="lineno"> 3336</span>  <span class="keywordflow">if</span> (sign == 2) {</div><div class="line"><a name="l03337"></a><span class="lineno"> 3337</span> <span class="preprocessor">#if defined __GNUC__ && (__GNUC__ == 4 && __GNUC_MINOR__ == 4)</span></div><div class="line"><a name="l03338"></a><span class="lineno"> 3338</span>  *nlz_bits_ret = 0;</div><div class="line"><a name="l03339"></a><span class="lineno"> 3339</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03340"></a><span class="lineno"> 3340</span>  <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)-1;</div><div class="line"><a name="l03341"></a><span class="lineno"> 3341</span>  }</div><div class="line"><a name="l03342"></a><span class="lineno"> 3342</span>  *nlz_bits_ret = nlz_bits;</div><div class="line"><a name="l03343"></a><span class="lineno"> 3343</span>  <span class="keywordflow">return</span> numwords;</div><div class="line"><a name="l03344"></a><span class="lineno"> 3344</span> }</div><div class="line"><a name="l03345"></a><span class="lineno"> 3345</span> </div><div class="line"><a name="l03346"></a><span class="lineno"> 3346</span> <span class="comment">/*</span></div><div class="line"><a name="l03347"></a><span class="lineno"> 3347</span> <span class="comment"> * Calculate the number of words to be required to represent</span></div><div class="line"><a name="l03348"></a><span class="lineno"> 3348</span> <span class="comment"> * the absolute value of the integer given as _val_.</span></div><div class="line"><a name="l03349"></a><span class="lineno"> 3349</span> <span class="comment"> *</span></div><div class="line"><a name="l03350"></a><span class="lineno"> 3350</span> <span class="comment"> * [val] an integer.</span></div><div class="line"><a name="l03351"></a><span class="lineno"> 3351</span> <span class="comment"> * [word_numbits] number of bits in a word.</span></div><div class="line"><a name="l03352"></a><span class="lineno"> 3352</span> <span class="comment"> * [nlz_bits_ret] number of leading zero bits in the most significant word is returned if not NULL.</span></div><div class="line"><a name="l03353"></a><span class="lineno"> 3353</span> <span class="comment"> *</span></div><div class="line"><a name="l03354"></a><span class="lineno"> 3354</span> <span class="comment"> * This function returns ((val_numbits * CHAR_BIT + word_numbits - 1) / word_numbits)</span></div><div class="line"><a name="l03355"></a><span class="lineno"> 3355</span> <span class="comment"> * where val_numbits is the number of bits of abs(val).</span></div><div class="line"><a name="l03356"></a><span class="lineno"> 3356</span> <span class="comment"> *</span></div><div class="line"><a name="l03357"></a><span class="lineno"> 3357</span> <span class="comment"> * This function can overflow.</span></div><div class="line"><a name="l03358"></a><span class="lineno"> 3358</span> <span class="comment"> * When overflow occur, (size_t)-1 is returned.</span></div><div class="line"><a name="l03359"></a><span class="lineno"> 3359</span> <span class="comment"> *</span></div><div class="line"><a name="l03360"></a><span class="lineno"> 3360</span> <span class="comment"> * If nlz_bits_ret is not NULL and overflow is not occur,</span></div><div class="line"><a name="l03361"></a><span class="lineno"> 3361</span> <span class="comment"> * (return_value * word_numbits - val_numbits) is stored in *nlz_bits_ret.</span></div><div class="line"><a name="l03362"></a><span class="lineno"> 3362</span> <span class="comment"> * In this case, 0 <= *nlz_bits_ret < word_numbits.</span></div><div class="line"><a name="l03363"></a><span class="lineno"> 3363</span> <span class="comment"> *</span></div><div class="line"><a name="l03364"></a><span class="lineno"> 3364</span> <span class="comment"> */</span></div><div class="line"><a name="l03365"></a><span class="lineno"> 3365</span> <span class="keywordtype">size_t</span></div><div class="line"><a name="l03366"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a4d13f72afe245927b1eea45acde5c842"> 3366</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4d13f72afe245927b1eea45acde5c842">rb_absint_numwords</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">size_t</span> word_numbits, <span class="keywordtype">size_t</span> *nlz_bits_ret)</div><div class="line"><a name="l03367"></a><span class="lineno"> 3367</span> {</div><div class="line"><a name="l03368"></a><span class="lineno"> 3368</span>  <span class="keywordtype">size_t</span> numbytes;</div><div class="line"><a name="l03369"></a><span class="lineno"> 3369</span>  <span class="keywordtype">int</span> nlz_bits_in_msbyte;</div><div class="line"><a name="l03370"></a><span class="lineno"> 3370</span>  <span class="keywordtype">size_t</span> numwords;</div><div class="line"><a name="l03371"></a><span class="lineno"> 3371</span>  <span class="keywordtype">size_t</span> nlz_bits;</div><div class="line"><a name="l03372"></a><span class="lineno"> 3372</span> </div><div class="line"><a name="l03373"></a><span class="lineno"> 3373</span>  <span class="keywordflow">if</span> (word_numbits == 0)</div><div class="line"><a name="l03374"></a><span class="lineno"> 3374</span>  <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)-1;</div><div class="line"><a name="l03375"></a><span class="lineno"> 3375</span> </div><div class="line"><a name="l03376"></a><span class="lineno"> 3376</span>  numbytes = <a class="code" href="../../d1/dcc/bignum_8c.html#a4cd38736348907841b1dbbb04f364dd9">rb_absint_size</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &nlz_bits_in_msbyte);</div><div class="line"><a name="l03377"></a><span class="lineno"> 3377</span> </div><div class="line"><a name="l03378"></a><span class="lineno"> 3378</span>  <span class="keywordflow">if</span> (numbytes <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c75bb398badb69c7577b21486f9963f">SIZE_MAX</a> / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>) {</div><div class="line"><a name="l03379"></a><span class="lineno"> 3379</span>  numwords = <a class="code" href="../../d1/dcc/bignum_8c.html#a1f94180a8f23e1c629f236e95c227328">absint_numwords_small</a>(numbytes, nlz_bits_in_msbyte, word_numbits, &nlz_bits);</div><div class="line"><a name="l03380"></a><span class="lineno"> 3380</span> <span class="preprocessor">#ifdef DEBUG_INTEGER_PACK</span></div><div class="line"><a name="l03381"></a><span class="lineno"> 3381</span>  {</div><div class="line"><a name="l03382"></a><span class="lineno"> 3382</span>  <span class="keywordtype">size_t</span> numwords0, nlz_bits0;</div><div class="line"><a name="l03383"></a><span class="lineno"> 3383</span>  numwords0 = <a class="code" href="../../d1/dcc/bignum_8c.html#afa8905c9338ae9d2907f6adc1ef7ceb0">absint_numwords_generic</a>(numbytes, nlz_bits_in_msbyte, word_numbits, &nlz_bits0);</div><div class="line"><a name="l03384"></a><span class="lineno"> 3384</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(numwords0 == numwords);</div><div class="line"><a name="l03385"></a><span class="lineno"> 3385</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(nlz_bits0 == nlz_bits);</div><div class="line"><a name="l03386"></a><span class="lineno"> 3386</span>  }</div><div class="line"><a name="l03387"></a><span class="lineno"> 3387</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03388"></a><span class="lineno"> 3388</span>  }</div><div class="line"><a name="l03389"></a><span class="lineno"> 3389</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03390"></a><span class="lineno"> 3390</span>  numwords = <a class="code" href="../../d1/dcc/bignum_8c.html#afa8905c9338ae9d2907f6adc1ef7ceb0">absint_numwords_generic</a>(numbytes, nlz_bits_in_msbyte, word_numbits, &nlz_bits);</div><div class="line"><a name="l03391"></a><span class="lineno"> 3391</span>  }</div><div class="line"><a name="l03392"></a><span class="lineno"> 3392</span>  <span class="keywordflow">if</span> (numwords == (<span class="keywordtype">size_t</span>)-1)</div><div class="line"><a name="l03393"></a><span class="lineno"> 3393</span>  <span class="keywordflow">return</span> numwords;</div><div class="line"><a name="l03394"></a><span class="lineno"> 3394</span> </div><div class="line"><a name="l03395"></a><span class="lineno"> 3395</span>  <span class="keywordflow">if</span> (nlz_bits_ret)</div><div class="line"><a name="l03396"></a><span class="lineno"> 3396</span>  *nlz_bits_ret = nlz_bits;</div><div class="line"><a name="l03397"></a><span class="lineno"> 3397</span> </div><div class="line"><a name="l03398"></a><span class="lineno"> 3398</span>  <span class="keywordflow">return</span> numwords;</div><div class="line"><a name="l03399"></a><span class="lineno"> 3399</span> }</div><div class="line"><a name="l03400"></a><span class="lineno"> 3400</span> </div><div class="line"><a name="l03401"></a><span class="lineno"> 3401</span> <span class="comment">/* Test abs(val) consists only a bit or not.</span></div><div class="line"><a name="l03402"></a><span class="lineno"> 3402</span> <span class="comment"> *</span></div><div class="line"><a name="l03403"></a><span class="lineno"> 3403</span> <span class="comment"> * Returns 1 if abs(val) == 1 << n for some n >= 0.</span></div><div class="line"><a name="l03404"></a><span class="lineno"> 3404</span> <span class="comment"> * Returns 0 otherwise.</span></div><div class="line"><a name="l03405"></a><span class="lineno"> 3405</span> <span class="comment"> *</span></div><div class="line"><a name="l03406"></a><span class="lineno"> 3406</span> <span class="comment"> * rb_absint_singlebit_p can be used to determine required buffer size</span></div><div class="line"><a name="l03407"></a><span class="lineno"> 3407</span> <span class="comment"> * for rb_integer_pack used with INTEGER_PACK_2COMP (two's complement).</span></div><div class="line"><a name="l03408"></a><span class="lineno"> 3408</span> <span class="comment"> *</span></div><div class="line"><a name="l03409"></a><span class="lineno"> 3409</span> <span class="comment"> * Following example calculates number of bits required to</span></div><div class="line"><a name="l03410"></a><span class="lineno"> 3410</span> <span class="comment"> * represent val in two's complement number, without sign bit.</span></div><div class="line"><a name="l03411"></a><span class="lineno"> 3411</span> <span class="comment"> *</span></div><div class="line"><a name="l03412"></a><span class="lineno"> 3412</span> <span class="comment"> * size_t size;</span></div><div class="line"><a name="l03413"></a><span class="lineno"> 3413</span> <span class="comment"> * int neg = FIXNUM_P(val) ? FIX2LONG(val) < 0 : RBIGNUM_NEGATIVE_P(val);</span></div><div class="line"><a name="l03414"></a><span class="lineno"> 3414</span> <span class="comment"> * size = rb_absint_numwords(val, 1, NULL)</span></div><div class="line"><a name="l03415"></a><span class="lineno"> 3415</span> <span class="comment"> * if (size == (size_t)-1) ...overflow...</span></div><div class="line"><a name="l03416"></a><span class="lineno"> 3416</span> <span class="comment"> * if (neg && rb_absint_singlebit_p(val))</span></div><div class="line"><a name="l03417"></a><span class="lineno"> 3417</span> <span class="comment"> * size--;</span></div><div class="line"><a name="l03418"></a><span class="lineno"> 3418</span> <span class="comment"> *</span></div><div class="line"><a name="l03419"></a><span class="lineno"> 3419</span> <span class="comment"> * Following example calculates number of bytes required to</span></div><div class="line"><a name="l03420"></a><span class="lineno"> 3420</span> <span class="comment"> * represent val in two's complement number, with sign bit.</span></div><div class="line"><a name="l03421"></a><span class="lineno"> 3421</span> <span class="comment"> *</span></div><div class="line"><a name="l03422"></a><span class="lineno"> 3422</span> <span class="comment"> * size_t size;</span></div><div class="line"><a name="l03423"></a><span class="lineno"> 3423</span> <span class="comment"> * int neg = FIXNUM_P(val) ? FIX2LONG(val) < 0 : RBIGNUM_NEGATIVE_P(val);</span></div><div class="line"><a name="l03424"></a><span class="lineno"> 3424</span> <span class="comment"> * int nlz_bits;</span></div><div class="line"><a name="l03425"></a><span class="lineno"> 3425</span> <span class="comment"> * size = rb_absint_size(val, &nlz_bits);</span></div><div class="line"><a name="l03426"></a><span class="lineno"> 3426</span> <span class="comment"> * if (nlz_bits == 0 && !(neg && rb_absint_singlebit_p(val)))</span></div><div class="line"><a name="l03427"></a><span class="lineno"> 3427</span> <span class="comment"> * size++;</span></div><div class="line"><a name="l03428"></a><span class="lineno"> 3428</span> <span class="comment"> */</span></div><div class="line"><a name="l03429"></a><span class="lineno"> 3429</span> <span class="keywordtype">int</span></div><div class="line"><a name="l03430"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a4f08843e5ca09928e87c98ce46db02b8"> 3430</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f08843e5ca09928e87c98ce46db02b8">rb_absint_singlebit_p</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l03431"></a><span class="lineno"> 3431</span> {</div><div class="line"><a name="l03432"></a><span class="lineno"> 3432</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l03433"></a><span class="lineno"> 3433</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *de;</div><div class="line"><a name="l03434"></a><span class="lineno"> 3434</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> fixbuf[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<span class="keywordtype">long</span>))];</div><div class="line"><a name="l03435"></a><span class="lineno"> 3435</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> d;</div><div class="line"><a name="l03436"></a><span class="lineno"> 3436</span> </div><div class="line"><a name="l03437"></a><span class="lineno"> 3437</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03438"></a><span class="lineno"> 3438</span> </div><div class="line"><a name="l03439"></a><span class="lineno"> 3439</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l03440"></a><span class="lineno"> 3440</span>  <span class="keywordtype">long</span> v = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03441"></a><span class="lineno"> 3441</span>  <span class="keywordflow">if</span> (v < 0) {</div><div class="line"><a name="l03442"></a><span class="lineno"> 3442</span>  v = -v;</div><div class="line"><a name="l03443"></a><span class="lineno"> 3443</span>  }</div><div class="line"><a name="l03444"></a><span class="lineno"> 3444</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l03445"></a><span class="lineno"> 3445</span>  fixbuf[0] = v;</div><div class="line"><a name="l03446"></a><span class="lineno"> 3446</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l03447"></a><span class="lineno"> 3447</span>  {</div><div class="line"><a name="l03448"></a><span class="lineno"> 3448</span>  <span class="keywordtype">int</span> i;</div><div class="line"><a name="l03449"></a><span class="lineno"> 3449</span>  <span class="keywordflow">for</span> (i = 0; i < <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf); i++) {</div><div class="line"><a name="l03450"></a><span class="lineno"> 3450</span>  fixbuf[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(v);</div><div class="line"><a name="l03451"></a><span class="lineno"> 3451</span>  v = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(v);</div><div class="line"><a name="l03452"></a><span class="lineno"> 3452</span>  }</div><div class="line"><a name="l03453"></a><span class="lineno"> 3453</span>  }</div><div class="line"><a name="l03454"></a><span class="lineno"> 3454</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03455"></a><span class="lineno"> 3455</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = fixbuf;</div><div class="line"><a name="l03456"></a><span class="lineno"> 3456</span>  de = fixbuf + <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf);</div><div class="line"><a name="l03457"></a><span class="lineno"> 3457</span>  }</div><div class="line"><a name="l03458"></a><span class="lineno"> 3458</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03459"></a><span class="lineno"> 3459</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03460"></a><span class="lineno"> 3460</span>  de = <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> + <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03461"></a><span class="lineno"> 3461</span>  }</div><div class="line"><a name="l03462"></a><span class="lineno"> 3462</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && de[-1] == 0)</div><div class="line"><a name="l03463"></a><span class="lineno"> 3463</span>  de--;</div><div class="line"><a name="l03464"></a><span class="lineno"> 3464</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> < de && <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>[0] == 0)</div><div class="line"><a name="l03465"></a><span class="lineno"> 3465</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++;</div><div class="line"><a name="l03466"></a><span class="lineno"> 3466</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> == de) <span class="comment">/* no bit set. */</span></div><div class="line"><a name="l03467"></a><span class="lineno"> 3467</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l03468"></a><span class="lineno"> 3468</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> != de-1) <span class="comment">/* two non-zero words. two bits set, at least. */</span></div><div class="line"><a name="l03469"></a><span class="lineno"> 3469</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l03470"></a><span class="lineno"> 3470</span>  d = *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l03471"></a><span class="lineno"> 3471</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(d);</div><div class="line"><a name="l03472"></a><span class="lineno"> 3472</span> }</div><div class="line"><a name="l03473"></a><span class="lineno"> 3473</span> </div><div class="line"><a name="l03474"></a><span class="lineno"> 3474</span> </div><div class="line"><a name="l03475"></a><span class="lineno"> 3475</span> <span class="comment">/*</span></div><div class="line"><a name="l03476"></a><span class="lineno"> 3476</span> <span class="comment"> * Export an integer into a buffer.</span></div><div class="line"><a name="l03477"></a><span class="lineno"> 3477</span> <span class="comment"> *</span></div><div class="line"><a name="l03478"></a><span class="lineno"> 3478</span> <span class="comment"> * This function fills the buffer specified by _words_ and _numwords_ as</span></div><div class="line"><a name="l03479"></a><span class="lineno"> 3479</span> <span class="comment"> * val in the format specified by _wordsize_, _nails_ and _flags_.</span></div><div class="line"><a name="l03480"></a><span class="lineno"> 3480</span> <span class="comment"> *</span></div><div class="line"><a name="l03481"></a><span class="lineno"> 3481</span> <span class="comment"> * [val] Fixnum, Bignum or another integer like object which has to_int method.</span></div><div class="line"><a name="l03482"></a><span class="lineno"> 3482</span> <span class="comment"> * [words] buffer to export abs(val).</span></div><div class="line"><a name="l03483"></a><span class="lineno"> 3483</span> <span class="comment"> * [numwords] the size of given buffer as number of words.</span></div><div class="line"><a name="l03484"></a><span class="lineno"> 3484</span> <span class="comment"> * [wordsize] the size of word as number of bytes.</span></div><div class="line"><a name="l03485"></a><span class="lineno"> 3485</span> <span class="comment"> * [nails] number of padding bits in a word.</span></div><div class="line"><a name="l03486"></a><span class="lineno"> 3486</span> <span class="comment"> * Most significant nails bits of each word are filled by zero.</span></div><div class="line"><a name="l03487"></a><span class="lineno"> 3487</span> <span class="comment"> * [flags] bitwise or of constants which name starts "INTEGER_PACK_".</span></div><div class="line"><a name="l03488"></a><span class="lineno"> 3488</span> <span class="comment"> *</span></div><div class="line"><a name="l03489"></a><span class="lineno"> 3489</span> <span class="comment"> * flags:</span></div><div class="line"><a name="l03490"></a><span class="lineno"> 3490</span> <span class="comment"> * [INTEGER_PACK_MSWORD_FIRST] Store the most significant word as the first word.</span></div><div class="line"><a name="l03491"></a><span class="lineno"> 3491</span> <span class="comment"> * [INTEGER_PACK_LSWORD_FIRST] Store the least significant word as the first word.</span></div><div class="line"><a name="l03492"></a><span class="lineno"> 3492</span> <span class="comment"> * [INTEGER_PACK_MSBYTE_FIRST] Store the most significant byte in a word as the first byte in the word.</span></div><div class="line"><a name="l03493"></a><span class="lineno"> 3493</span> <span class="comment"> * [INTEGER_PACK_LSBYTE_FIRST] Store the least significant byte in a word as the first byte in the word.</span></div><div class="line"><a name="l03494"></a><span class="lineno"> 3494</span> <span class="comment"> * [INTEGER_PACK_NATIVE_BYTE_ORDER] INTEGER_PACK_MSBYTE_FIRST or INTEGER_PACK_LSBYTE_FIRST corresponding to the host's endian.</span></div><div class="line"><a name="l03495"></a><span class="lineno"> 3495</span> <span class="comment"> * [INTEGER_PACK_2COMP] Use 2's complement representation.</span></div><div class="line"><a name="l03496"></a><span class="lineno"> 3496</span> <span class="comment"> * [INTEGER_PACK_LITTLE_ENDIAN] Same as INTEGER_PACK_LSWORD_FIRST|INTEGER_PACK_LSBYTE_FIRST</span></div><div class="line"><a name="l03497"></a><span class="lineno"> 3497</span> <span class="comment"> * [INTEGER_PACK_BIG_ENDIAN] Same as INTEGER_PACK_MSWORD_FIRST|INTEGER_PACK_MSBYTE_FIRST</span></div><div class="line"><a name="l03498"></a><span class="lineno"> 3498</span> <span class="comment"> * [INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION] Use generic implementation (for test and debug).</span></div><div class="line"><a name="l03499"></a><span class="lineno"> 3499</span> <span class="comment"> *</span></div><div class="line"><a name="l03500"></a><span class="lineno"> 3500</span> <span class="comment"> * This function fills the buffer specified by _words_</span></div><div class="line"><a name="l03501"></a><span class="lineno"> 3501</span> <span class="comment"> * as abs(val) if INTEGER_PACK_2COMP is not specified in _flags_.</span></div><div class="line"><a name="l03502"></a><span class="lineno"> 3502</span> <span class="comment"> * If INTEGER_PACK_2COMP is specified, 2's complement representation of val is</span></div><div class="line"><a name="l03503"></a><span class="lineno"> 3503</span> <span class="comment"> * filled in the buffer.</span></div><div class="line"><a name="l03504"></a><span class="lineno"> 3504</span> <span class="comment"> *</span></div><div class="line"><a name="l03505"></a><span class="lineno"> 3505</span> <span class="comment"> * This function returns the signedness and overflow condition.</span></div><div class="line"><a name="l03506"></a><span class="lineno"> 3506</span> <span class="comment"> * The overflow condition depends on INTEGER_PACK_2COMP.</span></div><div class="line"><a name="l03507"></a><span class="lineno"> 3507</span> <span class="comment"> *</span></div><div class="line"><a name="l03508"></a><span class="lineno"> 3508</span> <span class="comment"> * INTEGER_PACK_2COMP is not specified:</span></div><div class="line"><a name="l03509"></a><span class="lineno"> 3509</span> <span class="comment"> * -2 : negative overflow. val <= -2**(numwords*(wordsize*CHAR_BIT-nails))</span></div><div class="line"><a name="l03510"></a><span class="lineno"> 3510</span> <span class="comment"> * -1 : negative without overflow. -2**(numwords*(wordsize*CHAR_BIT-nails)) < val < 0</span></div><div class="line"><a name="l03511"></a><span class="lineno"> 3511</span> <span class="comment"> * 0 : zero. val == 0</span></div><div class="line"><a name="l03512"></a><span class="lineno"> 3512</span> <span class="comment"> * 1 : positive without overflow. 0 < val < 2**(numwords*(wordsize*CHAR_BIT-nails))</span></div><div class="line"><a name="l03513"></a><span class="lineno"> 3513</span> <span class="comment"> * 2 : positive overflow. 2**(numwords*(wordsize*CHAR_BIT-nails)) <= val</span></div><div class="line"><a name="l03514"></a><span class="lineno"> 3514</span> <span class="comment"> *</span></div><div class="line"><a name="l03515"></a><span class="lineno"> 3515</span> <span class="comment"> * INTEGER_PACK_2COMP is specified:</span></div><div class="line"><a name="l03516"></a><span class="lineno"> 3516</span> <span class="comment"> * -2 : negative overflow. val < -2**(numwords*(wordsize*CHAR_BIT-nails))</span></div><div class="line"><a name="l03517"></a><span class="lineno"> 3517</span> <span class="comment"> * -1 : negative without overflow. -2**(numwords*(wordsize*CHAR_BIT-nails)) <= val < 0</span></div><div class="line"><a name="l03518"></a><span class="lineno"> 3518</span> <span class="comment"> * 0 : zero. val == 0</span></div><div class="line"><a name="l03519"></a><span class="lineno"> 3519</span> <span class="comment"> * 1 : positive without overflow. 0 < val < 2**(numwords*(wordsize*CHAR_BIT-nails))</span></div><div class="line"><a name="l03520"></a><span class="lineno"> 3520</span> <span class="comment"> * 2 : positive overflow. 2**(numwords*(wordsize*CHAR_BIT-nails)) <= val</span></div><div class="line"><a name="l03521"></a><span class="lineno"> 3521</span> <span class="comment"> *</span></div><div class="line"><a name="l03522"></a><span class="lineno"> 3522</span> <span class="comment"> * The value, -2**(numwords*(wordsize*CHAR_BIT-nails)), is representable</span></div><div class="line"><a name="l03523"></a><span class="lineno"> 3523</span> <span class="comment"> * in 2's complement representation but not representable in absolute value.</span></div><div class="line"><a name="l03524"></a><span class="lineno"> 3524</span> <span class="comment"> * So -1 is returned for the value if INTEGER_PACK_2COMP is specified</span></div><div class="line"><a name="l03525"></a><span class="lineno"> 3525</span> <span class="comment"> * but returns -2 if INTEGER_PACK_2COMP is not specified.</span></div><div class="line"><a name="l03526"></a><span class="lineno"> 3526</span> <span class="comment"> *</span></div><div class="line"><a name="l03527"></a><span class="lineno"> 3527</span> <span class="comment"> * The least significant words are filled in the buffer when overflow occur.</span></div><div class="line"><a name="l03528"></a><span class="lineno"> 3528</span> <span class="comment"> */</span></div><div class="line"><a name="l03529"></a><span class="lineno"> 3529</span> </div><div class="line"><a name="l03530"></a><span class="lineno"> 3530</span> <span class="keywordtype">int</span></div><div class="line"><a name="l03531"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a01dccb3f948adab23275722f384ff5ed"> 3531</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">void</span> *words, <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags)</div><div class="line"><a name="l03532"></a><span class="lineno"> 3532</span> {</div><div class="line"><a name="l03533"></a><span class="lineno"> 3533</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l03534"></a><span class="lineno"> 3534</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds;</div><div class="line"><a name="l03535"></a><span class="lineno"> 3535</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l03536"></a><span class="lineno"> 3536</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> fixbuf[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<span class="keywordtype">long</span>))];</div><div class="line"><a name="l03537"></a><span class="lineno"> 3537</span> </div><div class="line"><a name="l03538"></a><span class="lineno"> 3538</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) = <a class="code" href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03539"></a><span class="lineno"> 3539</span> </div><div class="line"><a name="l03540"></a><span class="lineno"> 3540</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l03541"></a><span class="lineno"> 3541</span>  <span class="keywordtype">long</span> v = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03542"></a><span class="lineno"> 3542</span>  <span class="keywordflow">if</span> (v < 0) {</div><div class="line"><a name="l03543"></a><span class="lineno"> 3543</span>  sign = -1;</div><div class="line"><a name="l03544"></a><span class="lineno"> 3544</span>  v = -v;</div><div class="line"><a name="l03545"></a><span class="lineno"> 3545</span>  }</div><div class="line"><a name="l03546"></a><span class="lineno"> 3546</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03547"></a><span class="lineno"> 3547</span>  sign = 1;</div><div class="line"><a name="l03548"></a><span class="lineno"> 3548</span>  }</div><div class="line"><a name="l03549"></a><span class="lineno"> 3549</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l03550"></a><span class="lineno"> 3550</span>  fixbuf[0] = v;</div><div class="line"><a name="l03551"></a><span class="lineno"> 3551</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l03552"></a><span class="lineno"> 3552</span>  {</div><div class="line"><a name="l03553"></a><span class="lineno"> 3553</span>  <span class="keywordtype">int</span> i;</div><div class="line"><a name="l03554"></a><span class="lineno"> 3554</span>  <span class="keywordflow">for</span> (i = 0; i < <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf); i++) {</div><div class="line"><a name="l03555"></a><span class="lineno"> 3555</span>  fixbuf[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(v);</div><div class="line"><a name="l03556"></a><span class="lineno"> 3556</span>  v = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(v);</div><div class="line"><a name="l03557"></a><span class="lineno"> 3557</span>  }</div><div class="line"><a name="l03558"></a><span class="lineno"> 3558</span>  }</div><div class="line"><a name="l03559"></a><span class="lineno"> 3559</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03560"></a><span class="lineno"> 3560</span>  ds = fixbuf;</div><div class="line"><a name="l03561"></a><span class="lineno"> 3561</span>  num_bdigits = <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf);</div><div class="line"><a name="l03562"></a><span class="lineno"> 3562</span>  }</div><div class="line"><a name="l03563"></a><span class="lineno"> 3563</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03564"></a><span class="lineno"> 3564</span>  sign = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) ? 1 : -1;</div><div class="line"><a name="l03565"></a><span class="lineno"> 3565</span>  ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03566"></a><span class="lineno"> 3566</span>  num_bdigits = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03567"></a><span class="lineno"> 3567</span>  }</div><div class="line"><a name="l03568"></a><span class="lineno"> 3568</span> </div><div class="line"><a name="l03569"></a><span class="lineno"> 3569</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c">bary_pack</a>(sign, ds, num_bdigits, words, numwords, wordsize, nails, flags);</div><div class="line"><a name="l03570"></a><span class="lineno"> 3570</span> }</div><div class="line"><a name="l03571"></a><span class="lineno"> 3571</span> </div><div class="line"><a name="l03572"></a><span class="lineno"> 3572</span> <span class="comment">/*</span></div><div class="line"><a name="l03573"></a><span class="lineno"> 3573</span> <span class="comment"> * Import an integer into a buffer.</span></div><div class="line"><a name="l03574"></a><span class="lineno"> 3574</span> <span class="comment"> *</span></div><div class="line"><a name="l03575"></a><span class="lineno"> 3575</span> <span class="comment"> * [words] buffer to import.</span></div><div class="line"><a name="l03576"></a><span class="lineno"> 3576</span> <span class="comment"> * [numwords] the size of given buffer as number of words.</span></div><div class="line"><a name="l03577"></a><span class="lineno"> 3577</span> <span class="comment"> * [wordsize] the size of word as number of bytes.</span></div><div class="line"><a name="l03578"></a><span class="lineno"> 3578</span> <span class="comment"> * [nails] number of padding bits in a word.</span></div><div class="line"><a name="l03579"></a><span class="lineno"> 3579</span> <span class="comment"> * Most significant nails bits of each word are ignored.</span></div><div class="line"><a name="l03580"></a><span class="lineno"> 3580</span> <span class="comment"> * [flags] bitwise or of constants which name starts "INTEGER_PACK_".</span></div><div class="line"><a name="l03581"></a><span class="lineno"> 3581</span> <span class="comment"> *</span></div><div class="line"><a name="l03582"></a><span class="lineno"> 3582</span> <span class="comment"> * flags:</span></div><div class="line"><a name="l03583"></a><span class="lineno"> 3583</span> <span class="comment"> * [INTEGER_PACK_MSWORD_FIRST] Interpret the first word as the most significant word.</span></div><div class="line"><a name="l03584"></a><span class="lineno"> 3584</span> <span class="comment"> * [INTEGER_PACK_LSWORD_FIRST] Interpret the first word as the least significant word.</span></div><div class="line"><a name="l03585"></a><span class="lineno"> 3585</span> <span class="comment"> * [INTEGER_PACK_MSBYTE_FIRST] Interpret the first byte in a word as the most significant byte in the word.</span></div><div class="line"><a name="l03586"></a><span class="lineno"> 3586</span> <span class="comment"> * [INTEGER_PACK_LSBYTE_FIRST] Interpret the first byte in a word as the least significant byte in the word.</span></div><div class="line"><a name="l03587"></a><span class="lineno"> 3587</span> <span class="comment"> * [INTEGER_PACK_NATIVE_BYTE_ORDER] INTEGER_PACK_MSBYTE_FIRST or INTEGER_PACK_LSBYTE_FIRST corresponding to the host's endian.</span></div><div class="line"><a name="l03588"></a><span class="lineno"> 3588</span> <span class="comment"> * [INTEGER_PACK_2COMP] Use 2's complement representation.</span></div><div class="line"><a name="l03589"></a><span class="lineno"> 3589</span> <span class="comment"> * [INTEGER_PACK_LITTLE_ENDIAN] Same as INTEGER_PACK_LSWORD_FIRST|INTEGER_PACK_LSBYTE_FIRST</span></div><div class="line"><a name="l03590"></a><span class="lineno"> 3590</span> <span class="comment"> * [INTEGER_PACK_BIG_ENDIAN] Same as INTEGER_PACK_MSWORD_FIRST|INTEGER_PACK_MSBYTE_FIRST</span></div><div class="line"><a name="l03591"></a><span class="lineno"> 3591</span> <span class="comment"> * [INTEGER_PACK_FORCE_BIGNUM] the result will be a Bignum</span></div><div class="line"><a name="l03592"></a><span class="lineno"> 3592</span> <span class="comment"> * even if it is representable as a Fixnum.</span></div><div class="line"><a name="l03593"></a><span class="lineno"> 3593</span> <span class="comment"> * [INTEGER_PACK_NEGATIVE] Returns non-positive value.</span></div><div class="line"><a name="l03594"></a><span class="lineno"> 3594</span> <span class="comment"> * (Returns non-negative value if not specified.)</span></div><div class="line"><a name="l03595"></a><span class="lineno"> 3595</span> <span class="comment"> * [INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION] Use generic implementation (for test and debug).</span></div><div class="line"><a name="l03596"></a><span class="lineno"> 3596</span> <span class="comment"> *</span></div><div class="line"><a name="l03597"></a><span class="lineno"> 3597</span> <span class="comment"> * This function returns the imported integer as Fixnum or Bignum.</span></div><div class="line"><a name="l03598"></a><span class="lineno"> 3598</span> <span class="comment"> *</span></div><div class="line"><a name="l03599"></a><span class="lineno"> 3599</span> <span class="comment"> * The range of the result value depends on INTEGER_PACK_2COMP and INTEGER_PACK_NEGATIVE.</span></div><div class="line"><a name="l03600"></a><span class="lineno"> 3600</span> <span class="comment"> *</span></div><div class="line"><a name="l03601"></a><span class="lineno"> 3601</span> <span class="comment"> * INTEGER_PACK_2COMP is not set:</span></div><div class="line"><a name="l03602"></a><span class="lineno"> 3602</span> <span class="comment"> * 0 <= val < 2**(numwords*(wordsize*CHAR_BIT-nails)) if !INTEGER_PACK_NEGATIVE</span></div><div class="line"><a name="l03603"></a><span class="lineno"> 3603</span> <span class="comment"> * -2**(numwords*(wordsize*CHAR_BIT-nails)) < val <= 0 if INTEGER_PACK_NEGATIVE</span></div><div class="line"><a name="l03604"></a><span class="lineno"> 3604</span> <span class="comment"> *</span></div><div class="line"><a name="l03605"></a><span class="lineno"> 3605</span> <span class="comment"> * INTEGER_PACK_2COMP is set:</span></div><div class="line"><a name="l03606"></a><span class="lineno"> 3606</span> <span class="comment"> * -2**(numwords*(wordsize*CHAR_BIT-nails)-1) <= val <= 2**(numwords*(wordsize*CHAR_BIT-nails)-1)-1 if !INTEGER_PACK_NEGATIVE</span></div><div class="line"><a name="l03607"></a><span class="lineno"> 3607</span> <span class="comment"> * -2**(numwords*(wordsize*CHAR_BIT-nails)) <= val <= -1 if INTEGER_PACK_NEGATIVE</span></div><div class="line"><a name="l03608"></a><span class="lineno"> 3608</span> <span class="comment"> *</span></div><div class="line"><a name="l03609"></a><span class="lineno"> 3609</span> <span class="comment"> * INTEGER_PACK_2COMP without INTEGER_PACK_NEGATIVE means sign extension.</span></div><div class="line"><a name="l03610"></a><span class="lineno"> 3610</span> <span class="comment"> * INTEGER_PACK_2COMP with INTEGER_PACK_NEGATIVE mean assuming the higher bits are 1.</span></div><div class="line"><a name="l03611"></a><span class="lineno"> 3611</span> <span class="comment"> *</span></div><div class="line"><a name="l03612"></a><span class="lineno"> 3612</span> <span class="comment"> * Note that this function returns 0 when numwords is zero and</span></div><div class="line"><a name="l03613"></a><span class="lineno"> 3613</span> <span class="comment"> * INTEGER_PACK_2COMP is set but INTEGER_PACK_NEGATIVE is not set.</span></div><div class="line"><a name="l03614"></a><span class="lineno"> 3614</span> <span class="comment"> */</span></div><div class="line"><a name="l03615"></a><span class="lineno"> 3615</span> </div><div class="line"><a name="l03616"></a><span class="lineno"> 3616</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03617"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a4f623845f4719716b70e4025508657fc"> 3617</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f623845f4719716b70e4025508657fc">rb_integer_unpack</a>(<span class="keyword">const</span> <span class="keywordtype">void</span> *words, <span class="keywordtype">size_t</span> numwords, <span class="keywordtype">size_t</span> wordsize, <span class="keywordtype">size_t</span> nails, <span class="keywordtype">int</span> flags)</div><div class="line"><a name="l03618"></a><span class="lineno"> 3618</span> {</div><div class="line"><a name="l03619"></a><span class="lineno"> 3619</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l03620"></a><span class="lineno"> 3620</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l03621"></a><span class="lineno"> 3621</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l03622"></a><span class="lineno"> 3622</span>  <span class="keywordtype">int</span> nlp_bits;</div><div class="line"><a name="l03623"></a><span class="lineno"> 3623</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds;</div><div class="line"><a name="l03624"></a><span class="lineno"> 3624</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> fixbuf[2] = { 0, 0 };</div><div class="line"><a name="l03625"></a><span class="lineno"> 3625</span> </div><div class="line"><a name="l03626"></a><span class="lineno"> 3626</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17">validate_integer_pack_format</a>(numwords, wordsize, nails, flags,</div><div class="line"><a name="l03627"></a><span class="lineno"> 3627</span>  <a class="code" href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a>|</div><div class="line"><a name="l03628"></a><span class="lineno"> 3628</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|</div><div class="line"><a name="l03629"></a><span class="lineno"> 3629</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a>|</div><div class="line"><a name="l03630"></a><span class="lineno"> 3630</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a>|</div><div class="line"><a name="l03631"></a><span class="lineno"> 3631</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l03632"></a><span class="lineno"> 3632</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>|</div><div class="line"><a name="l03633"></a><span class="lineno"> 3633</span>  <a class="code" href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a>|</div><div class="line"><a name="l03634"></a><span class="lineno"> 3634</span>  <a class="code" href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a>|</div><div class="line"><a name="l03635"></a><span class="lineno"> 3635</span>  <a class="code" href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a>);</div><div class="line"><a name="l03636"></a><span class="lineno"> 3636</span> </div><div class="line"><a name="l03637"></a><span class="lineno"> 3637</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#ae554715ea3772fa4b2af1d9f76c198b7">integer_unpack_num_bdigits</a>(numwords, wordsize, nails, &nlp_bits);</div><div class="line"><a name="l03638"></a><span class="lineno"> 3638</span> </div><div class="line"><a name="l03639"></a><span class="lineno"> 3639</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>-1 < num_bdigits)</div><div class="line"><a name="l03640"></a><span class="lineno"> 3640</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big to unpack as an integer"</span>);</div><div class="line"><a name="l03641"></a><span class="lineno"> 3641</span>  <span class="keywordflow">if</span> (num_bdigits <= <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf) && !(flags & <a class="code" href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a>)) {</div><div class="line"><a name="l03642"></a><span class="lineno"> 3642</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l03643"></a><span class="lineno"> 3643</span>  ds = fixbuf;</div><div class="line"><a name="l03644"></a><span class="lineno"> 3644</span>  }</div><div class="line"><a name="l03645"></a><span class="lineno"> 3645</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03646"></a><span class="lineno"> 3646</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>((<span class="keywordtype">long</span>)num_bdigits, 0);</div><div class="line"><a name="l03647"></a><span class="lineno"> 3647</span>  ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03648"></a><span class="lineno"> 3648</span>  }</div><div class="line"><a name="l03649"></a><span class="lineno"> 3649</span>  sign = <a class="code" href="../../d1/dcc/bignum_8c.html#a91cc142dc6d521f1734348f40bf5d4cb">bary_unpack_internal</a>(ds, num_bdigits, words, numwords, wordsize, nails, flags, nlp_bits);</div><div class="line"><a name="l03650"></a><span class="lineno"> 3650</span> </div><div class="line"><a name="l03651"></a><span class="lineno"> 3651</span>  <span class="keywordflow">if</span> (sign == -2) {</div><div class="line"><a name="l03652"></a><span class="lineno"> 3652</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) {</div><div class="line"><a name="l03653"></a><span class="lineno"> 3653</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4">big_extend_carry</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03654"></a><span class="lineno"> 3654</span>  }</div><div class="line"><a name="l03655"></a><span class="lineno"> 3655</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (num_bdigits == <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(fixbuf)) {</div><div class="line"><a name="l03656"></a><span class="lineno"> 3656</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>((<span class="keywordtype">long</span>)num_bdigits+1, 0);</div><div class="line"><a name="l03657"></a><span class="lineno"> 3657</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>), fixbuf, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, num_bdigits);</div><div class="line"><a name="l03658"></a><span class="lineno"> 3658</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)[num_bdigits++] = 1;</div><div class="line"><a name="l03659"></a><span class="lineno"> 3659</span>  }</div><div class="line"><a name="l03660"></a><span class="lineno"> 3660</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03661"></a><span class="lineno"> 3661</span>  ds[num_bdigits++] = 1;</div><div class="line"><a name="l03662"></a><span class="lineno"> 3662</span>  }</div><div class="line"><a name="l03663"></a><span class="lineno"> 3663</span>  }</div><div class="line"><a name="l03664"></a><span class="lineno"> 3664</span> </div><div class="line"><a name="l03665"></a><span class="lineno"> 3665</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) {</div><div class="line"><a name="l03666"></a><span class="lineno"> 3666</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> u = fixbuf[0] + <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(fixbuf[1]);</div><div class="line"><a name="l03667"></a><span class="lineno"> 3667</span>  <span class="keywordflow">if</span> (u == 0)</div><div class="line"><a name="l03668"></a><span class="lineno"> 3668</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(0);</div><div class="line"><a name="l03669"></a><span class="lineno"> 3669</span>  <span class="keywordflow">if</span> (0 < sign && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a>(u))</div><div class="line"><a name="l03670"></a><span class="lineno"> 3670</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(u);</div><div class="line"><a name="l03671"></a><span class="lineno"> 3671</span>  <span class="keywordflow">if</span> (sign < 0 && <a class="code" href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db">BDIGIT_MSB</a>(fixbuf[1]) == 0 &&</div><div class="line"><a name="l03672"></a><span class="lineno"> 3672</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d46d187c4953f84fab360264c888f9">NEGFIXABLE</a>(-(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)u))</div><div class="line"><a name="l03673"></a><span class="lineno"> 3673</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(-(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)u);</div><div class="line"><a name="l03674"></a><span class="lineno"> 3674</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>((<span class="keywordtype">long</span>)num_bdigits, 0 <= sign);</div><div class="line"><a name="l03675"></a><span class="lineno"> 3675</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>), fixbuf, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, num_bdigits);</div><div class="line"><a name="l03676"></a><span class="lineno"> 3676</span>  }</div><div class="line"><a name="l03677"></a><span class="lineno"> 3677</span> </div><div class="line"><a name="l03678"></a><span class="lineno"> 3678</span>  <span class="keywordflow">if</span> ((flags & <a class="code" href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a>) && sign != 0 &&</div><div class="line"><a name="l03679"></a><span class="lineno"> 3679</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)))</div><div class="line"><a name="l03680"></a><span class="lineno"> 3680</span>  sign = 0;</div><div class="line"><a name="l03681"></a><span class="lineno"> 3681</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, 0 <= sign);</div><div class="line"><a name="l03682"></a><span class="lineno"> 3682</span> </div><div class="line"><a name="l03683"></a><span class="lineno"> 3683</span>  <span class="keywordflow">if</span> (flags & <a class="code" href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a>)</div><div class="line"><a name="l03684"></a><span class="lineno"> 3684</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03685"></a><span class="lineno"> 3685</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l03686"></a><span class="lineno"> 3686</span> }</div><div class="line"><a name="l03687"></a><span class="lineno"> 3687</span> </div><div class="line"><a name="l03688"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3673f440faa90a40d3511b0dd2f69992"> 3688</a></span> <span class="preprocessor">#define QUAD_SIZE 8</span></div><div class="line"><a name="l03689"></a><span class="lineno"> 3689</span> </div><div class="line"><a name="l03690"></a><span class="lineno"> 3690</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03691"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3b189dbdc353401276d76e50f11b1a15"> 3691</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3b189dbdc353401276d76e50f11b1a15">rb_quad_pack</a>(<span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l03692"></a><span class="lineno"> 3692</span> {</div><div class="line"><a name="l03693"></a><span class="lineno"> 3693</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, 1, <a class="code" href="../../d1/dcc/bignum_8c.html#a3673f440faa90a40d3511b0dd2f69992">QUAD_SIZE</a>, 0,</div><div class="line"><a name="l03694"></a><span class="lineno"> 3694</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l03695"></a><span class="lineno"> 3695</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>);</div><div class="line"><a name="l03696"></a><span class="lineno"> 3696</span> }</div><div class="line"><a name="l03697"></a><span class="lineno"> 3697</span> </div><div class="line"><a name="l03698"></a><span class="lineno"> 3698</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03699"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aea58790d504fe9eb1120b749acddf61b"> 3699</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aea58790d504fe9eb1120b749acddf61b">rb_quad_unpack</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keywordtype">int</span> signed_p)</div><div class="line"><a name="l03700"></a><span class="lineno"> 3700</span> {</div><div class="line"><a name="l03701"></a><span class="lineno"> 3701</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f623845f4719716b70e4025508657fc">rb_integer_unpack</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, 1, <a class="code" href="../../d1/dcc/bignum_8c.html#a3673f440faa90a40d3511b0dd2f69992">QUAD_SIZE</a>, 0,</div><div class="line"><a name="l03702"></a><span class="lineno"> 3702</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|</div><div class="line"><a name="l03703"></a><span class="lineno"> 3703</span>  (signed_p ? <a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a> : 0));</div><div class="line"><a name="l03704"></a><span class="lineno"> 3704</span> }</div><div class="line"><a name="l03705"></a><span class="lineno"> 3705</span> </div><div class="line"><a name="l03706"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9"> 3706</a></span> <span class="preprocessor">#define conv_digit(c) (ruby_digit36_to_number_table[(unsigned char)(c)])</span></div><div class="line"><a name="l03707"></a><span class="lineno"> 3707</span> </div><div class="line"><a name="l03708"></a><span class="lineno"> 3708</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l03709"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581"> 3709</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *s, <span class="keyword">const</span> <span class="keywordtype">char</span> *str, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck, <span class="keywordtype">size_t</span> *num_digits_p, <span class="keywordtype">size_t</span> *len_p)</div><div class="line"><a name="l03710"></a><span class="lineno"> 3710</span> {</div><div class="line"><a name="l03711"></a><span class="lineno"> 3711</span>  <span class="keywordtype">char</span> nondigit = 0;</div><div class="line"><a name="l03712"></a><span class="lineno"> 3712</span>  <span class="keywordtype">size_t</span> num_digits = 0;</div><div class="line"><a name="l03713"></a><span class="lineno"> 3713</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start = str;</div><div class="line"><a name="l03714"></a><span class="lineno"> 3714</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_end = str;</div><div class="line"><a name="l03715"></a><span class="lineno"> 3715</span> </div><div class="line"><a name="l03716"></a><span class="lineno"> 3716</span>  <span class="keywordtype">int</span> c;</div><div class="line"><a name="l03717"></a><span class="lineno"> 3717</span> </div><div class="line"><a name="l03718"></a><span class="lineno"> 3718</span>  <span class="keywordflow">if</span> (badcheck && *str == <span class="charliteral">'_'</span>) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>;</div><div class="line"><a name="l03719"></a><span class="lineno"> 3719</span> </div><div class="line"><a name="l03720"></a><span class="lineno"> 3720</span>  <span class="keywordflow">while</span> ((c = *str++) != 0) {</div><div class="line"><a name="l03721"></a><span class="lineno"> 3721</span>  <span class="keywordflow">if</span> (c == <span class="charliteral">'_'</span>) {</div><div class="line"><a name="l03722"></a><span class="lineno"> 3722</span>  <span class="keywordflow">if</span> (nondigit) {</div><div class="line"><a name="l03723"></a><span class="lineno"> 3723</span>  <span class="keywordflow">if</span> (badcheck) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>;</div><div class="line"><a name="l03724"></a><span class="lineno"> 3724</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03725"></a><span class="lineno"> 3725</span>  }</div><div class="line"><a name="l03726"></a><span class="lineno"> 3726</span>  nondigit = (char) c;</div><div class="line"><a name="l03727"></a><span class="lineno"> 3727</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03728"></a><span class="lineno"> 3728</span>  }</div><div class="line"><a name="l03729"></a><span class="lineno"> 3729</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> ((c = <a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(c)) < 0) {</div><div class="line"><a name="l03730"></a><span class="lineno"> 3730</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03731"></a><span class="lineno"> 3731</span>  }</div><div class="line"><a name="l03732"></a><span class="lineno"> 3732</span>  <span class="keywordflow">if</span> (c >= base) <span class="keywordflow">break</span>;</div><div class="line"><a name="l03733"></a><span class="lineno"> 3733</span>  nondigit = 0;</div><div class="line"><a name="l03734"></a><span class="lineno"> 3734</span>  num_digits++;</div><div class="line"><a name="l03735"></a><span class="lineno"> 3735</span>  digits_end = str;</div><div class="line"><a name="l03736"></a><span class="lineno"> 3736</span>  }</div><div class="line"><a name="l03737"></a><span class="lineno"> 3737</span>  <span class="keywordflow">if</span> (badcheck) {</div><div class="line"><a name="l03738"></a><span class="lineno"> 3738</span>  str--;</div><div class="line"><a name="l03739"></a><span class="lineno"> 3739</span>  <span class="keywordflow">if</span> (s+1 < str && str[-1] == <span class="charliteral">'_'</span>) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>;</div><div class="line"><a name="l03740"></a><span class="lineno"> 3740</span>  <span class="keywordflow">while</span> (*str && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8cdc17e44905c826bddf416b7bf621c">ISSPACE</a>(*str)) str++;</div><div class="line"><a name="l03741"></a><span class="lineno"> 3741</span>  <span class="keywordflow">if</span> (*str) {</div><div class="line"><a name="l03742"></a><span class="lineno"> 3742</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>:</div><div class="line"><a name="l03743"></a><span class="lineno"> 3743</span>  <a class="code" href="../../db/dcc/error_8c.html#a8181cc6e05032f0d10c272a3556f306c">rb_invalid_str</a>(s, <span class="stringliteral">"Integer()"</span>);</div><div class="line"><a name="l03744"></a><span class="lineno"> 3744</span>  }</div><div class="line"><a name="l03745"></a><span class="lineno"> 3745</span>  }</div><div class="line"><a name="l03746"></a><span class="lineno"> 3746</span>  *num_digits_p = num_digits;</div><div class="line"><a name="l03747"></a><span class="lineno"> 3747</span>  *len_p = digits_end - digits_start;</div><div class="line"><a name="l03748"></a><span class="lineno"> 3748</span> }</div><div class="line"><a name="l03749"></a><span class="lineno"> 3749</span> </div><div class="line"><a name="l03750"></a><span class="lineno"> 3750</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03751"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#afb1ed4e8b16397c7f3503164523a41a7"> 3751</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#afb1ed4e8b16397c7f3503164523a41a7">str2big_poweroftwo</a>(</div><div class="line"><a name="l03752"></a><span class="lineno"> 3752</span>  <span class="keywordtype">int</span> sign,</div><div class="line"><a name="l03753"></a><span class="lineno"> 3753</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start,</div><div class="line"><a name="l03754"></a><span class="lineno"> 3754</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_end,</div><div class="line"><a name="l03755"></a><span class="lineno"> 3755</span>  <span class="keywordtype">size_t</span> num_digits,</div><div class="line"><a name="l03756"></a><span class="lineno"> 3756</span>  <span class="keywordtype">int</span> bits_per_digit)</div><div class="line"><a name="l03757"></a><span class="lineno"> 3757</span> {</div><div class="line"><a name="l03758"></a><span class="lineno"> 3758</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>;</div><div class="line"><a name="l03759"></a><span class="lineno"> 3759</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd;</div><div class="line"><a name="l03760"></a><span class="lineno"> 3760</span>  <span class="keywordtype">int</span> numbits;</div><div class="line"><a name="l03761"></a><span class="lineno"> 3761</span> </div><div class="line"><a name="l03762"></a><span class="lineno"> 3762</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l03763"></a><span class="lineno"> 3763</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *p;</div><div class="line"><a name="l03764"></a><span class="lineno"> 3764</span>  <span class="keywordtype">int</span> c;</div><div class="line"><a name="l03765"></a><span class="lineno"> 3765</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l03766"></a><span class="lineno"> 3766</span> </div><div class="line"><a name="l03767"></a><span class="lineno"> 3767</span>  num_bdigits = (num_digits / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>) * bits_per_digit + <a class="code" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a>((num_digits % <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>) * bits_per_digit, <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l03768"></a><span class="lineno"> 3768</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(num_bdigits, sign);</div><div class="line"><a name="l03769"></a><span class="lineno"> 3769</span>  <a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l03770"></a><span class="lineno"> 3770</span>  dd = 0;</div><div class="line"><a name="l03771"></a><span class="lineno"> 3771</span>  numbits = 0;</div><div class="line"><a name="l03772"></a><span class="lineno"> 3772</span>  <span class="keywordflow">for</span> (p = digits_end; digits_start < p; p--) {</div><div class="line"><a name="l03773"></a><span class="lineno"> 3773</span>  <span class="keywordflow">if</span> ((c = <a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(p[-1])) < 0)</div><div class="line"><a name="l03774"></a><span class="lineno"> 3774</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03775"></a><span class="lineno"> 3775</span>  dd |= (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)c << numbits;</div><div class="line"><a name="l03776"></a><span class="lineno"> 3776</span>  numbits += bits_per_digit;</div><div class="line"><a name="l03777"></a><span class="lineno"> 3777</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> <= numbits) {</div><div class="line"><a name="l03778"></a><span class="lineno"> 3778</span>  *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++ = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(dd);</div><div class="line"><a name="l03779"></a><span class="lineno"> 3779</span>  dd = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(dd);</div><div class="line"><a name="l03780"></a><span class="lineno"> 3780</span>  numbits -= <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l03781"></a><span class="lineno"> 3781</span>  }</div><div class="line"><a name="l03782"></a><span class="lineno"> 3782</span>  }</div><div class="line"><a name="l03783"></a><span class="lineno"> 3783</span>  <span class="keywordflow">if</span> (numbits) {</div><div class="line"><a name="l03784"></a><span class="lineno"> 3784</span>  *<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a>++ = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(dd);</div><div class="line"><a name="l03785"></a><span class="lineno"> 3785</span>  }</div><div class="line"><a name="l03786"></a><span class="lineno"> 3786</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>((<span class="keywordtype">size_t</span>)(<a class="code" href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a> - <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z)) == num_bdigits);</div><div class="line"><a name="l03787"></a><span class="lineno"> 3787</span> </div><div class="line"><a name="l03788"></a><span class="lineno"> 3788</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l03789"></a><span class="lineno"> 3789</span> }</div><div class="line"><a name="l03790"></a><span class="lineno"> 3790</span> </div><div class="line"><a name="l03791"></a><span class="lineno"> 3791</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03792"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6db70bfe77172cf5a863c8f7fdb80dda"> 3792</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6db70bfe77172cf5a863c8f7fdb80dda">str2big_normal</a>(</div><div class="line"><a name="l03793"></a><span class="lineno"> 3793</span>  <span class="keywordtype">int</span> sign,</div><div class="line"><a name="l03794"></a><span class="lineno"> 3794</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start,</div><div class="line"><a name="l03795"></a><span class="lineno"> 3795</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_end,</div><div class="line"><a name="l03796"></a><span class="lineno"> 3796</span>  <span class="keywordtype">size_t</span> num_bdigits,</div><div class="line"><a name="l03797"></a><span class="lineno"> 3797</span>  <span class="keywordtype">int</span> base)</div><div class="line"><a name="l03798"></a><span class="lineno"> 3798</span> {</div><div class="line"><a name="l03799"></a><span class="lineno"> 3799</span>  <span class="keywordtype">size_t</span> blen = 1;</div><div class="line"><a name="l03800"></a><span class="lineno"> 3800</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>;</div><div class="line"><a name="l03801"></a><span class="lineno"> 3801</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num;</div><div class="line"><a name="l03802"></a><span class="lineno"> 3802</span> </div><div class="line"><a name="l03803"></a><span class="lineno"> 3803</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l03804"></a><span class="lineno"> 3804</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *p;</div><div class="line"><a name="l03805"></a><span class="lineno"> 3805</span>  <span class="keywordtype">int</span> c;</div><div class="line"><a name="l03806"></a><span class="lineno"> 3806</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l03807"></a><span class="lineno"> 3807</span> </div><div class="line"><a name="l03808"></a><span class="lineno"> 3808</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(num_bdigits, sign);</div><div class="line"><a name="l03809"></a><span class="lineno"> 3809</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l03810"></a><span class="lineno"> 3810</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, num_bdigits);</div><div class="line"><a name="l03811"></a><span class="lineno"> 3811</span> </div><div class="line"><a name="l03812"></a><span class="lineno"> 3812</span>  <span class="keywordflow">for</span> (p = digits_start; p < digits_end; p++) {</div><div class="line"><a name="l03813"></a><span class="lineno"> 3813</span>  <span class="keywordflow">if</span> ((c = <a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(*p)) < 0)</div><div class="line"><a name="l03814"></a><span class="lineno"> 3814</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03815"></a><span class="lineno"> 3815</span>  num = c;</div><div class="line"><a name="l03816"></a><span class="lineno"> 3816</span>  i = 0;</div><div class="line"><a name="l03817"></a><span class="lineno"> 3817</span>  <span class="keywordflow">for</span> (;;) {</div><div class="line"><a name="l03818"></a><span class="lineno"> 3818</span>  <span class="keywordflow">while</span> (i<blen) {</div><div class="line"><a name="l03819"></a><span class="lineno"> 3819</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[i]*base;</div><div class="line"><a name="l03820"></a><span class="lineno"> 3820</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[i++] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l03821"></a><span class="lineno"> 3821</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l03822"></a><span class="lineno"> 3822</span>  }</div><div class="line"><a name="l03823"></a><span class="lineno"> 3823</span>  <span class="keywordflow">if</span> (num) {</div><div class="line"><a name="l03824"></a><span class="lineno"> 3824</span>  blen++;</div><div class="line"><a name="l03825"></a><span class="lineno"> 3825</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03826"></a><span class="lineno"> 3826</span>  }</div><div class="line"><a name="l03827"></a><span class="lineno"> 3827</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03828"></a><span class="lineno"> 3828</span>  }</div><div class="line"><a name="l03829"></a><span class="lineno"> 3829</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(blen <= num_bdigits);</div><div class="line"><a name="l03830"></a><span class="lineno"> 3830</span>  }</div><div class="line"><a name="l03831"></a><span class="lineno"> 3831</span> </div><div class="line"><a name="l03832"></a><span class="lineno"> 3832</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l03833"></a><span class="lineno"> 3833</span> }</div><div class="line"><a name="l03834"></a><span class="lineno"> 3834</span> </div><div class="line"><a name="l03835"></a><span class="lineno"> 3835</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03836"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a321aafc27a7216d05c67c763661a6daa"> 3836</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a321aafc27a7216d05c67c763661a6daa">str2big_karatsuba</a>(</div><div class="line"><a name="l03837"></a><span class="lineno"> 3837</span>  <span class="keywordtype">int</span> sign,</div><div class="line"><a name="l03838"></a><span class="lineno"> 3838</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start,</div><div class="line"><a name="l03839"></a><span class="lineno"> 3839</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_end,</div><div class="line"><a name="l03840"></a><span class="lineno"> 3840</span>  <span class="keywordtype">size_t</span> num_digits,</div><div class="line"><a name="l03841"></a><span class="lineno"> 3841</span>  <span class="keywordtype">size_t</span> num_bdigits,</div><div class="line"><a name="l03842"></a><span class="lineno"> 3842</span>  <span class="keywordtype">int</span> digits_per_bdigits_dbl,</div><div class="line"><a name="l03843"></a><span class="lineno"> 3843</span>  <span class="keywordtype">int</span> base)</div><div class="line"><a name="l03844"></a><span class="lineno"> 3844</span> {</div><div class="line"><a name="l03845"></a><span class="lineno"> 3845</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> powerv;</div><div class="line"><a name="l03846"></a><span class="lineno"> 3846</span>  <span class="keywordtype">size_t</span> unit;</div><div class="line"><a name="l03847"></a><span class="lineno"> 3847</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpuv = 0;</div><div class="line"><a name="l03848"></a><span class="lineno"> 3848</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *uds, *vds, *tds;</div><div class="line"><a name="l03849"></a><span class="lineno"> 3849</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd;</div><div class="line"><a name="l03850"></a><span class="lineno"> 3850</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> current_base;</div><div class="line"><a name="l03851"></a><span class="lineno"> 3851</span>  <span class="keywordtype">int</span> m;</div><div class="line"><a name="l03852"></a><span class="lineno"> 3852</span>  <span class="keywordtype">int</span> power_level = 0;</div><div class="line"><a name="l03853"></a><span class="lineno"> 3853</span> </div><div class="line"><a name="l03854"></a><span class="lineno"> 3854</span>  <span class="keywordtype">size_t</span> i;</div><div class="line"><a name="l03855"></a><span class="lineno"> 3855</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *p;</div><div class="line"><a name="l03856"></a><span class="lineno"> 3856</span>  <span class="keywordtype">int</span> c;</div><div class="line"><a name="l03857"></a><span class="lineno"> 3857</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l03858"></a><span class="lineno"> 3858</span> </div><div class="line"><a name="l03859"></a><span class="lineno"> 3859</span>  uds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpuv, 2*num_bdigits);</div><div class="line"><a name="l03860"></a><span class="lineno"> 3860</span>  vds = uds + num_bdigits;</div><div class="line"><a name="l03861"></a><span class="lineno"> 3861</span> </div><div class="line"><a name="l03862"></a><span class="lineno"> 3862</span>  powerv = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(base, power_level, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l03863"></a><span class="lineno"> 3863</span> </div><div class="line"><a name="l03864"></a><span class="lineno"> 3864</span>  i = 0;</div><div class="line"><a name="l03865"></a><span class="lineno"> 3865</span>  dd = 0;</div><div class="line"><a name="l03866"></a><span class="lineno"> 3866</span>  current_base = 1;</div><div class="line"><a name="l03867"></a><span class="lineno"> 3867</span>  m = digits_per_bdigits_dbl;</div><div class="line"><a name="l03868"></a><span class="lineno"> 3868</span>  <span class="keywordflow">if</span> (num_digits < (<span class="keywordtype">size_t</span>)m)</div><div class="line"><a name="l03869"></a><span class="lineno"> 3869</span>  m = (int)num_digits;</div><div class="line"><a name="l03870"></a><span class="lineno"> 3870</span>  <span class="keywordflow">for</span> (p = digits_end; digits_start < p; p--) {</div><div class="line"><a name="l03871"></a><span class="lineno"> 3871</span>  <span class="keywordflow">if</span> ((c = <a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(p[-1])) < 0)</div><div class="line"><a name="l03872"></a><span class="lineno"> 3872</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03873"></a><span class="lineno"> 3873</span>  dd = dd + c * current_base;</div><div class="line"><a name="l03874"></a><span class="lineno"> 3874</span>  current_base *= base;</div><div class="line"><a name="l03875"></a><span class="lineno"> 3875</span>  num_digits--;</div><div class="line"><a name="l03876"></a><span class="lineno"> 3876</span>  m--;</div><div class="line"><a name="l03877"></a><span class="lineno"> 3877</span>  <span class="keywordflow">if</span> (m == 0) {</div><div class="line"><a name="l03878"></a><span class="lineno"> 3878</span>  uds[i++] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(dd);</div><div class="line"><a name="l03879"></a><span class="lineno"> 3879</span>  uds[i++] = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(dd);</div><div class="line"><a name="l03880"></a><span class="lineno"> 3880</span>  dd = 0;</div><div class="line"><a name="l03881"></a><span class="lineno"> 3881</span>  m = digits_per_bdigits_dbl;</div><div class="line"><a name="l03882"></a><span class="lineno"> 3882</span>  <span class="keywordflow">if</span> (num_digits < (<span class="keywordtype">size_t</span>)m)</div><div class="line"><a name="l03883"></a><span class="lineno"> 3883</span>  m = (<span class="keywordtype">int</span>)num_digits;</div><div class="line"><a name="l03884"></a><span class="lineno"> 3884</span>  current_base = 1;</div><div class="line"><a name="l03885"></a><span class="lineno"> 3885</span>  }</div><div class="line"><a name="l03886"></a><span class="lineno"> 3886</span>  }</div><div class="line"><a name="l03887"></a><span class="lineno"> 3887</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(i == num_bdigits);</div><div class="line"><a name="l03888"></a><span class="lineno"> 3888</span>  <span class="keywordflow">for</span> (unit = 2; unit < num_bdigits; unit *= 2) {</div><div class="line"><a name="l03889"></a><span class="lineno"> 3889</span>  <span class="keywordflow">for</span> (i = 0; i < num_bdigits; i += unit*2) {</div><div class="line"><a name="l03890"></a><span class="lineno"> 3890</span>  <span class="keywordflow">if</span> (2*unit <= num_bdigits - i) {</div><div class="line"><a name="l03891"></a><span class="lineno"> 3891</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(vds+i, unit*2, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(powerv), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(powerv), uds+i+unit, unit);</div><div class="line"><a name="l03892"></a><span class="lineno"> 3892</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(vds+i, unit*2, vds+i, unit*2, uds+i, unit);</div><div class="line"><a name="l03893"></a><span class="lineno"> 3893</span>  }</div><div class="line"><a name="l03894"></a><span class="lineno"> 3894</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (unit <= num_bdigits - i) {</div><div class="line"><a name="l03895"></a><span class="lineno"> 3895</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(vds+i, num_bdigits-i, <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(powerv), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(powerv), uds+i+unit, num_bdigits-(i+unit));</div><div class="line"><a name="l03896"></a><span class="lineno"> 3896</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(vds+i, num_bdigits-i, vds+i, num_bdigits-i, uds+i, unit);</div><div class="line"><a name="l03897"></a><span class="lineno"> 3897</span>  }</div><div class="line"><a name="l03898"></a><span class="lineno"> 3898</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03899"></a><span class="lineno"> 3899</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(vds+i, uds+i, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, num_bdigits-i);</div><div class="line"><a name="l03900"></a><span class="lineno"> 3900</span>  }</div><div class="line"><a name="l03901"></a><span class="lineno"> 3901</span>  }</div><div class="line"><a name="l03902"></a><span class="lineno"> 3902</span>  power_level++;</div><div class="line"><a name="l03903"></a><span class="lineno"> 3903</span>  powerv = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(base, power_level, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l03904"></a><span class="lineno"> 3904</span>  tds = vds;</div><div class="line"><a name="l03905"></a><span class="lineno"> 3905</span>  vds = uds;</div><div class="line"><a name="l03906"></a><span class="lineno"> 3906</span>  uds = tds;</div><div class="line"><a name="l03907"></a><span class="lineno"> 3907</span>  }</div><div class="line"><a name="l03908"></a><span class="lineno"> 3908</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(uds, num_bdigits);</div><div class="line"><a name="l03909"></a><span class="lineno"> 3909</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(num_bdigits, sign);</div><div class="line"><a name="l03910"></a><span class="lineno"> 3910</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), uds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, num_bdigits);</div><div class="line"><a name="l03911"></a><span class="lineno"> 3911</span> </div><div class="line"><a name="l03912"></a><span class="lineno"> 3912</span>  <span class="keywordflow">if</span> (tmpuv)</div><div class="line"><a name="l03913"></a><span class="lineno"> 3913</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(tmpuv);</div><div class="line"><a name="l03914"></a><span class="lineno"> 3914</span> </div><div class="line"><a name="l03915"></a><span class="lineno"> 3915</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l03916"></a><span class="lineno"> 3916</span> }</div><div class="line"><a name="l03917"></a><span class="lineno"> 3917</span> </div><div class="line"><a name="l03918"></a><span class="lineno"> 3918</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l03919"></a><span class="lineno"> 3919</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03920"></a><span class="lineno"> 3920</span> str2big_gmp(</div><div class="line"><a name="l03921"></a><span class="lineno"> 3921</span>  <span class="keywordtype">int</span> sign,</div><div class="line"><a name="l03922"></a><span class="lineno"> 3922</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start,</div><div class="line"><a name="l03923"></a><span class="lineno"> 3923</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_end,</div><div class="line"><a name="l03924"></a><span class="lineno"> 3924</span>  <span class="keywordtype">size_t</span> num_digits,</div><div class="line"><a name="l03925"></a><span class="lineno"> 3925</span>  <span class="keywordtype">size_t</span> num_bdigits,</div><div class="line"><a name="l03926"></a><span class="lineno"> 3926</span>  <span class="keywordtype">int</span> base)</div><div class="line"><a name="l03927"></a><span class="lineno"> 3927</span> {</div><div class="line"><a name="l03928"></a><span class="lineno"> 3928</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> nails = (<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>)*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l03929"></a><span class="lineno"> 3929</span>  <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, *p;</div><div class="line"><a name="l03930"></a><span class="lineno"> 3930</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *q;</div><div class="line"><a name="l03931"></a><span class="lineno"> 3931</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmps;</div><div class="line"><a name="l03932"></a><span class="lineno"> 3932</span>  mpz_t mz;</div><div class="line"><a name="l03933"></a><span class="lineno"> 3933</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l03934"></a><span class="lineno"> 3934</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>;</div><div class="line"><a name="l03935"></a><span class="lineno"> 3935</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l03936"></a><span class="lineno"> 3936</span> </div><div class="line"><a name="l03937"></a><span class="lineno"> 3937</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<span class="keywordtype">char</span>, tmps, num_digits+1);</div><div class="line"><a name="l03938"></a><span class="lineno"> 3938</span>  p = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l03939"></a><span class="lineno"> 3939</span>  <span class="keywordflow">for</span> (q = digits_start; q < digits_end; q++) {</div><div class="line"><a name="l03940"></a><span class="lineno"> 3940</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(*q) < 0)</div><div class="line"><a name="l03941"></a><span class="lineno"> 3941</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l03942"></a><span class="lineno"> 3942</span>  *p++ = *q;</div><div class="line"><a name="l03943"></a><span class="lineno"> 3943</span>  }</div><div class="line"><a name="l03944"></a><span class="lineno"> 3944</span>  *p = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l03945"></a><span class="lineno"> 3945</span> </div><div class="line"><a name="l03946"></a><span class="lineno"> 3946</span>  mpz_init(mz);</div><div class="line"><a name="l03947"></a><span class="lineno"> 3947</span>  mpz_set_str(mz, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, base);</div><div class="line"><a name="l03948"></a><span class="lineno"> 3948</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = num_bdigits;</div><div class="line"><a name="l03949"></a><span class="lineno"> 3949</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, sign);</div><div class="line"><a name="l03950"></a><span class="lineno"> 3950</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l03951"></a><span class="lineno"> 3951</span>  mpz_export(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), &<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, mz);</div><div class="line"><a name="l03952"></a><span class="lineno"> 3952</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>-<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>);</div><div class="line"><a name="l03953"></a><span class="lineno"> 3953</span>  mpz_clear(mz);</div><div class="line"><a name="l03954"></a><span class="lineno"> 3954</span> </div><div class="line"><a name="l03955"></a><span class="lineno"> 3955</span>  <span class="keywordflow">if</span> (tmps)</div><div class="line"><a name="l03956"></a><span class="lineno"> 3956</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(tmps);</div><div class="line"><a name="l03957"></a><span class="lineno"> 3957</span> </div><div class="line"><a name="l03958"></a><span class="lineno"> 3958</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l03959"></a><span class="lineno"> 3959</span> }</div><div class="line"><a name="l03960"></a><span class="lineno"> 3960</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l03961"></a><span class="lineno"> 3961</span> </div><div class="line"><a name="l03962"></a><span class="lineno"> 3962</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03963"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a6bd9999077c361dd3c1f226d9acff162"> 3963</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1cd4cd30b4ce5b52538392db6409651">rb_cstr_to_inum</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *str, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l03964"></a><span class="lineno"> 3964</span> {</div><div class="line"><a name="l03965"></a><span class="lineno"> 3965</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *s = str;</div><div class="line"><a name="l03966"></a><span class="lineno"> 3966</span>  <span class="keywordtype">char</span> sign = 1;</div><div class="line"><a name="l03967"></a><span class="lineno"> 3967</span>  <span class="keywordtype">int</span> c;</div><div class="line"><a name="l03968"></a><span class="lineno"> 3968</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l03969"></a><span class="lineno"> 3969</span> </div><div class="line"><a name="l03970"></a><span class="lineno"> 3970</span>  <span class="keywordtype">int</span> bits_per_digit;</div><div class="line"><a name="l03971"></a><span class="lineno"> 3971</span> </div><div class="line"><a name="l03972"></a><span class="lineno"> 3972</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start, *digits_end;</div><div class="line"><a name="l03973"></a><span class="lineno"> 3973</span>  <span class="keywordtype">size_t</span> num_digits;</div><div class="line"><a name="l03974"></a><span class="lineno"> 3974</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l03975"></a><span class="lineno"> 3975</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l03976"></a><span class="lineno"> 3976</span> </div><div class="line"><a name="l03977"></a><span class="lineno"> 3977</span>  <span class="keywordflow">if</span> (!str) {</div><div class="line"><a name="l03978"></a><span class="lineno"> 3978</span>  <span class="keywordflow">if</span> (badcheck) {</div><div class="line"><a name="l03979"></a><span class="lineno"> 3979</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>:</div><div class="line"><a name="l03980"></a><span class="lineno"> 3980</span>  <a class="code" href="../../db/dcc/error_8c.html#a8181cc6e05032f0d10c272a3556f306c">rb_invalid_str</a>(s, <span class="stringliteral">"Integer()"</span>);</div><div class="line"><a name="l03981"></a><span class="lineno"> 3981</span>  }</div><div class="line"><a name="l03982"></a><span class="lineno"> 3982</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l03983"></a><span class="lineno"> 3983</span>  }</div><div class="line"><a name="l03984"></a><span class="lineno"> 3984</span>  <span class="keywordflow">while</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8cdc17e44905c826bddf416b7bf621c">ISSPACE</a>(*str)) str++;</div><div class="line"><a name="l03985"></a><span class="lineno"> 3985</span> </div><div class="line"><a name="l03986"></a><span class="lineno"> 3986</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'+'</span>) {</div><div class="line"><a name="l03987"></a><span class="lineno"> 3987</span>  str++;</div><div class="line"><a name="l03988"></a><span class="lineno"> 3988</span>  }</div><div class="line"><a name="l03989"></a><span class="lineno"> 3989</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l03990"></a><span class="lineno"> 3990</span>  str++;</div><div class="line"><a name="l03991"></a><span class="lineno"> 3991</span>  sign = 0;</div><div class="line"><a name="l03992"></a><span class="lineno"> 3992</span>  }</div><div class="line"><a name="l03993"></a><span class="lineno"> 3993</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'+'</span> || str[0] == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l03994"></a><span class="lineno"> 3994</span>  <span class="keywordflow">if</span> (badcheck) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>;</div><div class="line"><a name="l03995"></a><span class="lineno"> 3995</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l03996"></a><span class="lineno"> 3996</span>  }</div><div class="line"><a name="l03997"></a><span class="lineno"> 3997</span>  <span class="keywordflow">if</span> (base <= 0) {</div><div class="line"><a name="l03998"></a><span class="lineno"> 3998</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'0'</span>) {</div><div class="line"><a name="l03999"></a><span class="lineno"> 3999</span>  <span class="keywordflow">switch</span> (str[1]) {</div><div class="line"><a name="l04000"></a><span class="lineno"> 4000</span>  <span class="keywordflow">case</span> <span class="charliteral">'x'</span>: <span class="keywordflow">case</span> <span class="charliteral">'X'</span>:</div><div class="line"><a name="l04001"></a><span class="lineno"> 4001</span>  base = 16;</div><div class="line"><a name="l04002"></a><span class="lineno"> 4002</span>  str += 2;</div><div class="line"><a name="l04003"></a><span class="lineno"> 4003</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04004"></a><span class="lineno"> 4004</span>  <span class="keywordflow">case</span> <span class="charliteral">'b'</span>: <span class="keywordflow">case</span> <span class="charliteral">'B'</span>:</div><div class="line"><a name="l04005"></a><span class="lineno"> 4005</span>  base = 2;</div><div class="line"><a name="l04006"></a><span class="lineno"> 4006</span>  str += 2;</div><div class="line"><a name="l04007"></a><span class="lineno"> 4007</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04008"></a><span class="lineno"> 4008</span>  <span class="keywordflow">case</span> <span class="charliteral">'o'</span>: <span class="keywordflow">case</span> <span class="charliteral">'O'</span>:</div><div class="line"><a name="l04009"></a><span class="lineno"> 4009</span>  base = 8;</div><div class="line"><a name="l04010"></a><span class="lineno"> 4010</span>  str += 2;</div><div class="line"><a name="l04011"></a><span class="lineno"> 4011</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04012"></a><span class="lineno"> 4012</span>  <span class="keywordflow">case</span> <span class="charliteral">'d'</span>: <span class="keywordflow">case</span> <span class="charliteral">'D'</span>:</div><div class="line"><a name="l04013"></a><span class="lineno"> 4013</span>  base = 10;</div><div class="line"><a name="l04014"></a><span class="lineno"> 4014</span>  str += 2;</div><div class="line"><a name="l04015"></a><span class="lineno"> 4015</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04016"></a><span class="lineno"> 4016</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l04017"></a><span class="lineno"> 4017</span>  base = 8;</div><div class="line"><a name="l04018"></a><span class="lineno"> 4018</span>  }</div><div class="line"><a name="l04019"></a><span class="lineno"> 4019</span>  }</div><div class="line"><a name="l04020"></a><span class="lineno"> 4020</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (base < -1) {</div><div class="line"><a name="l04021"></a><span class="lineno"> 4021</span>  base = -base;</div><div class="line"><a name="l04022"></a><span class="lineno"> 4022</span>  }</div><div class="line"><a name="l04023"></a><span class="lineno"> 4023</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04024"></a><span class="lineno"> 4024</span>  base = 10;</div><div class="line"><a name="l04025"></a><span class="lineno"> 4025</span>  }</div><div class="line"><a name="l04026"></a><span class="lineno"> 4026</span>  }</div><div class="line"><a name="l04027"></a><span class="lineno"> 4027</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (base == 2) {</div><div class="line"><a name="l04028"></a><span class="lineno"> 4028</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'0'</span> && (str[1] == <span class="charliteral">'b'</span>||str[1] == <span class="charliteral">'B'</span>)) {</div><div class="line"><a name="l04029"></a><span class="lineno"> 4029</span>  str += 2;</div><div class="line"><a name="l04030"></a><span class="lineno"> 4030</span>  }</div><div class="line"><a name="l04031"></a><span class="lineno"> 4031</span>  }</div><div class="line"><a name="l04032"></a><span class="lineno"> 4032</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (base == 8) {</div><div class="line"><a name="l04033"></a><span class="lineno"> 4033</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'0'</span> && (str[1] == <span class="charliteral">'o'</span>||str[1] == <span class="charliteral">'O'</span>)) {</div><div class="line"><a name="l04034"></a><span class="lineno"> 4034</span>  str += 2;</div><div class="line"><a name="l04035"></a><span class="lineno"> 4035</span>  }</div><div class="line"><a name="l04036"></a><span class="lineno"> 4036</span>  }</div><div class="line"><a name="l04037"></a><span class="lineno"> 4037</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (base == 10) {</div><div class="line"><a name="l04038"></a><span class="lineno"> 4038</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'0'</span> && (str[1] == <span class="charliteral">'d'</span>||str[1] == <span class="charliteral">'D'</span>)) {</div><div class="line"><a name="l04039"></a><span class="lineno"> 4039</span>  str += 2;</div><div class="line"><a name="l04040"></a><span class="lineno"> 4040</span>  }</div><div class="line"><a name="l04041"></a><span class="lineno"> 4041</span>  }</div><div class="line"><a name="l04042"></a><span class="lineno"> 4042</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (base == 16) {</div><div class="line"><a name="l04043"></a><span class="lineno"> 4043</span>  <span class="keywordflow">if</span> (str[0] == <span class="charliteral">'0'</span> && (str[1] == <span class="charliteral">'x'</span>||str[1] == <span class="charliteral">'X'</span>)) {</div><div class="line"><a name="l04044"></a><span class="lineno"> 4044</span>  str += 2;</div><div class="line"><a name="l04045"></a><span class="lineno"> 4045</span>  }</div><div class="line"><a name="l04046"></a><span class="lineno"> 4046</span>  }</div><div class="line"><a name="l04047"></a><span class="lineno"> 4047</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base) {</div><div class="line"><a name="l04048"></a><span class="lineno"> 4048</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04049"></a><span class="lineno"> 4049</span>  }</div><div class="line"><a name="l04050"></a><span class="lineno"> 4050</span>  <span class="keywordflow">if</span> (*str == <span class="charliteral">'0'</span>) { <span class="comment">/* squeeze preceding 0s */</span></div><div class="line"><a name="l04051"></a><span class="lineno"> 4051</span>  <span class="keywordtype">int</span> us = 0;</div><div class="line"><a name="l04052"></a><span class="lineno"> 4052</span>  <span class="keywordflow">while</span> ((c = *++str) == <span class="charliteral">'0'</span> || c == <span class="charliteral">'_'</span>) {</div><div class="line"><a name="l04053"></a><span class="lineno"> 4053</span>  <span class="keywordflow">if</span> (c == <span class="charliteral">'_'</span>) {</div><div class="line"><a name="l04054"></a><span class="lineno"> 4054</span>  <span class="keywordflow">if</span> (++us >= 2)</div><div class="line"><a name="l04055"></a><span class="lineno"> 4055</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04056"></a><span class="lineno"> 4056</span>  } <span class="keywordflow">else</span></div><div class="line"><a name="l04057"></a><span class="lineno"> 4057</span>  us = 0;</div><div class="line"><a name="l04058"></a><span class="lineno"> 4058</span>  }</div><div class="line"><a name="l04059"></a><span class="lineno"> 4059</span>  <span class="keywordflow">if</span> (!(c = *str) || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8cdc17e44905c826bddf416b7bf621c">ISSPACE</a>(c)) --str;</div><div class="line"><a name="l04060"></a><span class="lineno"> 4060</span>  }</div><div class="line"><a name="l04061"></a><span class="lineno"> 4061</span>  c = *str;</div><div class="line"><a name="l04062"></a><span class="lineno"> 4062</span>  c = <a class="code" href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a>(c);</div><div class="line"><a name="l04063"></a><span class="lineno"> 4063</span>  <span class="keywordflow">if</span> (c < 0 || c >= base) {</div><div class="line"><a name="l04064"></a><span class="lineno"> 4064</span>  <span class="keywordflow">if</span> (badcheck) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>;</div><div class="line"><a name="l04065"></a><span class="lineno"> 4065</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l04066"></a><span class="lineno"> 4066</span>  }</div><div class="line"><a name="l04067"></a><span class="lineno"> 4067</span> </div><div class="line"><a name="l04068"></a><span class="lineno"> 4068</span>  bits_per_digit = <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(base-1);</div><div class="line"><a name="l04069"></a><span class="lineno"> 4069</span>  <span class="keywordflow">if</span> (bits_per_digit * <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(str) <= <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>) {</div><div class="line"><a name="l04070"></a><span class="lineno"> 4070</span>  <span class="keywordtype">char</span> *end;</div><div class="line"><a name="l04071"></a><span class="lineno"> 4071</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1da69daf7d0b9dfe25ed7bd614bab9c7">STRTOUL</a>(str, &end, base);</div><div class="line"><a name="l04072"></a><span class="lineno"> 4072</span> </div><div class="line"><a name="l04073"></a><span class="lineno"> 4073</span>  <span class="keywordflow">if</span> (str < end && *end == <span class="charliteral">'_'</span>) <span class="keywordflow">goto</span> bigparse;</div><div class="line"><a name="l04074"></a><span class="lineno"> 4074</span>  <span class="keywordflow">if</span> (badcheck) {</div><div class="line"><a name="l04075"></a><span class="lineno"> 4075</span>  <span class="keywordflow">if</span> (end == str) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>; <span class="comment">/* no number */</span></div><div class="line"><a name="l04076"></a><span class="lineno"> 4076</span>  <span class="keywordflow">while</span> (*end && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8cdc17e44905c826bddf416b7bf621c">ISSPACE</a>(*end)) end++;</div><div class="line"><a name="l04077"></a><span class="lineno"> 4077</span>  <span class="keywordflow">if</span> (*end) <span class="keywordflow">goto</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a>; <span class="comment">/* trailing garbage */</span></div><div class="line"><a name="l04078"></a><span class="lineno"> 4078</span>  }</div><div class="line"><a name="l04079"></a><span class="lineno"> 4079</span> </div><div class="line"><a name="l04080"></a><span class="lineno"> 4080</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l04081"></a><span class="lineno"> 4081</span>  <span class="keywordflow">if</span> (sign) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l04082"></a><span class="lineno"> 4082</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04083"></a><span class="lineno"> 4083</span>  <span class="keywordtype">long</span> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = -(long)<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l04084"></a><span class="lineno"> 4084</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04085"></a><span class="lineno"> 4085</span>  }</div><div class="line"><a name="l04086"></a><span class="lineno"> 4086</span>  }</div><div class="line"><a name="l04087"></a><span class="lineno"> 4087</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04088"></a><span class="lineno"> 4088</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big = <a class="code" href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l04089"></a><span class="lineno"> 4089</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(big, sign);</div><div class="line"><a name="l04090"></a><span class="lineno"> 4090</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(big);</div><div class="line"><a name="l04091"></a><span class="lineno"> 4091</span>  }</div><div class="line"><a name="l04092"></a><span class="lineno"> 4092</span>  }</div><div class="line"><a name="l04093"></a><span class="lineno"> 4093</span> </div><div class="line"><a name="l04094"></a><span class="lineno"> 4094</span>  bigparse:</div><div class="line"><a name="l04095"></a><span class="lineno"> 4095</span>  digits_start = str;</div><div class="line"><a name="l04096"></a><span class="lineno"> 4096</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(s, str, base, badcheck, &num_digits, &len);</div><div class="line"><a name="l04097"></a><span class="lineno"> 4097</span>  digits_end = digits_start + len;</div><div class="line"><a name="l04098"></a><span class="lineno"> 4098</span> </div><div class="line"><a name="l04099"></a><span class="lineno"> 4099</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(base)) {</div><div class="line"><a name="l04100"></a><span class="lineno"> 4100</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#afb1ed4e8b16397c7f3503164523a41a7">str2big_poweroftwo</a>(sign, digits_start, digits_end, num_digits,</div><div class="line"><a name="l04101"></a><span class="lineno"> 4101</span>  bits_per_digit);</div><div class="line"><a name="l04102"></a><span class="lineno"> 4102</span>  }</div><div class="line"><a name="l04103"></a><span class="lineno"> 4103</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04104"></a><span class="lineno"> 4104</span>  <span class="keywordtype">int</span> digits_per_bdigits_dbl;</div><div class="line"><a name="l04105"></a><span class="lineno"> 4105</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(base, &digits_per_bdigits_dbl);</div><div class="line"><a name="l04106"></a><span class="lineno"> 4106</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a>(num_digits, digits_per_bdigits_dbl)*2;</div><div class="line"><a name="l04107"></a><span class="lineno"> 4107</span> </div><div class="line"><a name="l04108"></a><span class="lineno"> 4108</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l04109"></a><span class="lineno"> 4109</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#acdee5f53dc750ff2ae604232a6389031">GMP_STR2BIG_DIGITS</a> < num_bdigits) {</div><div class="line"><a name="l04110"></a><span class="lineno"> 4110</span>  z = str2big_gmp(sign, digits_start, digits_end, num_digits,</div><div class="line"><a name="l04111"></a><span class="lineno"> 4111</span>  num_bdigits, base);</div><div class="line"><a name="l04112"></a><span class="lineno"> 4112</span>  }</div><div class="line"><a name="l04113"></a><span class="lineno"> 4113</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l04114"></a><span class="lineno"> 4114</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04115"></a><span class="lineno"> 4115</span>  <span class="keywordflow">if</span> (num_bdigits < <a class="code" href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2">KARATSUBA_MUL_DIGITS</a>) {</div><div class="line"><a name="l04116"></a><span class="lineno"> 4116</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a6db70bfe77172cf5a863c8f7fdb80dda">str2big_normal</a>(sign, digits_start, digits_end,</div><div class="line"><a name="l04117"></a><span class="lineno"> 4117</span>  num_bdigits, base);</div><div class="line"><a name="l04118"></a><span class="lineno"> 4118</span>  }</div><div class="line"><a name="l04119"></a><span class="lineno"> 4119</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04120"></a><span class="lineno"> 4120</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a321aafc27a7216d05c67c763661a6daa">str2big_karatsuba</a>(sign, digits_start, digits_end, num_digits,</div><div class="line"><a name="l04121"></a><span class="lineno"> 4121</span>  num_bdigits, digits_per_bdigits_dbl, base);</div><div class="line"><a name="l04122"></a><span class="lineno"> 4122</span>  }</div><div class="line"><a name="l04123"></a><span class="lineno"> 4123</span>  }</div><div class="line"><a name="l04124"></a><span class="lineno"> 4124</span> </div><div class="line"><a name="l04125"></a><span class="lineno"> 4125</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l04126"></a><span class="lineno"> 4126</span> }</div><div class="line"><a name="l04127"></a><span class="lineno"> 4127</span> </div><div class="line"><a name="l04128"></a><span class="lineno"> 4128</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04129"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a88eee7153b605f7e2e7773937880c124"> 4129</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3c364897a7c673caf46ccdbf62536a07">rb_str_to_inum</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l04130"></a><span class="lineno"> 4130</span> {</div><div class="line"><a name="l04131"></a><span class="lineno"> 4131</span>  <span class="keywordtype">char</span> *s;</div><div class="line"><a name="l04132"></a><span class="lineno"> 4132</span>  <span class="keywordtype">long</span> len;</div><div class="line"><a name="l04133"></a><span class="lineno"> 4133</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> v = 0;</div><div class="line"><a name="l04134"></a><span class="lineno"> 4134</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ret;</div><div class="line"><a name="l04135"></a><span class="lineno"> 4135</span> </div><div class="line"><a name="l04136"></a><span class="lineno"> 4136</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0e80f207eb41e9010ec9f0f5f9419fea">StringValue</a>(str);</div><div class="line"><a name="l04137"></a><span class="lineno"> 4137</span>  <a class="code" href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a>(str);</div><div class="line"><a name="l04138"></a><span class="lineno"> 4138</span>  <span class="keywordflow">if</span> (badcheck) {</div><div class="line"><a name="l04139"></a><span class="lineno"> 4139</span>  s = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(str);</div><div class="line"><a name="l04140"></a><span class="lineno"> 4140</span>  }</div><div class="line"><a name="l04141"></a><span class="lineno"> 4141</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04142"></a><span class="lineno"> 4142</span>  s = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str);</div><div class="line"><a name="l04143"></a><span class="lineno"> 4143</span>  }</div><div class="line"><a name="l04144"></a><span class="lineno"> 4144</span>  <span class="keywordflow">if</span> (s) {</div><div class="line"><a name="l04145"></a><span class="lineno"> 4145</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str);</div><div class="line"><a name="l04146"></a><span class="lineno"> 4146</span>  <span class="keywordflow">if</span> (s[len]) { <span class="comment">/* no sentinel somehow */</span></div><div class="line"><a name="l04147"></a><span class="lineno"> 4147</span>  <span class="keywordtype">char</span> *p = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7e07f4f937d300a4f0509b0c26526716">ALLOCV</a>(v, len+1);</div><div class="line"><a name="l04148"></a><span class="lineno"> 4148</span> </div><div class="line"><a name="l04149"></a><span class="lineno"> 4149</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(p, s, <span class="keywordtype">char</span>, len);</div><div class="line"><a name="l04150"></a><span class="lineno"> 4150</span>  p[len] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l04151"></a><span class="lineno"> 4151</span>  s = p;</div><div class="line"><a name="l04152"></a><span class="lineno"> 4152</span>  }</div><div class="line"><a name="l04153"></a><span class="lineno"> 4153</span>  }</div><div class="line"><a name="l04154"></a><span class="lineno"> 4154</span>  ret = <a class="code" href="../../d1/dcc/bignum_8c.html#ad1cd4cd30b4ce5b52538392db6409651">rb_cstr_to_inum</a>(s, base, badcheck);</div><div class="line"><a name="l04155"></a><span class="lineno"> 4155</span>  <span class="keywordflow">if</span> (v)</div><div class="line"><a name="l04156"></a><span class="lineno"> 4156</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(v);</div><div class="line"><a name="l04157"></a><span class="lineno"> 4157</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l04158"></a><span class="lineno"> 4158</span> }</div><div class="line"><a name="l04159"></a><span class="lineno"> 4159</span> </div><div class="line"><a name="l04160"></a><span class="lineno"> 4160</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04161"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#af79b5a41c56d2875ece03b0b778509aa"> 4161</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af79b5a41c56d2875ece03b0b778509aa">rb_str2big_poweroftwo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l04162"></a><span class="lineno"> 4162</span> {</div><div class="line"><a name="l04163"></a><span class="lineno"> 4163</span>  <span class="keywordtype">int</span> positive_p = 1;</div><div class="line"><a name="l04164"></a><span class="lineno"> 4164</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *s, *str;</div><div class="line"><a name="l04165"></a><span class="lineno"> 4165</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start, *digits_end;</div><div class="line"><a name="l04166"></a><span class="lineno"> 4166</span>  <span class="keywordtype">size_t</span> num_digits;</div><div class="line"><a name="l04167"></a><span class="lineno"> 4167</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l04168"></a><span class="lineno"> 4168</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l04169"></a><span class="lineno"> 4169</span> </div><div class="line"><a name="l04170"></a><span class="lineno"> 4170</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base || !<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(base)) {</div><div class="line"><a name="l04171"></a><span class="lineno"> 4171</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04172"></a><span class="lineno"> 4172</span>  }</div><div class="line"><a name="l04173"></a><span class="lineno"> 4173</span> </div><div class="line"><a name="l04174"></a><span class="lineno"> 4174</span>  <a class="code" href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a>(arg);</div><div class="line"><a name="l04175"></a><span class="lineno"> 4175</span>  s = str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(arg);</div><div class="line"><a name="l04176"></a><span class="lineno"> 4176</span>  <span class="keywordflow">if</span> (*str == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l04177"></a><span class="lineno"> 4177</span>  str++;</div><div class="line"><a name="l04178"></a><span class="lineno"> 4178</span>  positive_p = 0;</div><div class="line"><a name="l04179"></a><span class="lineno"> 4179</span>  }</div><div class="line"><a name="l04180"></a><span class="lineno"> 4180</span> </div><div class="line"><a name="l04181"></a><span class="lineno"> 4181</span>  digits_start = str;</div><div class="line"><a name="l04182"></a><span class="lineno"> 4182</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(s, str, base, badcheck, &num_digits, &len);</div><div class="line"><a name="l04183"></a><span class="lineno"> 4183</span>  digits_end = digits_start + len;</div><div class="line"><a name="l04184"></a><span class="lineno"> 4184</span> </div><div class="line"><a name="l04185"></a><span class="lineno"> 4185</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#afb1ed4e8b16397c7f3503164523a41a7">str2big_poweroftwo</a>(positive_p, digits_start, digits_end, num_digits,</div><div class="line"><a name="l04186"></a><span class="lineno"> 4186</span>  <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(base-1));</div><div class="line"><a name="l04187"></a><span class="lineno"> 4187</span> </div><div class="line"><a name="l04188"></a><span class="lineno"> 4188</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(arg);</div><div class="line"><a name="l04189"></a><span class="lineno"> 4189</span> </div><div class="line"><a name="l04190"></a><span class="lineno"> 4190</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l04191"></a><span class="lineno"> 4191</span> }</div><div class="line"><a name="l04192"></a><span class="lineno"> 4192</span> </div><div class="line"><a name="l04193"></a><span class="lineno"> 4193</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04194"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a96a6326d41bc1612171873b3046f1d8c"> 4194</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a96a6326d41bc1612171873b3046f1d8c">rb_str2big_normal</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l04195"></a><span class="lineno"> 4195</span> {</div><div class="line"><a name="l04196"></a><span class="lineno"> 4196</span>  <span class="keywordtype">int</span> positive_p = 1;</div><div class="line"><a name="l04197"></a><span class="lineno"> 4197</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *s, *str;</div><div class="line"><a name="l04198"></a><span class="lineno"> 4198</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start, *digits_end;</div><div class="line"><a name="l04199"></a><span class="lineno"> 4199</span>  <span class="keywordtype">size_t</span> num_digits;</div><div class="line"><a name="l04200"></a><span class="lineno"> 4200</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l04201"></a><span class="lineno"> 4201</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l04202"></a><span class="lineno"> 4202</span> </div><div class="line"><a name="l04203"></a><span class="lineno"> 4203</span>  <span class="keywordtype">int</span> digits_per_bdigits_dbl;</div><div class="line"><a name="l04204"></a><span class="lineno"> 4204</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l04205"></a><span class="lineno"> 4205</span> </div><div class="line"><a name="l04206"></a><span class="lineno"> 4206</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base) {</div><div class="line"><a name="l04207"></a><span class="lineno"> 4207</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04208"></a><span class="lineno"> 4208</span>  }</div><div class="line"><a name="l04209"></a><span class="lineno"> 4209</span> </div><div class="line"><a name="l04210"></a><span class="lineno"> 4210</span>  <a class="code" href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a>(arg);</div><div class="line"><a name="l04211"></a><span class="lineno"> 4211</span>  s = str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(arg);</div><div class="line"><a name="l04212"></a><span class="lineno"> 4212</span>  <span class="keywordflow">if</span> (*str == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l04213"></a><span class="lineno"> 4213</span>  str++;</div><div class="line"><a name="l04214"></a><span class="lineno"> 4214</span>  positive_p = 0;</div><div class="line"><a name="l04215"></a><span class="lineno"> 4215</span>  }</div><div class="line"><a name="l04216"></a><span class="lineno"> 4216</span> </div><div class="line"><a name="l04217"></a><span class="lineno"> 4217</span>  digits_start = str;</div><div class="line"><a name="l04218"></a><span class="lineno"> 4218</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(s, str, base, badcheck, &num_digits, &len);</div><div class="line"><a name="l04219"></a><span class="lineno"> 4219</span>  digits_end = digits_start + len;</div><div class="line"><a name="l04220"></a><span class="lineno"> 4220</span> </div><div class="line"><a name="l04221"></a><span class="lineno"> 4221</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(base, &digits_per_bdigits_dbl);</div><div class="line"><a name="l04222"></a><span class="lineno"> 4222</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a>(num_digits, digits_per_bdigits_dbl)*2;</div><div class="line"><a name="l04223"></a><span class="lineno"> 4223</span> </div><div class="line"><a name="l04224"></a><span class="lineno"> 4224</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a6db70bfe77172cf5a863c8f7fdb80dda">str2big_normal</a>(positive_p, digits_start, digits_end,</div><div class="line"><a name="l04225"></a><span class="lineno"> 4225</span>  num_bdigits, base);</div><div class="line"><a name="l04226"></a><span class="lineno"> 4226</span> </div><div class="line"><a name="l04227"></a><span class="lineno"> 4227</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(arg);</div><div class="line"><a name="l04228"></a><span class="lineno"> 4228</span> </div><div class="line"><a name="l04229"></a><span class="lineno"> 4229</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l04230"></a><span class="lineno"> 4230</span> }</div><div class="line"><a name="l04231"></a><span class="lineno"> 4231</span> </div><div class="line"><a name="l04232"></a><span class="lineno"> 4232</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04233"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a85f03bdf9d27e914e1853c388fd3023d"> 4233</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a85f03bdf9d27e914e1853c388fd3023d">rb_str2big_karatsuba</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l04234"></a><span class="lineno"> 4234</span> {</div><div class="line"><a name="l04235"></a><span class="lineno"> 4235</span>  <span class="keywordtype">int</span> positive_p = 1;</div><div class="line"><a name="l04236"></a><span class="lineno"> 4236</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *s, *str;</div><div class="line"><a name="l04237"></a><span class="lineno"> 4237</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start, *digits_end;</div><div class="line"><a name="l04238"></a><span class="lineno"> 4238</span>  <span class="keywordtype">size_t</span> num_digits;</div><div class="line"><a name="l04239"></a><span class="lineno"> 4239</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l04240"></a><span class="lineno"> 4240</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l04241"></a><span class="lineno"> 4241</span> </div><div class="line"><a name="l04242"></a><span class="lineno"> 4242</span>  <span class="keywordtype">int</span> digits_per_bdigits_dbl;</div><div class="line"><a name="l04243"></a><span class="lineno"> 4243</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l04244"></a><span class="lineno"> 4244</span> </div><div class="line"><a name="l04245"></a><span class="lineno"> 4245</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base) {</div><div class="line"><a name="l04246"></a><span class="lineno"> 4246</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04247"></a><span class="lineno"> 4247</span>  }</div><div class="line"><a name="l04248"></a><span class="lineno"> 4248</span> </div><div class="line"><a name="l04249"></a><span class="lineno"> 4249</span>  <a class="code" href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a>(arg);</div><div class="line"><a name="l04250"></a><span class="lineno"> 4250</span>  s = str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(arg);</div><div class="line"><a name="l04251"></a><span class="lineno"> 4251</span>  <span class="keywordflow">if</span> (*str == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l04252"></a><span class="lineno"> 4252</span>  str++;</div><div class="line"><a name="l04253"></a><span class="lineno"> 4253</span>  positive_p = 0;</div><div class="line"><a name="l04254"></a><span class="lineno"> 4254</span>  }</div><div class="line"><a name="l04255"></a><span class="lineno"> 4255</span> </div><div class="line"><a name="l04256"></a><span class="lineno"> 4256</span>  digits_start = str;</div><div class="line"><a name="l04257"></a><span class="lineno"> 4257</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(s, str, base, badcheck, &num_digits, &len);</div><div class="line"><a name="l04258"></a><span class="lineno"> 4258</span>  digits_end = digits_start + len;</div><div class="line"><a name="l04259"></a><span class="lineno"> 4259</span> </div><div class="line"><a name="l04260"></a><span class="lineno"> 4260</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(base, &digits_per_bdigits_dbl);</div><div class="line"><a name="l04261"></a><span class="lineno"> 4261</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a>(num_digits, digits_per_bdigits_dbl)*2;</div><div class="line"><a name="l04262"></a><span class="lineno"> 4262</span> </div><div class="line"><a name="l04263"></a><span class="lineno"> 4263</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a321aafc27a7216d05c67c763661a6daa">str2big_karatsuba</a>(positive_p, digits_start, digits_end, num_digits,</div><div class="line"><a name="l04264"></a><span class="lineno"> 4264</span>  num_bdigits, digits_per_bdigits_dbl, base);</div><div class="line"><a name="l04265"></a><span class="lineno"> 4265</span> </div><div class="line"><a name="l04266"></a><span class="lineno"> 4266</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(arg);</div><div class="line"><a name="l04267"></a><span class="lineno"> 4267</span> </div><div class="line"><a name="l04268"></a><span class="lineno"> 4268</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l04269"></a><span class="lineno"> 4269</span> }</div><div class="line"><a name="l04270"></a><span class="lineno"> 4270</span> </div><div class="line"><a name="l04271"></a><span class="lineno"> 4271</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l04272"></a><span class="lineno"> 4272</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04273"></a><span class="lineno"> 4273</span> rb_str2big_gmp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg, <span class="keywordtype">int</span> base, <span class="keywordtype">int</span> badcheck)</div><div class="line"><a name="l04274"></a><span class="lineno"> 4274</span> {</div><div class="line"><a name="l04275"></a><span class="lineno"> 4275</span>  <span class="keywordtype">int</span> positive_p = 1;</div><div class="line"><a name="l04276"></a><span class="lineno"> 4276</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *s, *str;</div><div class="line"><a name="l04277"></a><span class="lineno"> 4277</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *digits_start, *digits_end;</div><div class="line"><a name="l04278"></a><span class="lineno"> 4278</span>  <span class="keywordtype">size_t</span> num_digits;</div><div class="line"><a name="l04279"></a><span class="lineno"> 4279</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l04280"></a><span class="lineno"> 4280</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l04281"></a><span class="lineno"> 4281</span> </div><div class="line"><a name="l04282"></a><span class="lineno"> 4282</span>  <span class="keywordtype">int</span> digits_per_bdigits_dbl;</div><div class="line"><a name="l04283"></a><span class="lineno"> 4283</span>  <span class="keywordtype">size_t</span> num_bdigits;</div><div class="line"><a name="l04284"></a><span class="lineno"> 4284</span> </div><div class="line"><a name="l04285"></a><span class="lineno"> 4285</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base) {</div><div class="line"><a name="l04286"></a><span class="lineno"> 4286</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04287"></a><span class="lineno"> 4287</span>  }</div><div class="line"><a name="l04288"></a><span class="lineno"> 4288</span> </div><div class="line"><a name="l04289"></a><span class="lineno"> 4289</span>  <a class="code" href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a>(arg);</div><div class="line"><a name="l04290"></a><span class="lineno"> 4290</span>  s = str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(arg);</div><div class="line"><a name="l04291"></a><span class="lineno"> 4291</span>  <span class="keywordflow">if</span> (*str == <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l04292"></a><span class="lineno"> 4292</span>  str++;</div><div class="line"><a name="l04293"></a><span class="lineno"> 4293</span>  positive_p = 0;</div><div class="line"><a name="l04294"></a><span class="lineno"> 4294</span>  }</div><div class="line"><a name="l04295"></a><span class="lineno"> 4295</span> </div><div class="line"><a name="l04296"></a><span class="lineno"> 4296</span>  digits_start = str;</div><div class="line"><a name="l04297"></a><span class="lineno"> 4297</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a>(s, str, base, badcheck, &num_digits, &len);</div><div class="line"><a name="l04298"></a><span class="lineno"> 4298</span>  digits_end = digits_start + len;</div><div class="line"><a name="l04299"></a><span class="lineno"> 4299</span> </div><div class="line"><a name="l04300"></a><span class="lineno"> 4300</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(base, &digits_per_bdigits_dbl);</div><div class="line"><a name="l04301"></a><span class="lineno"> 4301</span>  num_bdigits = <a class="code" href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a>(num_digits, digits_per_bdigits_dbl)*2;</div><div class="line"><a name="l04302"></a><span class="lineno"> 4302</span> </div><div class="line"><a name="l04303"></a><span class="lineno"> 4303</span>  z = str2big_gmp(positive_p, digits_start, digits_end, num_digits, num_bdigits, base);</div><div class="line"><a name="l04304"></a><span class="lineno"> 4304</span> </div><div class="line"><a name="l04305"></a><span class="lineno"> 4305</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(arg);</div><div class="line"><a name="l04306"></a><span class="lineno"> 4306</span> </div><div class="line"><a name="l04307"></a><span class="lineno"> 4307</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l04308"></a><span class="lineno"> 4308</span> }</div><div class="line"><a name="l04309"></a><span class="lineno"> 4309</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04310"></a><span class="lineno"> 4310</span> </div><div class="line"><a name="l04311"></a><span class="lineno"> 4311</span> <span class="preprocessor">#if HAVE_LONG_LONG</span></div><div class="line"><a name="l04312"></a><span class="lineno"> 4312</span> </div><div class="line"><a name="l04313"></a><span class="lineno"> 4313</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04314"></a><span class="lineno"> 4314</span> rb_ull2big(<span class="keywordtype">unsigned</span> LONG_LONG n)</div><div class="line"><a name="l04315"></a><span class="lineno"> 4315</span> {</div><div class="line"><a name="l04316"></a><span class="lineno"> 4316</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l04317"></a><span class="lineno"> 4317</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG_LONG), 1);</div><div class="line"><a name="l04318"></a><span class="lineno"> 4318</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *digits = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(big);</div><div class="line"><a name="l04319"></a><span class="lineno"> 4319</span> </div><div class="line"><a name="l04320"></a><span class="lineno"> 4320</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG_LONG</span></div><div class="line"><a name="l04321"></a><span class="lineno"> 4321</span>  digits[0] = n;</div><div class="line"><a name="l04322"></a><span class="lineno"> 4322</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l04323"></a><span class="lineno"> 4323</span>  <span class="keywordflow">for</span> (i = 0; i < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG_LONG); i++) {</div><div class="line"><a name="l04324"></a><span class="lineno"> 4324</span>  digits[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(n);</div><div class="line"><a name="l04325"></a><span class="lineno"> 4325</span>  n = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(n);</div><div class="line"><a name="l04326"></a><span class="lineno"> 4326</span>  }</div><div class="line"><a name="l04327"></a><span class="lineno"> 4327</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04328"></a><span class="lineno"> 4328</span> </div><div class="line"><a name="l04329"></a><span class="lineno"> 4329</span>  i = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG_LONG);</div><div class="line"><a name="l04330"></a><span class="lineno"> 4330</span>  <span class="keywordflow">while</span> (i-- && !digits[i]) ;</div><div class="line"><a name="l04331"></a><span class="lineno"> 4331</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a>(big, i+1);</div><div class="line"><a name="l04332"></a><span class="lineno"> 4332</span>  <span class="keywordflow">return</span> big;</div><div class="line"><a name="l04333"></a><span class="lineno"> 4333</span> }</div><div class="line"><a name="l04334"></a><span class="lineno"> 4334</span> </div><div class="line"><a name="l04335"></a><span class="lineno"> 4335</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04336"></a><span class="lineno"> 4336</span> rb_ll2big(LONG_LONG n)</div><div class="line"><a name="l04337"></a><span class="lineno"> 4337</span> {</div><div class="line"><a name="l04338"></a><span class="lineno"> 4338</span>  <span class="keywordtype">long</span> <a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a> = 0;</div><div class="line"><a name="l04339"></a><span class="lineno"> 4339</span>  <span class="keywordtype">unsigned</span> LONG_LONG u;</div><div class="line"><a name="l04340"></a><span class="lineno"> 4340</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big;</div><div class="line"><a name="l04341"></a><span class="lineno"> 4341</span> </div><div class="line"><a name="l04342"></a><span class="lineno"> 4342</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l04343"></a><span class="lineno"> 4343</span>  u = 1 + (<span class="keywordtype">unsigned</span> LONG_LONG)(-(n + 1)); <span class="comment">/* u = -n avoiding overflow */</span></div><div class="line"><a name="l04344"></a><span class="lineno"> 4344</span>  <a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a> = 1;</div><div class="line"><a name="l04345"></a><span class="lineno"> 4345</span>  }</div><div class="line"><a name="l04346"></a><span class="lineno"> 4346</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04347"></a><span class="lineno"> 4347</span>  u = n;</div><div class="line"><a name="l04348"></a><span class="lineno"> 4348</span>  }</div><div class="line"><a name="l04349"></a><span class="lineno"> 4349</span>  big = rb_ull2big(u);</div><div class="line"><a name="l04350"></a><span class="lineno"> 4350</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a>) {</div><div class="line"><a name="l04351"></a><span class="lineno"> 4351</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(big, 0);</div><div class="line"><a name="l04352"></a><span class="lineno"> 4352</span>  }</div><div class="line"><a name="l04353"></a><span class="lineno"> 4353</span>  <span class="keywordflow">return</span> big;</div><div class="line"><a name="l04354"></a><span class="lineno"> 4354</span> }</div><div class="line"><a name="l04355"></a><span class="lineno"> 4355</span> </div><div class="line"><a name="l04356"></a><span class="lineno"> 4356</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04357"></a><span class="lineno"> 4357</span> rb_ull2inum(<span class="keywordtype">unsigned</span> LONG_LONG n)</div><div class="line"><a name="l04358"></a><span class="lineno"> 4358</span> {</div><div class="line"><a name="l04359"></a><span class="lineno"> 4359</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a>(n)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(n);</div><div class="line"><a name="l04360"></a><span class="lineno"> 4360</span>  <span class="keywordflow">return</span> rb_ull2big(n);</div><div class="line"><a name="l04361"></a><span class="lineno"> 4361</span> }</div><div class="line"><a name="l04362"></a><span class="lineno"> 4362</span> </div><div class="line"><a name="l04363"></a><span class="lineno"> 4363</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04364"></a><span class="lineno"> 4364</span> rb_ll2inum(LONG_LONG n)</div><div class="line"><a name="l04365"></a><span class="lineno"> 4365</span> {</div><div class="line"><a name="l04366"></a><span class="lineno"> 4366</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac493d4e1ca36d6a84215aad4e6ea1b4d">FIXABLE</a>(n)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(n);</div><div class="line"><a name="l04367"></a><span class="lineno"> 4367</span>  <span class="keywordflow">return</span> rb_ll2big(n);</div><div class="line"><a name="l04368"></a><span class="lineno"> 4368</span> }</div><div class="line"><a name="l04369"></a><span class="lineno"> 4369</span> </div><div class="line"><a name="l04370"></a><span class="lineno"> 4370</span> <span class="preprocessor">#endif </span><span class="comment">/* HAVE_LONG_LONG */</span><span class="preprocessor"></span></div><div class="line"><a name="l04371"></a><span class="lineno"> 4371</span> </div><div class="line"><a name="l04372"></a><span class="lineno"> 4372</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04373"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a39aed7ea86e2b38c5e332a115e4a4704"> 4373</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a9e3c3097485d1c28752a2435b163058e">rb_cstr2inum</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *str, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04374"></a><span class="lineno"> 4374</span> {</div><div class="line"><a name="l04375"></a><span class="lineno"> 4375</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1cd4cd30b4ce5b52538392db6409651">rb_cstr_to_inum</a>(str, base, base==0);</div><div class="line"><a name="l04376"></a><span class="lineno"> 4376</span> }</div><div class="line"><a name="l04377"></a><span class="lineno"> 4377</span> </div><div class="line"><a name="l04378"></a><span class="lineno"> 4378</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04379"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#adb7b96277b9f4c3ebd1fae17487f4cba"> 4379</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7b153fcc4b4d55bd963c38def0a8a3cb">rb_str2inum</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04380"></a><span class="lineno"> 4380</span> {</div><div class="line"><a name="l04381"></a><span class="lineno"> 4381</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3c364897a7c673caf46ccdbf62536a07">rb_str_to_inum</a>(str, base, base==0);</div><div class="line"><a name="l04382"></a><span class="lineno"> 4382</span> }</div><div class="line"><a name="l04383"></a><span class="lineno"> 4383</span> </div><div class="line"><a name="l04384"></a><span class="lineno"> 4384</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04385"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345"> 4385</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> lshift_p, <span class="keywordtype">size_t</span> shift_numdigits, <span class="keywordtype">int</span> shift_numbits)</div><div class="line"><a name="l04386"></a><span class="lineno"> 4386</span> {</div><div class="line"><a name="l04387"></a><span class="lineno"> 4387</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>;</div><div class="line"><a name="l04388"></a><span class="lineno"> 4388</span>  <span class="keywordtype">long</span> s1;</div><div class="line"><a name="l04389"></a><span class="lineno"> 4389</span>  <span class="keywordtype">int</span> s2;</div><div class="line"><a name="l04390"></a><span class="lineno"> 4390</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l04391"></a><span class="lineno"> 4391</span>  <span class="keywordtype">long</span> xn;</div><div class="line"><a name="l04392"></a><span class="lineno"> 4392</span> </div><div class="line"><a name="l04393"></a><span class="lineno"> 4393</span>  <span class="keywordflow">if</span> (lshift_p) {</div><div class="line"><a name="l04394"></a><span class="lineno"> 4394</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a> < shift_numdigits) {</div><div class="line"><a name="l04395"></a><span class="lineno"> 4395</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big number"</span>);</div><div class="line"><a name="l04396"></a><span class="lineno"> 4396</span>  }</div><div class="line"><a name="l04397"></a><span class="lineno"> 4397</span>  s1 = shift_numdigits;</div><div class="line"><a name="l04398"></a><span class="lineno"> 4398</span>  s2 = shift_numbits;</div><div class="line"><a name="l04399"></a><span class="lineno"> 4399</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l04400"></a><span class="lineno"> 4400</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(xn+s1+1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l04401"></a><span class="lineno"> 4401</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l04402"></a><span class="lineno"> 4402</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, s1);</div><div class="line"><a name="l04403"></a><span class="lineno"> 4403</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l04404"></a><span class="lineno"> 4404</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>[xn+s1] = <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>+s1, xds, xn, s2);</div><div class="line"><a name="l04405"></a><span class="lineno"> 4405</span>  }</div><div class="line"><a name="l04406"></a><span class="lineno"> 4406</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04407"></a><span class="lineno"> 4407</span>  <span class="keywordtype">long</span> <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>;</div><div class="line"><a name="l04408"></a><span class="lineno"> 4408</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx;</div><div class="line"><a name="l04409"></a><span class="lineno"> 4409</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a> < shift_numdigits || (<span class="keywordtype">size_t</span>)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) <= shift_numdigits) {</div><div class="line"><a name="l04410"></a><span class="lineno"> 4410</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x) ||</div><div class="line"><a name="l04411"></a><span class="lineno"> 4411</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)))</div><div class="line"><a name="l04412"></a><span class="lineno"> 4412</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l04413"></a><span class="lineno"> 4413</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l04414"></a><span class="lineno"> 4414</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l04415"></a><span class="lineno"> 4415</span>  }</div><div class="line"><a name="l04416"></a><span class="lineno"> 4416</span>  s1 = shift_numdigits;</div><div class="line"><a name="l04417"></a><span class="lineno"> 4417</span>  s2 = shift_numbits;</div><div class="line"><a name="l04418"></a><span class="lineno"> 4418</span>  hibitsx = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&x, &xn);</div><div class="line"><a name="l04419"></a><span class="lineno"> 4419</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l04420"></a><span class="lineno"> 4420</span>  <span class="keywordflow">if</span> (xn <= s1) {</div><div class="line"><a name="l04421"></a><span class="lineno"> 4421</span>  <span class="keywordflow">return</span> hibitsx ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l04422"></a><span class="lineno"> 4422</span>  }</div><div class="line"><a name="l04423"></a><span class="lineno"> 4423</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a> = xn - s1;</div><div class="line"><a name="l04424"></a><span class="lineno"> 4424</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, 0);</div><div class="line"><a name="l04425"></a><span class="lineno"> 4425</span>  <a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l04426"></a><span class="lineno"> 4426</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(<a class="code" href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">zds</a>, xds+s1, <a class="code" href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">zn</a>, s2, hibitsx != 0 ? <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a> : 0);</div><div class="line"><a name="l04427"></a><span class="lineno"> 4427</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, hibitsx != 0);</div><div class="line"><a name="l04428"></a><span class="lineno"> 4428</span>  }</div><div class="line"><a name="l04429"></a><span class="lineno"> 4429</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l04430"></a><span class="lineno"> 4430</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l04431"></a><span class="lineno"> 4431</span> }</div><div class="line"><a name="l04432"></a><span class="lineno"> 4432</span> </div><div class="line"><a name="l04433"></a><span class="lineno"> 4433</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04434"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a082701a945ac77f49359d56d745fde21"> 4434</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a082701a945ac77f49359d56d745fde21">big_shift2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> lshift_p, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l04435"></a><span class="lineno"> 4435</span> {</div><div class="line"><a name="l04436"></a><span class="lineno"> 4436</span>  <span class="keywordtype">int</span> sign;</div><div class="line"><a name="l04437"></a><span class="lineno"> 4437</span>  <span class="keywordtype">size_t</span> lens[2];</div><div class="line"><a name="l04438"></a><span class="lineno"> 4438</span>  <span class="keywordtype">size_t</span> shift_numdigits;</div><div class="line"><a name="l04439"></a><span class="lineno"> 4439</span>  <span class="keywordtype">int</span> shift_numbits;</div><div class="line"><a name="l04440"></a><span class="lineno"> 4440</span> </div><div class="line"><a name="l04441"></a><span class="lineno"> 4441</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>));</div><div class="line"><a name="l04442"></a><span class="lineno"> 4442</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>));</div><div class="line"><a name="l04443"></a><span class="lineno"> 4443</span> </div><div class="line"><a name="l04444"></a><span class="lineno"> 4444</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(x))</div><div class="line"><a name="l04445"></a><span class="lineno"> 4445</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l04446"></a><span class="lineno"> 4446</span>  sign = <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(y, lens, <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(lens), <span class="keyword">sizeof</span>(<span class="keywordtype">size_t</span>), 0,</div><div class="line"><a name="l04447"></a><span class="lineno"> 4447</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|<a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l04448"></a><span class="lineno"> 4448</span>  <span class="keywordflow">if</span> (sign < 0) {</div><div class="line"><a name="l04449"></a><span class="lineno"> 4449</span>  lshift_p = !lshift_p;</div><div class="line"><a name="l04450"></a><span class="lineno"> 4450</span>  sign = -sign;</div><div class="line"><a name="l04451"></a><span class="lineno"> 4451</span>  }</div><div class="line"><a name="l04452"></a><span class="lineno"> 4452</span>  <span class="keywordflow">if</span> (lshift_p) {</div><div class="line"><a name="l04453"></a><span class="lineno"> 4453</span>  <span class="keywordflow">if</span> (1 < sign || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> <= lens[1])</div><div class="line"><a name="l04454"></a><span class="lineno"> 4454</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"shift width too big"</span>);</div><div class="line"><a name="l04455"></a><span class="lineno"> 4455</span>  }</div><div class="line"><a name="l04456"></a><span class="lineno"> 4456</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04457"></a><span class="lineno"> 4457</span>  <span class="keywordflow">if</span> (1 < sign || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> <= lens[1])</div><div class="line"><a name="l04458"></a><span class="lineno"> 4458</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l04459"></a><span class="lineno"> 4459</span>  }</div><div class="line"><a name="l04460"></a><span class="lineno"> 4460</span>  shift_numbits = (int)(lens[0] & (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1));</div><div class="line"><a name="l04461"></a><span class="lineno"> 4461</span>  shift_numdigits = (lens[0] >> <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1)) |</div><div class="line"><a name="l04462"></a><span class="lineno"> 4462</span>  (lens[1] << (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>*SIZEOF_SIZE_T - <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1)));</div><div class="line"><a name="l04463"></a><span class="lineno"> 4463</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(x, lshift_p, shift_numdigits, shift_numbits);</div><div class="line"><a name="l04464"></a><span class="lineno"> 4464</span> }</div><div class="line"><a name="l04465"></a><span class="lineno"> 4465</span> </div><div class="line"><a name="l04466"></a><span class="lineno"> 4466</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04467"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#abe7db8a1471a3e308ce3e39fc22ea010"> 4467</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#abe7db8a1471a3e308ce3e39fc22ea010">big_lshift</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>)</div><div class="line"><a name="l04468"></a><span class="lineno"> 4468</span> {</div><div class="line"><a name="l04469"></a><span class="lineno"> 4469</span>  <span class="keywordtype">long</span> s1 = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l04470"></a><span class="lineno"> 4470</span>  <span class="keywordtype">int</span> s2 = (int)(<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>%<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l04471"></a><span class="lineno"> 4471</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(x, 1, s1, s2);</div><div class="line"><a name="l04472"></a><span class="lineno"> 4472</span> }</div><div class="line"><a name="l04473"></a><span class="lineno"> 4473</span> </div><div class="line"><a name="l04474"></a><span class="lineno"> 4474</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04475"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a032eeb434262dd121fea1c51fa0613c9"> 4475</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a032eeb434262dd121fea1c51fa0613c9">big_rshift</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>)</div><div class="line"><a name="l04476"></a><span class="lineno"> 4476</span> {</div><div class="line"><a name="l04477"></a><span class="lineno"> 4477</span>  <span class="keywordtype">long</span> s1 = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l04478"></a><span class="lineno"> 4478</span>  <span class="keywordtype">int</span> s2 = (int)(<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>%<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>);</div><div class="line"><a name="l04479"></a><span class="lineno"> 4479</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(x, 0, s1, s2);</div><div class="line"><a name="l04480"></a><span class="lineno"> 4480</span> }</div><div class="line"><a name="l04481"></a><span class="lineno"> 4481</span> </div><div class="line"><a name="l04482"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864"> 4482</a></span> <span class="preprocessor">#define MAX_BASE36_POWER_TABLE_ENTRIES (SIZEOF_SIZE_T * CHAR_BIT + 1)</span></div><div class="line"><a name="l04483"></a><span class="lineno"> 4483</span> </div><div class="line"><a name="l04484"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7"> 4484</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a>[35][<a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a>];</div><div class="line"><a name="l04485"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a11b6a69f86842cb7a220bd51c00e045a"> 4485</a></span> <span class="keyword">static</span> <span class="keywordtype">size_t</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a11b6a69f86842cb7a220bd51c00e045a">base36_numdigits_cache</a>[35][<a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a>];</div><div class="line"><a name="l04486"></a><span class="lineno"> 4486</span> </div><div class="line"><a name="l04487"></a><span class="lineno"> 4487</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l04488"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af4cab5f578fd9f9377ab3d63c70c4f04"> 4488</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af4cab5f578fd9f9377ab3d63c70c4f04">power_cache_init</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l04489"></a><span class="lineno"> 4489</span> {</div><div class="line"><a name="l04490"></a><span class="lineno"> 4490</span>  <span class="keywordtype">int</span> i, j;</div><div class="line"><a name="l04491"></a><span class="lineno"> 4491</span>  <span class="keywordflow">for</span> (i = 0; i < 35; ++i) {</div><div class="line"><a name="l04492"></a><span class="lineno"> 4492</span>  <span class="keywordflow">for</span> (j = 0; j < <a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a>; ++j) {</div><div class="line"><a name="l04493"></a><span class="lineno"> 4493</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a>[i][j] = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04494"></a><span class="lineno"> 4494</span>  }</div><div class="line"><a name="l04495"></a><span class="lineno"> 4495</span>  }</div><div class="line"><a name="l04496"></a><span class="lineno"> 4496</span> }</div><div class="line"><a name="l04497"></a><span class="lineno"> 4497</span> </div><div class="line"><a name="l04498"></a><span class="lineno"> 4498</span> <span class="keyword">static</span> <span class="keyword">inline</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04499"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63"> 4499</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(<span class="keywordtype">int</span> base, <span class="keywordtype">int</span> power_level, <span class="keywordtype">size_t</span> *numdigits_ret)</div><div class="line"><a name="l04500"></a><span class="lineno"> 4500</span> {</div><div class="line"><a name="l04501"></a><span class="lineno"> 4501</span>  <span class="comment">/*</span></div><div class="line"><a name="l04502"></a><span class="lineno"> 4502</span> <span class="comment"> * MAX_BASE36_POWER_TABLE_ENTRIES is big enough to that</span></div><div class="line"><a name="l04503"></a><span class="lineno"> 4503</span> <span class="comment"> * base36_power_cache[base][MAX_BASE36_POWER_TABLE_ENTRIES-1] fills whole memory.</span></div><div class="line"><a name="l04504"></a><span class="lineno"> 4504</span> <span class="comment"> * So MAX_BASE36_POWER_TABLE_ENTRIES <= power_level is not possible to calculate.</span></div><div class="line"><a name="l04505"></a><span class="lineno"> 4505</span> <span class="comment"> *</span></div><div class="line"><a name="l04506"></a><span class="lineno"> 4506</span> <span class="comment"> * number-of-bytes =</span></div><div class="line"><a name="l04507"></a><span class="lineno"> 4507</span> <span class="comment"> * log256(base36_power_cache[base][MAX_BASE36_POWER_TABLE_ENTRIES-1]) =</span></div><div class="line"><a name="l04508"></a><span class="lineno"> 4508</span> <span class="comment"> * log256(maxpow_in_bdigit_dbl(base)**(2**(MAX_BASE36_POWER_TABLE_ENTRIES-1))) =</span></div><div class="line"><a name="l04509"></a><span class="lineno"> 4509</span> <span class="comment"> * log256(maxpow_in_bdigit_dbl(base)**(2**(SIZEOF_SIZE_T*CHAR_BIT))) =</span></div><div class="line"><a name="l04510"></a><span class="lineno"> 4510</span> <span class="comment"> * (2**(SIZEOF_SIZE_T*CHAR_BIT))*log256(maxpow_in_bdigit_dbl(base)) =</span></div><div class="line"><a name="l04511"></a><span class="lineno"> 4511</span> <span class="comment"> * (256**SIZEOF_SIZE_T)*log256(maxpow_in_bdigit_dbl(base)) ></span></div><div class="line"><a name="l04512"></a><span class="lineno"> 4512</span> <span class="comment"> * (256**SIZEOF_SIZE_T)*(sizeof(BDIGIT_DBL)-1) ></span></div><div class="line"><a name="l04513"></a><span class="lineno"> 4513</span> <span class="comment"> * 256**SIZEOF_SIZE_T</span></div><div class="line"><a name="l04514"></a><span class="lineno"> 4514</span> <span class="comment"> */</span></div><div class="line"><a name="l04515"></a><span class="lineno"> 4515</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a> <= power_level)</div><div class="line"><a name="l04516"></a><span class="lineno"> 4516</span>  <a class="code" href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a>(<span class="stringliteral">"too big power number requested: maxpow_in_bdigit_dbl(%d)**(2**%d)"</span>, base, power_level);</div><div class="line"><a name="l04517"></a><span class="lineno"> 4517</span> </div><div class="line"><a name="l04518"></a><span class="lineno"> 4518</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a>[base - 2][power_level])) {</div><div class="line"><a name="l04519"></a><span class="lineno"> 4519</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> power;</div><div class="line"><a name="l04520"></a><span class="lineno"> 4520</span>  <span class="keywordtype">size_t</span> numdigits;</div><div class="line"><a name="l04521"></a><span class="lineno"> 4521</span>  <span class="keywordflow">if</span> (power_level == 0) {</div><div class="line"><a name="l04522"></a><span class="lineno"> 4522</span>  <span class="keywordtype">int</span> numdigits0;</div><div class="line"><a name="l04523"></a><span class="lineno"> 4523</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> dd = <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(base, &numdigits0);</div><div class="line"><a name="l04524"></a><span class="lineno"> 4524</span>  power = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(2, 1);</div><div class="line"><a name="l04525"></a><span class="lineno"> 4525</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a364d0cb01e91a0fc47efecc51430ff0b">bdigitdbl2bary</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(power), 2, dd);</div><div class="line"><a name="l04526"></a><span class="lineno"> 4526</span>  numdigits = numdigits0;</div><div class="line"><a name="l04527"></a><span class="lineno"> 4527</span>  }</div><div class="line"><a name="l04528"></a><span class="lineno"> 4528</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04529"></a><span class="lineno"> 4529</span>  power = <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(base, power_level - 1, &numdigits)));</div><div class="line"><a name="l04530"></a><span class="lineno"> 4530</span>  numdigits *= 2;</div><div class="line"><a name="l04531"></a><span class="lineno"> 4531</span>  }</div><div class="line"><a name="l04532"></a><span class="lineno"> 4532</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a52a7a87783545094bfdd9c93c378f570">rb_obj_hide</a>(power);</div><div class="line"><a name="l04533"></a><span class="lineno"> 4533</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a>[base - 2][power_level] = power;</div><div class="line"><a name="l04534"></a><span class="lineno"> 4534</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a11b6a69f86842cb7a220bd51c00e045a">base36_numdigits_cache</a>[base - 2][power_level] = numdigits;</div><div class="line"><a name="l04535"></a><span class="lineno"> 4535</span>  <a class="code" href="../../d8/d16/gc_8c.html#adc7efe8997f04b5c275d7e7aed9169e3">rb_gc_register_mark_object</a>(power);</div><div class="line"><a name="l04536"></a><span class="lineno"> 4536</span>  }</div><div class="line"><a name="l04537"></a><span class="lineno"> 4537</span>  <span class="keywordflow">if</span> (numdigits_ret)</div><div class="line"><a name="l04538"></a><span class="lineno"> 4538</span>  *numdigits_ret = <a class="code" href="../../d1/dcc/bignum_8c.html#a11b6a69f86842cb7a220bd51c00e045a">base36_numdigits_cache</a>[base - 2][power_level];</div><div class="line"><a name="l04539"></a><span class="lineno"> 4539</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a>[base - 2][power_level];</div><div class="line"><a name="l04540"></a><span class="lineno"> 4540</span> }</div><div class="line"><a name="l04541"></a><span class="lineno"> 4541</span> </div><div class="line"><a name="l04542"></a><span class="lineno"> 4542</span> <span class="comment">/*</span></div><div class="line"><a name="l04543"></a><span class="lineno"> 4543</span> <span class="comment"> * deprecated. (used only from deprecated rb_big2str0)</span></div><div class="line"><a name="l04544"></a><span class="lineno"> 4544</span> <span class="comment"> *</span></div><div class="line"><a name="l04545"></a><span class="lineno"> 4545</span> <span class="comment"> * big2str_muraken_find_n1</span></div><div class="line"><a name="l04546"></a><span class="lineno"> 4546</span> <span class="comment"> *</span></div><div class="line"><a name="l04547"></a><span class="lineno"> 4547</span> <span class="comment"> * Let a natural number x is given by:</span></div><div class="line"><a name="l04548"></a><span class="lineno"> 4548</span> <span class="comment"> * x = 2^0 * x_0 + 2^1 * x_1 + ... + 2^(B*n_0 - 1) * x_{B*n_0 - 1},</span></div><div class="line"><a name="l04549"></a><span class="lineno"> 4549</span> <span class="comment"> * where B is BITSPERDIG (i.e. BDIGITS*CHAR_BIT) and n_0 is</span></div><div class="line"><a name="l04550"></a><span class="lineno"> 4550</span> <span class="comment"> * RBIGNUM_LEN(x).</span></div><div class="line"><a name="l04551"></a><span class="lineno"> 4551</span> <span class="comment"> *</span></div><div class="line"><a name="l04552"></a><span class="lineno"> 4552</span> <span class="comment"> * Now, we assume n_1 = min_n \{ n | 2^(B*n_0/2) <= b_1^(n_1) \}, so</span></div><div class="line"><a name="l04553"></a><span class="lineno"> 4553</span> <span class="comment"> * it is realized that 2^(B*n_0) <= {b_1}^{2*n_1}, where b_1 is a</span></div><div class="line"><a name="l04554"></a><span class="lineno"> 4554</span> <span class="comment"> * given radix number. And then, we have n_1 <= (B*n_0) /</span></div><div class="line"><a name="l04555"></a><span class="lineno"> 4555</span> <span class="comment"> * (2*log_2(b_1)), therefore n_1 is given by ceil((B*n_0) /</span></div><div class="line"><a name="l04556"></a><span class="lineno"> 4556</span> <span class="comment"> * (2*log_2(b_1))).</span></div><div class="line"><a name="l04557"></a><span class="lineno"> 4557</span> <span class="comment"> */</span></div><div class="line"><a name="l04558"></a><span class="lineno"> 4558</span> <span class="keyword">static</span> <span class="keywordtype">long</span></div><div class="line"><a name="l04559"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa8ee0929f2913179f2368ad8a71d9f23"> 4559</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa8ee0929f2913179f2368ad8a71d9f23">big2str_find_n1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04560"></a><span class="lineno"> 4560</span> {</div><div class="line"><a name="l04561"></a><span class="lineno"> 4561</span>  <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">double</span> log_2[] = {</div><div class="line"><a name="l04562"></a><span class="lineno"> 4562</span>  1.0, 1.58496250072116, 2.0,</div><div class="line"><a name="l04563"></a><span class="lineno"> 4563</span>  2.32192809488736, 2.58496250072116, 2.8073549220576,</div><div class="line"><a name="l04564"></a><span class="lineno"> 4564</span>  3.0, 3.16992500144231, 3.32192809488736,</div><div class="line"><a name="l04565"></a><span class="lineno"> 4565</span>  3.4594316186373, 3.58496250072116, 3.70043971814109,</div><div class="line"><a name="l04566"></a><span class="lineno"> 4566</span>  3.8073549220576, 3.90689059560852, 4.0,</div><div class="line"><a name="l04567"></a><span class="lineno"> 4567</span>  4.08746284125034, 4.16992500144231, 4.24792751344359,</div><div class="line"><a name="l04568"></a><span class="lineno"> 4568</span>  4.32192809488736, 4.39231742277876, 4.4594316186373,</div><div class="line"><a name="l04569"></a><span class="lineno"> 4569</span>  4.52356195605701, 4.58496250072116, 4.64385618977472,</div><div class="line"><a name="l04570"></a><span class="lineno"> 4570</span>  4.70043971814109, 4.75488750216347, 4.8073549220576,</div><div class="line"><a name="l04571"></a><span class="lineno"> 4571</span>  4.85798099512757, 4.90689059560852, 4.95419631038688,</div><div class="line"><a name="l04572"></a><span class="lineno"> 4572</span>  5.0, 5.04439411935845, 5.08746284125034,</div><div class="line"><a name="l04573"></a><span class="lineno"> 4573</span>  5.12928301694497, 5.16992500144231</div><div class="line"><a name="l04574"></a><span class="lineno"> 4574</span>  };</div><div class="line"><a name="l04575"></a><span class="lineno"> 4575</span>  <span class="keywordtype">long</span> bits;</div><div class="line"><a name="l04576"></a><span class="lineno"> 4576</span> </div><div class="line"><a name="l04577"></a><span class="lineno"> 4577</span>  <span class="keywordflow">if</span> (base < 2 || 36 < base)</div><div class="line"><a name="l04578"></a><span class="lineno"> 4578</span>  <a class="code" href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a>(<span class="stringliteral">"invalid radix %d"</span>, base);</div><div class="line"><a name="l04579"></a><span class="lineno"> 4579</span> </div><div class="line"><a name="l04580"></a><span class="lineno"> 4580</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(x)) {</div><div class="line"><a name="l04581"></a><span class="lineno"> 4581</span>  bits = (SIZEOF_LONG*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - 1)/2 + 1;</div><div class="line"><a name="l04582"></a><span class="lineno"> 4582</span>  }</div><div class="line"><a name="l04583"></a><span class="lineno"> 4583</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(x)) {</div><div class="line"><a name="l04584"></a><span class="lineno"> 4584</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l04585"></a><span class="lineno"> 4585</span>  }</div><div class="line"><a name="l04586"></a><span class="lineno"> 4586</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) >= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>) {</div><div class="line"><a name="l04587"></a><span class="lineno"> 4587</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `string'"</span>);</div><div class="line"><a name="l04588"></a><span class="lineno"> 4588</span>  }</div><div class="line"><a name="l04589"></a><span class="lineno"> 4589</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04590"></a><span class="lineno"> 4590</span>  bits = <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l04591"></a><span class="lineno"> 4591</span>  }</div><div class="line"><a name="l04592"></a><span class="lineno"> 4592</span> </div><div class="line"><a name="l04593"></a><span class="lineno"> 4593</span>  <span class="comment">/* @shyouhei note: vvvvvvvvvvvvv this cast is suspicious. But I believe it is OK, because if that cast loses data, this x value is too big, and should have raised RangeError. */</span></div><div class="line"><a name="l04594"></a><span class="lineno"> 4594</span>  <span class="keywordflow">return</span> (<span class="keywordtype">long</span>)ceil(((<span class="keywordtype">double</span>)bits)/log_2[base - 2]);</div><div class="line"><a name="l04595"></a><span class="lineno"> 4595</span> }</div><div class="line"><a name="l04596"></a><span class="lineno"> 4596</span> </div><div class="line"><a name="l04597"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html"> 4597</a></span> <span class="keyword">struct </span><a class="code" href="../../da/d6b/structbig2str__struct.html">big2str_struct</a> {</div><div class="line"><a name="l04598"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#aacd01bb352498ba62c3dbf16b8d73c48"> 4598</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#aacd01bb352498ba62c3dbf16b8d73c48">negative</a>;</div><div class="line"><a name="l04599"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0"> 4599</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>;</div><div class="line"><a name="l04600"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#a812327c200d07c2499e466e3e6b031a6"> 4600</a></span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> <a class="code" href="../../da/d6b/structbig2str__struct.html#a812327c200d07c2499e466e3e6b031a6">hbase2</a>;</div><div class="line"><a name="l04601"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2"> 4601</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2">hbase2_numdigits</a>;</div><div class="line"><a name="l04602"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6"> 4602</a></span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a>;</div><div class="line"><a name="l04603"></a><span class="lineno"><a class="line" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8"> 4603</a></span>  <span class="keywordtype">char</span> *<a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>;</div><div class="line"><a name="l04604"></a><span class="lineno"> 4604</span> };</div><div class="line"><a name="l04605"></a><span class="lineno"> 4605</span> </div><div class="line"><a name="l04606"></a><span class="lineno"> 4606</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l04607"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a57e999912fb012ca700086c9135a96f2"> 4607</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a57e999912fb012ca700086c9135a96f2">big2str_alloc</a>(<span class="keyword">struct</span> <a class="code" href="../../da/d6b/structbig2str__struct.html">big2str_struct</a> *b2s, <span class="keywordtype">size_t</span> len)</div><div class="line"><a name="l04608"></a><span class="lineno"> 4608</span> {</div><div class="line"><a name="l04609"></a><span class="lineno"> 4609</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>-1 < len)</div><div class="line"><a name="l04610"></a><span class="lineno"> 4610</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big number"</span>);</div><div class="line"><a name="l04611"></a><span class="lineno"> 4611</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a> = <a class="code" href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a>(0, (<span class="keywordtype">long</span>)(len + 1)); <span class="comment">/* plus one for sign */</span></div><div class="line"><a name="l04612"></a><span class="lineno"> 4612</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a>);</div><div class="line"><a name="l04613"></a><span class="lineno"> 4613</span>  <span class="keywordflow">if</span> (b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#aacd01bb352498ba62c3dbf16b8d73c48">negative</a>)</div><div class="line"><a name="l04614"></a><span class="lineno"> 4614</span>  *b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>++ = <span class="charliteral">'-'</span>;</div><div class="line"><a name="l04615"></a><span class="lineno"> 4615</span> }</div><div class="line"><a name="l04616"></a><span class="lineno"> 4616</span> </div><div class="line"><a name="l04617"></a><span class="lineno"> 4617</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l04618"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64"> 4618</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64">big2str_2bdigits</a>(<span class="keyword">struct</span> <a class="code" href="../../da/d6b/structbig2str__struct.html">big2str_struct</a> *b2s, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keywordtype">size_t</span> taillen)</div><div class="line"><a name="l04619"></a><span class="lineno"> 4619</span> {</div><div class="line"><a name="l04620"></a><span class="lineno"> 4620</span>  <span class="keywordtype">size_t</span> j;</div><div class="line"><a name="l04621"></a><span class="lineno"> 4621</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num;</div><div class="line"><a name="l04622"></a><span class="lineno"> 4622</span>  <span class="keywordtype">char</span> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[<a class="code" href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5">SIZEOF_BDIGIT_DBL</a>*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>], *p;</div><div class="line"><a name="l04623"></a><span class="lineno"> 4623</span>  <span class="keywordtype">int</span> beginning = !b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>;</div><div class="line"><a name="l04624"></a><span class="lineno"> 4624</span>  <span class="keywordtype">size_t</span> len = 0;</div><div class="line"><a name="l04625"></a><span class="lineno"> 4625</span> </div><div class="line"><a name="l04626"></a><span class="lineno"> 4626</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn <= 2);</div><div class="line"><a name="l04627"></a><span class="lineno"> 4627</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(xds, xn);</div><div class="line"><a name="l04628"></a><span class="lineno"> 4628</span> </div><div class="line"><a name="l04629"></a><span class="lineno"> 4629</span>  <span class="keywordflow">if</span> (beginning) {</div><div class="line"><a name="l04630"></a><span class="lineno"> 4630</span>  <span class="keywordflow">if</span> (num == 0)</div><div class="line"><a name="l04631"></a><span class="lineno"> 4631</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l04632"></a><span class="lineno"> 4632</span>  p = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l04633"></a><span class="lineno"> 4633</span>  j = <span class="keyword">sizeof</span>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>);</div><div class="line"><a name="l04634"></a><span class="lineno"> 4634</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l04635"></a><span class="lineno"> 4635</span>  p[--j] = <a class="code" href="../../d1/dcc/bignum_8c.html#a8f14b025e8bf5b70997841c99f74c03f">ruby_digitmap</a>[num % b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>];</div><div class="line"><a name="l04636"></a><span class="lineno"> 4636</span>  num /= b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>;</div><div class="line"><a name="l04637"></a><span class="lineno"> 4637</span>  } <span class="keywordflow">while</span> (num);</div><div class="line"><a name="l04638"></a><span class="lineno"> 4638</span>  len = <span class="keyword">sizeof</span>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>) - j;</div><div class="line"><a name="l04639"></a><span class="lineno"> 4639</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a57e999912fb012ca700086c9135a96f2">big2str_alloc</a>(b2s, len + taillen);</div><div class="line"><a name="l04640"></a><span class="lineno"> 4640</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> + j, <span class="keywordtype">char</span>, len);</div><div class="line"><a name="l04641"></a><span class="lineno"> 4641</span>  }</div><div class="line"><a name="l04642"></a><span class="lineno"> 4642</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04643"></a><span class="lineno"> 4643</span>  p = b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>;</div><div class="line"><a name="l04644"></a><span class="lineno"> 4644</span>  j = b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2">hbase2_numdigits</a>;</div><div class="line"><a name="l04645"></a><span class="lineno"> 4645</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l04646"></a><span class="lineno"> 4646</span>  p[--j] = <a class="code" href="../../d1/dcc/bignum_8c.html#a8f14b025e8bf5b70997841c99f74c03f">ruby_digitmap</a>[num % b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>];</div><div class="line"><a name="l04647"></a><span class="lineno"> 4647</span>  num /= b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>;</div><div class="line"><a name="l04648"></a><span class="lineno"> 4648</span>  } <span class="keywordflow">while</span> (j);</div><div class="line"><a name="l04649"></a><span class="lineno"> 4649</span>  len = b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2">hbase2_numdigits</a>;</div><div class="line"><a name="l04650"></a><span class="lineno"> 4650</span>  }</div><div class="line"><a name="l04651"></a><span class="lineno"> 4651</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> += len;</div><div class="line"><a name="l04652"></a><span class="lineno"> 4652</span> }</div><div class="line"><a name="l04653"></a><span class="lineno"> 4653</span> </div><div class="line"><a name="l04654"></a><span class="lineno"> 4654</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l04655"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565"> 4655</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565">big2str_karatsuba</a>(<span class="keyword">struct</span> <a class="code" href="../../da/d6b/structbig2str__struct.html">big2str_struct</a> *b2s, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, <span class="keywordtype">size_t</span> xn, <span class="keywordtype">size_t</span> wn,</div><div class="line"><a name="l04656"></a><span class="lineno"> 4656</span>  <span class="keywordtype">int</span> power_level, <span class="keywordtype">size_t</span> taillen)</div><div class="line"><a name="l04657"></a><span class="lineno"> 4657</span> {</div><div class="line"><a name="l04658"></a><span class="lineno"> 4658</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> b;</div><div class="line"><a name="l04659"></a><span class="lineno"> 4659</span>  <span class="keywordtype">size_t</span> half_numdigits, lower_numdigits;</div><div class="line"><a name="l04660"></a><span class="lineno"> 4660</span>  <span class="keywordtype">int</span> lower_power_level;</div><div class="line"><a name="l04661"></a><span class="lineno"> 4661</span>  <span class="keywordtype">size_t</span> bn;</div><div class="line"><a name="l04662"></a><span class="lineno"> 4662</span>  <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *bds;</div><div class="line"><a name="l04663"></a><span class="lineno"> 4663</span>  <span class="keywordtype">size_t</span> len;</div><div class="line"><a name="l04664"></a><span class="lineno"> 4664</span> </div><div class="line"><a name="l04665"></a><span class="lineno"> 4665</span>  <span class="comment">/*</span></div><div class="line"><a name="l04666"></a><span class="lineno"> 4666</span> <span class="comment"> * Precondition:</span></div><div class="line"><a name="l04667"></a><span class="lineno"> 4667</span> <span class="comment"> * abs(x) < maxpow**(2**power_level)</span></div><div class="line"><a name="l04668"></a><span class="lineno"> 4668</span> <span class="comment"> * where</span></div><div class="line"><a name="l04669"></a><span class="lineno"> 4669</span> <span class="comment"> * maxpow = maxpow_in_bdigit_dbl(base, &numdigits)</span></div><div class="line"><a name="l04670"></a><span class="lineno"> 4670</span> <span class="comment"> *</span></div><div class="line"><a name="l04671"></a><span class="lineno"> 4671</span> <span class="comment"> * This function generates sequence of zeros, and then stringized abs(x) into b2s->ptr.</span></div><div class="line"><a name="l04672"></a><span class="lineno"> 4672</span> <span class="comment"> *</span></div><div class="line"><a name="l04673"></a><span class="lineno"> 4673</span> <span class="comment"> * b2s->ptr can be NULL.</span></div><div class="line"><a name="l04674"></a><span class="lineno"> 4674</span> <span class="comment"> * It is allocated when the first character is generated via big2str_alloc.</span></div><div class="line"><a name="l04675"></a><span class="lineno"> 4675</span> <span class="comment"> *</span></div><div class="line"><a name="l04676"></a><span class="lineno"> 4676</span> <span class="comment"> * The prefix zeros should be generated if and only if b2s->ptr is not NULL.</span></div><div class="line"><a name="l04677"></a><span class="lineno"> 4677</span> <span class="comment"> * When the zeros are generated, the zeros and abs(x) consists</span></div><div class="line"><a name="l04678"></a><span class="lineno"> 4678</span> <span class="comment"> * numdigits*(2**power_level) characters at total.</span></div><div class="line"><a name="l04679"></a><span class="lineno"> 4679</span> <span class="comment"> *</span></div><div class="line"><a name="l04680"></a><span class="lineno"> 4680</span> <span class="comment"> * Note:</span></div><div class="line"><a name="l04681"></a><span class="lineno"> 4681</span> <span class="comment"> * power_cache_get_power(base, power_level, &len) may not be cached yet. It should not be called.</span></div><div class="line"><a name="l04682"></a><span class="lineno"> 4682</span> <span class="comment"> * power_cache_get_power(base, power_level-1, &len) should be cached already if 0 <= power_level-1.</span></div><div class="line"><a name="l04683"></a><span class="lineno"> 4683</span> <span class="comment"> */</span></div><div class="line"><a name="l04684"></a><span class="lineno"> 4684</span> </div><div class="line"><a name="l04685"></a><span class="lineno"> 4685</span>  <span class="keywordflow">if</span> (xn == 0 || <a class="code" href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a>(xds, xn)) {</div><div class="line"><a name="l04686"></a><span class="lineno"> 4686</span>  <span class="keywordflow">if</span> (b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>) {</div><div class="line"><a name="l04687"></a><span class="lineno"> 4687</span>  <span class="comment">/* When x is zero, power_cache_get_power(base, power_level) should be cached already. */</span></div><div class="line"><a name="l04688"></a><span class="lineno"> 4688</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, power_level, &len);</div><div class="line"><a name="l04689"></a><span class="lineno"> 4689</span>  memset(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>, <span class="charliteral">'0'</span>, len);</div><div class="line"><a name="l04690"></a><span class="lineno"> 4690</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> += len;</div><div class="line"><a name="l04691"></a><span class="lineno"> 4691</span>  }</div><div class="line"><a name="l04692"></a><span class="lineno"> 4692</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l04693"></a><span class="lineno"> 4693</span>  }</div><div class="line"><a name="l04694"></a><span class="lineno"> 4694</span> </div><div class="line"><a name="l04695"></a><span class="lineno"> 4695</span>  <span class="keywordflow">if</span> (power_level == 0) {</div><div class="line"><a name="l04696"></a><span class="lineno"> 4696</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64">big2str_2bdigits</a>(b2s, xds, xn, taillen);</div><div class="line"><a name="l04697"></a><span class="lineno"> 4697</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l04698"></a><span class="lineno"> 4698</span>  }</div><div class="line"><a name="l04699"></a><span class="lineno"> 4699</span> </div><div class="line"><a name="l04700"></a><span class="lineno"> 4700</span>  lower_power_level = power_level-1;</div><div class="line"><a name="l04701"></a><span class="lineno"> 4701</span>  b = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, lower_power_level, &lower_numdigits);</div><div class="line"><a name="l04702"></a><span class="lineno"> 4702</span>  bn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(b);</div><div class="line"><a name="l04703"></a><span class="lineno"> 4703</span>  bds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(b);</div><div class="line"><a name="l04704"></a><span class="lineno"> 4704</span> </div><div class="line"><a name="l04705"></a><span class="lineno"> 4705</span>  half_numdigits = lower_numdigits;</div><div class="line"><a name="l04706"></a><span class="lineno"> 4706</span> </div><div class="line"><a name="l04707"></a><span class="lineno"> 4707</span>  <span class="keywordflow">while</span> (0 < lower_power_level &&</div><div class="line"><a name="l04708"></a><span class="lineno"> 4708</span>  (xn < bn ||</div><div class="line"><a name="l04709"></a><span class="lineno"> 4709</span>  (xn == bn && <a class="code" href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f">bary_cmp</a>(xds, xn, bds, bn) < 0))) {</div><div class="line"><a name="l04710"></a><span class="lineno"> 4710</span>  lower_power_level--;</div><div class="line"><a name="l04711"></a><span class="lineno"> 4711</span>  b = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, lower_power_level, &lower_numdigits);</div><div class="line"><a name="l04712"></a><span class="lineno"> 4712</span>  bn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(b);</div><div class="line"><a name="l04713"></a><span class="lineno"> 4713</span>  bds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(b);</div><div class="line"><a name="l04714"></a><span class="lineno"> 4714</span>  }</div><div class="line"><a name="l04715"></a><span class="lineno"> 4715</span> </div><div class="line"><a name="l04716"></a><span class="lineno"> 4716</span>  <span class="keywordflow">if</span> (lower_power_level == 0 &&</div><div class="line"><a name="l04717"></a><span class="lineno"> 4717</span>  (xn < bn ||</div><div class="line"><a name="l04718"></a><span class="lineno"> 4718</span>  (xn == bn && <a class="code" href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f">bary_cmp</a>(xds, xn, bds, bn) < 0))) {</div><div class="line"><a name="l04719"></a><span class="lineno"> 4719</span>  <span class="keywordflow">if</span> (b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>) {</div><div class="line"><a name="l04720"></a><span class="lineno"> 4720</span>  len = half_numdigits * 2 - lower_numdigits;</div><div class="line"><a name="l04721"></a><span class="lineno"> 4721</span>  memset(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>, <span class="charliteral">'0'</span>, len);</div><div class="line"><a name="l04722"></a><span class="lineno"> 4722</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> += len;</div><div class="line"><a name="l04723"></a><span class="lineno"> 4723</span>  }</div><div class="line"><a name="l04724"></a><span class="lineno"> 4724</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64">big2str_2bdigits</a>(b2s, xds, xn, taillen);</div><div class="line"><a name="l04725"></a><span class="lineno"> 4725</span>  }</div><div class="line"><a name="l04726"></a><span class="lineno"> 4726</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04727"></a><span class="lineno"> 4727</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, *rds;</div><div class="line"><a name="l04728"></a><span class="lineno"> 4728</span>  <span class="keywordtype">size_t</span> qn, rn;</div><div class="line"><a name="l04729"></a><span class="lineno"> 4729</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *tds;</div><div class="line"><a name="l04730"></a><span class="lineno"> 4730</span>  <span class="keywordtype">int</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l04731"></a><span class="lineno"> 4731</span> </div><div class="line"><a name="l04732"></a><span class="lineno"> 4732</span>  <span class="keywordflow">if</span> (lower_power_level != power_level-1 && b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>) {</div><div class="line"><a name="l04733"></a><span class="lineno"> 4733</span>  len = (half_numdigits - lower_numdigits) * 2;</div><div class="line"><a name="l04734"></a><span class="lineno"> 4734</span>  memset(b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a>, <span class="charliteral">'0'</span>, len);</div><div class="line"><a name="l04735"></a><span class="lineno"> 4735</span>  b2s-><a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> += len;</div><div class="line"><a name="l04736"></a><span class="lineno"> 4736</span>  }</div><div class="line"><a name="l04737"></a><span class="lineno"> 4737</span> </div><div class="line"><a name="l04738"></a><span class="lineno"> 4738</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(bds[bn-1]);</div><div class="line"><a name="l04739"></a><span class="lineno"> 4739</span> </div><div class="line"><a name="l04740"></a><span class="lineno"> 4740</span>  qn = xn + <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a>;</div><div class="line"><a name="l04741"></a><span class="lineno"> 4741</span> </div><div class="line"><a name="l04742"></a><span class="lineno"> 4742</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> == 0) {</div><div class="line"><a name="l04743"></a><span class="lineno"> 4743</span>  <span class="comment">/* bigdivrem_restoring will not modify y.</span></div><div class="line"><a name="l04744"></a><span class="lineno"> 4744</span> <span class="comment"> * So use bds directly. */</span></div><div class="line"><a name="l04745"></a><span class="lineno"> 4745</span>  tds = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *)bds;</div><div class="line"><a name="l04746"></a><span class="lineno"> 4746</span>  xds[xn] = 0;</div><div class="line"><a name="l04747"></a><span class="lineno"> 4747</span>  }</div><div class="line"><a name="l04748"></a><span class="lineno"> 4748</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04749"></a><span class="lineno"> 4749</span>  <span class="comment">/* bigdivrem_restoring will modify y.</span></div><div class="line"><a name="l04750"></a><span class="lineno"> 4750</span> <span class="comment"> * So use temporary buffer. */</span></div><div class="line"><a name="l04751"></a><span class="lineno"> 4751</span>  tds = xds + qn;</div><div class="line"><a name="l04752"></a><span class="lineno"> 4752</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(qn + bn <= xn + wn);</div><div class="line"><a name="l04753"></a><span class="lineno"> 4753</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(tds, bds, bn, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>);</div><div class="line"><a name="l04754"></a><span class="lineno"> 4754</span>  xds[xn] = <a class="code" href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a>(xds, xds, xn, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>);</div><div class="line"><a name="l04755"></a><span class="lineno"> 4755</span>  }</div><div class="line"><a name="l04756"></a><span class="lineno"> 4756</span> </div><div class="line"><a name="l04757"></a><span class="lineno"> 4757</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa66bf4e492bf67f68d75efbfa1ed0d92">bigdivrem_restoring</a>(xds, qn, tds, bn);</div><div class="line"><a name="l04758"></a><span class="lineno"> 4758</span> </div><div class="line"><a name="l04759"></a><span class="lineno"> 4759</span>  rds = xds;</div><div class="line"><a name="l04760"></a><span class="lineno"> 4760</span>  rn = bn;</div><div class="line"><a name="l04761"></a><span class="lineno"> 4761</span> </div><div class="line"><a name="l04762"></a><span class="lineno"> 4762</span>  qds = xds + bn;</div><div class="line"><a name="l04763"></a><span class="lineno"> 4763</span>  qn = qn - bn;</div><div class="line"><a name="l04764"></a><span class="lineno"> 4764</span> </div><div class="line"><a name="l04765"></a><span class="lineno"> 4765</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>) {</div><div class="line"><a name="l04766"></a><span class="lineno"> 4766</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a>(rds, rds, rn, <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>, 0);</div><div class="line"><a name="l04767"></a><span class="lineno"> 4767</span>  }</div><div class="line"><a name="l04768"></a><span class="lineno"> 4768</span> </div><div class="line"><a name="l04769"></a><span class="lineno"> 4769</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(qds, qn);</div><div class="line"><a name="l04770"></a><span class="lineno"> 4770</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(qn <= bn);</div><div class="line"><a name="l04771"></a><span class="lineno"> 4771</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565">big2str_karatsuba</a>(b2s, qds, qn, xn+wn - (rn+qn), lower_power_level, lower_numdigits+taillen);</div><div class="line"><a name="l04772"></a><span class="lineno"> 4772</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(rds, rn);</div><div class="line"><a name="l04773"></a><span class="lineno"> 4773</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565">big2str_karatsuba</a>(b2s, rds, rn, xn+wn - rn, lower_power_level, taillen);</div><div class="line"><a name="l04774"></a><span class="lineno"> 4774</span>  }</div><div class="line"><a name="l04775"></a><span class="lineno"> 4775</span> }</div><div class="line"><a name="l04776"></a><span class="lineno"> 4776</span> </div><div class="line"><a name="l04777"></a><span class="lineno"> 4777</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04778"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a2501a5fd9af709daa897ef5aefbf0e5e"> 4778</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a2501a5fd9af709daa897ef5aefbf0e5e">big2str_base_poweroftwo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04779"></a><span class="lineno"> 4779</span> {</div><div class="line"><a name="l04780"></a><span class="lineno"> 4780</span>  <span class="keywordtype">int</span> word_numbits = <a class="code" href="../../d3/d90/missing_8h.html#ab7a3e36d3032ed55666ca9a97d7ea672">ffs</a>(base) - 1;</div><div class="line"><a name="l04781"></a><span class="lineno"> 4781</span>  <span class="keywordtype">size_t</span> numwords;</div><div class="line"><a name="l04782"></a><span class="lineno"> 4782</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l04783"></a><span class="lineno"> 4783</span>  <span class="keywordtype">char</span> *ptr;</div><div class="line"><a name="l04784"></a><span class="lineno"> 4784</span>  numwords = <a class="code" href="../../d1/dcc/bignum_8c.html#a4d13f72afe245927b1eea45acde5c842">rb_absint_numwords</a>(x, word_numbits, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04785"></a><span class="lineno"> 4785</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a>(x)) {</div><div class="line"><a name="l04786"></a><span class="lineno"> 4786</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>-1 < numwords)</div><div class="line"><a name="l04787"></a><span class="lineno"> 4787</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big number"</span>);</div><div class="line"><a name="l04788"></a><span class="lineno"> 4788</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = <a class="code" href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a>(0, 1+numwords);</div><div class="line"><a name="l04789"></a><span class="lineno"> 4789</span>  ptr = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04790"></a><span class="lineno"> 4790</span>  *ptr++ = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x) ? <span class="charliteral">'+'</span> : <span class="charliteral">'-'</span>;</div><div class="line"><a name="l04791"></a><span class="lineno"> 4791</span>  }</div><div class="line"><a name="l04792"></a><span class="lineno"> 4792</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04793"></a><span class="lineno"> 4793</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a> < numwords)</div><div class="line"><a name="l04794"></a><span class="lineno"> 4794</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"too big number"</span>);</div><div class="line"><a name="l04795"></a><span class="lineno"> 4795</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = <a class="code" href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a>(0, numwords);</div><div class="line"><a name="l04796"></a><span class="lineno"> 4796</span>  ptr = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04797"></a><span class="lineno"> 4797</span>  }</div><div class="line"><a name="l04798"></a><span class="lineno"> 4798</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(x, ptr, numwords, 1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>-word_numbits,</div><div class="line"><a name="l04799"></a><span class="lineno"> 4799</span>  <a class="code" href="../../db/d2e/intern_8h.html#a7637d212c3fe8a0d7abd89a8554784b2">INTEGER_PACK_BIG_ENDIAN</a>);</div><div class="line"><a name="l04800"></a><span class="lineno"> 4800</span>  <span class="keywordflow">while</span> (0 < numwords) {</div><div class="line"><a name="l04801"></a><span class="lineno"> 4801</span>  *ptr = <a class="code" href="../../d1/dcc/bignum_8c.html#a8f14b025e8bf5b70997841c99f74c03f">ruby_digitmap</a>[*(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *)ptr];</div><div class="line"><a name="l04802"></a><span class="lineno"> 4802</span>  ptr++;</div><div class="line"><a name="l04803"></a><span class="lineno"> 4803</span>  numwords--;</div><div class="line"><a name="l04804"></a><span class="lineno"> 4804</span>  }</div><div class="line"><a name="l04805"></a><span class="lineno"> 4805</span>  <span class="keywordflow">return</span> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l04806"></a><span class="lineno"> 4806</span> }</div><div class="line"><a name="l04807"></a><span class="lineno"> 4807</span> </div><div class="line"><a name="l04808"></a><span class="lineno"> 4808</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04809"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a3ab066ccc8e77b1c1a7e0c74acaaa174"> 4809</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3ab066ccc8e77b1c1a7e0c74acaaa174">rb_big2str_poweroftwo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04810"></a><span class="lineno"> 4810</span> {</div><div class="line"><a name="l04811"></a><span class="lineno"> 4811</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a2501a5fd9af709daa897ef5aefbf0e5e">big2str_base_poweroftwo</a>(x, base);</div><div class="line"><a name="l04812"></a><span class="lineno"> 4812</span> }</div><div class="line"><a name="l04813"></a><span class="lineno"> 4813</span> </div><div class="line"><a name="l04814"></a><span class="lineno"> 4814</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04815"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a10824ba664c6cf3e0e560fcfe6a1abfe"> 4815</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a10824ba664c6cf3e0e560fcfe6a1abfe">big2str_generic</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> base)</div><div class="line"><a name="l04816"></a><span class="lineno"> 4816</span> {</div><div class="line"><a name="l04817"></a><span class="lineno"> 4817</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds;</div><div class="line"><a name="l04818"></a><span class="lineno"> 4818</span>  <span class="keywordtype">size_t</span> xn;</div><div class="line"><a name="l04819"></a><span class="lineno"> 4819</span>  <span class="keyword">struct </span><a class="code" href="../../da/d6b/structbig2str__struct.html">big2str_struct</a> b2s_data;</div><div class="line"><a name="l04820"></a><span class="lineno"> 4820</span>  <span class="keywordtype">int</span> power_level;</div><div class="line"><a name="l04821"></a><span class="lineno"> 4821</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> power;</div><div class="line"><a name="l04822"></a><span class="lineno"> 4822</span> </div><div class="line"><a name="l04823"></a><span class="lineno"> 4823</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l04824"></a><span class="lineno"> 4824</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l04825"></a><span class="lineno"> 4825</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l04826"></a><span class="lineno"> 4826</span> </div><div class="line"><a name="l04827"></a><span class="lineno"> 4827</span>  <span class="keywordflow">if</span> (xn == 0) {</div><div class="line"><a name="l04828"></a><span class="lineno"> 4828</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a99895fce59be905b7c7f0a88bd32fa1f">rb_usascii_str_new2</a>(<span class="stringliteral">"0"</span>);</div><div class="line"><a name="l04829"></a><span class="lineno"> 4829</span>  }</div><div class="line"><a name="l04830"></a><span class="lineno"> 4830</span> </div><div class="line"><a name="l04831"></a><span class="lineno"> 4831</span>  <span class="keywordflow">if</span> (<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a> < 2 || 36 < <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04832"></a><span class="lineno"> 4832</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04833"></a><span class="lineno"> 4833</span> </div><div class="line"><a name="l04834"></a><span class="lineno"> 4834</span>  <span class="keywordflow">if</span> (xn >= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>) {</div><div class="line"><a name="l04835"></a><span class="lineno"> 4835</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `string'"</span>);</div><div class="line"><a name="l04836"></a><span class="lineno"> 4836</span>  }</div><div class="line"><a name="l04837"></a><span class="lineno"> 4837</span> </div><div class="line"><a name="l04838"></a><span class="lineno"> 4838</span>  power_level = 0;</div><div class="line"><a name="l04839"></a><span class="lineno"> 4839</span>  power = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, power_level, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04840"></a><span class="lineno"> 4840</span>  <span class="keywordflow">while</span> (power_level < <a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a> &&</div><div class="line"><a name="l04841"></a><span class="lineno"> 4841</span>  (<span class="keywordtype">size_t</span>)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(power) <= (xn+1)/2) {</div><div class="line"><a name="l04842"></a><span class="lineno"> 4842</span>  power_level++;</div><div class="line"><a name="l04843"></a><span class="lineno"> 4843</span>  power = <a class="code" href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a>(<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, power_level, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04844"></a><span class="lineno"> 4844</span>  }</div><div class="line"><a name="l04845"></a><span class="lineno"> 4845</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(power_level != <a class="code" href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a>);</div><div class="line"><a name="l04846"></a><span class="lineno"> 4846</span> </div><div class="line"><a name="l04847"></a><span class="lineno"> 4847</span>  <span class="keywordflow">if</span> ((<span class="keywordtype">size_t</span>)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(power) <= xn) {</div><div class="line"><a name="l04848"></a><span class="lineno"> 4848</span>  <span class="comment">/*</span></div><div class="line"><a name="l04849"></a><span class="lineno"> 4849</span> <span class="comment"> * This increment guarantees x < power_cache_get_power(base, power_level)</span></div><div class="line"><a name="l04850"></a><span class="lineno"> 4850</span> <span class="comment"> * without invoking it actually.</span></div><div class="line"><a name="l04851"></a><span class="lineno"> 4851</span> <span class="comment"> * (power_cache_get_power(base, power_level) can be slow and not used</span></div><div class="line"><a name="l04852"></a><span class="lineno"> 4852</span> <span class="comment"> * in big2str_karatsuba.)</span></div><div class="line"><a name="l04853"></a><span class="lineno"> 4853</span> <span class="comment"> *</span></div><div class="line"><a name="l04854"></a><span class="lineno"> 4854</span> <span class="comment"> * Although it is possible that x < power_cache_get_power(base, power_level-1),</span></div><div class="line"><a name="l04855"></a><span class="lineno"> 4855</span> <span class="comment"> * it is no problem because big2str_karatsuba checks it and</span></div><div class="line"><a name="l04856"></a><span class="lineno"> 4856</span> <span class="comment"> * doesn't affect the result when b2s_data.ptr is NULL.</span></div><div class="line"><a name="l04857"></a><span class="lineno"> 4857</span> <span class="comment"> */</span></div><div class="line"><a name="l04858"></a><span class="lineno"> 4858</span>  power_level++;</div><div class="line"><a name="l04859"></a><span class="lineno"> 4859</span>  }</div><div class="line"><a name="l04860"></a><span class="lineno"> 4860</span> </div><div class="line"><a name="l04861"></a><span class="lineno"> 4861</span>  b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#aacd01bb352498ba62c3dbf16b8d73c48">negative</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a>(x);</div><div class="line"><a name="l04862"></a><span class="lineno"> 4862</span>  b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a> = <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>;</div><div class="line"><a name="l04863"></a><span class="lineno"> 4863</span>  b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a812327c200d07c2499e466e3e6b031a6">hbase2</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a>(<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, &b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2">hbase2_numdigits</a>);</div><div class="line"><a name="l04864"></a><span class="lineno"> 4864</span> </div><div class="line"><a name="l04865"></a><span class="lineno"> 4865</span>  b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04866"></a><span class="lineno"> 4866</span>  b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04867"></a><span class="lineno"> 4867</span> </div><div class="line"><a name="l04868"></a><span class="lineno"> 4868</span>  <span class="keywordflow">if</span> (power_level == 0) {</div><div class="line"><a name="l04869"></a><span class="lineno"> 4869</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64">big2str_2bdigits</a>(&b2s_data, xds, xn, 0);</div><div class="line"><a name="l04870"></a><span class="lineno"> 4870</span>  }</div><div class="line"><a name="l04871"></a><span class="lineno"> 4871</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04872"></a><span class="lineno"> 4872</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpw = 0;</div><div class="line"><a name="l04873"></a><span class="lineno"> 4873</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *wds;</div><div class="line"><a name="l04874"></a><span class="lineno"> 4874</span>  <span class="keywordtype">size_t</span> wn;</div><div class="line"><a name="l04875"></a><span class="lineno"> 4875</span>  wn = power_level * <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a> + <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(power);</div><div class="line"><a name="l04876"></a><span class="lineno"> 4876</span>  wds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, tmpw, xn + wn);</div><div class="line"><a name="l04877"></a><span class="lineno"> 4877</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a>(wds, xds, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>, xn);</div><div class="line"><a name="l04878"></a><span class="lineno"> 4878</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565">big2str_karatsuba</a>(&b2s_data, wds, xn, wn, power_level, 0);</div><div class="line"><a name="l04879"></a><span class="lineno"> 4879</span>  <span class="keywordflow">if</span> (tmpw)</div><div class="line"><a name="l04880"></a><span class="lineno"> 4880</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a>(tmpw);</div><div class="line"><a name="l04881"></a><span class="lineno"> 4881</span>  }</div><div class="line"><a name="l04882"></a><span class="lineno"> 4882</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l04883"></a><span class="lineno"> 4883</span> </div><div class="line"><a name="l04884"></a><span class="lineno"> 4884</span>  *b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l04885"></a><span class="lineno"> 4885</span>  <a class="code" href="../../db/d2e/intern_8h.html#a0a133856edb99f69eae3cb5a9e275ac9">rb_str_resize</a>(b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a>, (<span class="keywordtype">long</span>)(b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">ptr</a> - <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a>)));</div><div class="line"><a name="l04886"></a><span class="lineno"> 4886</span> </div><div class="line"><a name="l04887"></a><span class="lineno"> 4887</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l04888"></a><span class="lineno"> 4888</span>  <span class="keywordflow">return</span> b2s_data.<a class="code" href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">result</a>;</div><div class="line"><a name="l04889"></a><span class="lineno"> 4889</span> }</div><div class="line"><a name="l04890"></a><span class="lineno"> 4890</span> </div><div class="line"><a name="l04891"></a><span class="lineno"> 4891</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04892"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a23e46035be6ecf9cb9499e33b9797647"> 4892</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a23e46035be6ecf9cb9499e33b9797647">rb_big2str_generic</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04893"></a><span class="lineno"> 4893</span> {</div><div class="line"><a name="l04894"></a><span class="lineno"> 4894</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a10824ba664c6cf3e0e560fcfe6a1abfe">big2str_generic</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04895"></a><span class="lineno"> 4895</span> }</div><div class="line"><a name="l04896"></a><span class="lineno"> 4896</span> </div><div class="line"><a name="l04897"></a><span class="lineno"> 4897</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l04898"></a><span class="lineno"> 4898</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04899"></a><span class="lineno"> 4899</span> big2str_gmp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04900"></a><span class="lineno"> 4900</span> {</div><div class="line"><a name="l04901"></a><span class="lineno"> 4901</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> nails = (<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-<a class="code" href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a>)*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>;</div><div class="line"><a name="l04902"></a><span class="lineno"> 4902</span>  mpz_t mx;</div><div class="line"><a name="l04903"></a><span class="lineno"> 4903</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>;</div><div class="line"><a name="l04904"></a><span class="lineno"> 4904</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str;</div><div class="line"><a name="l04905"></a><span class="lineno"> 4905</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l04906"></a><span class="lineno"> 4906</span>  <span class="keywordtype">size_t</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l04907"></a><span class="lineno"> 4907</span> </div><div class="line"><a name="l04908"></a><span class="lineno"> 4908</span>  mpz_init(mx);</div><div class="line"><a name="l04909"></a><span class="lineno"> 4909</span>  mpz_import(mx, xn, -1, <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0, nails, xds);</div><div class="line"><a name="l04910"></a><span class="lineno"> 4910</span> </div><div class="line"><a name="l04911"></a><span class="lineno"> 4911</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = mpz_sizeinbase(mx, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04912"></a><span class="lineno"> 4912</span> </div><div class="line"><a name="l04913"></a><span class="lineno"> 4913</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a>(x)) {</div><div class="line"><a name="l04914"></a><span class="lineno"> 4914</span>  mpz_neg(mx, mx);</div><div class="line"><a name="l04915"></a><span class="lineno"> 4915</span>  str = <a class="code" href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a>(0, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>+1);</div><div class="line"><a name="l04916"></a><span class="lineno"> 4916</span>  }</div><div class="line"><a name="l04917"></a><span class="lineno"> 4917</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04918"></a><span class="lineno"> 4918</span>  str = <a class="code" href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a>(0, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l04919"></a><span class="lineno"> 4919</span>  }</div><div class="line"><a name="l04920"></a><span class="lineno"> 4920</span>  mpz_get_str(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str), <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, mx);</div><div class="line"><a name="l04921"></a><span class="lineno"> 4921</span>  mpz_clear(mx);</div><div class="line"><a name="l04922"></a><span class="lineno"> 4922</span> </div><div class="line"><a name="l04923"></a><span class="lineno"> 4923</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)[<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str)-1] == <span class="charliteral">'\0'</span>) {</div><div class="line"><a name="l04924"></a><span class="lineno"> 4924</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5c5ebfd0e728d29888e769606dec1757">rb_str_set_len</a>(str, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str)-1);</div><div class="line"><a name="l04925"></a><span class="lineno"> 4925</span>  }</div><div class="line"><a name="l04926"></a><span class="lineno"> 4926</span> </div><div class="line"><a name="l04927"></a><span class="lineno"> 4927</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l04928"></a><span class="lineno"> 4928</span>  <span class="keywordflow">return</span> str;</div><div class="line"><a name="l04929"></a><span class="lineno"> 4929</span> }</div><div class="line"><a name="l04930"></a><span class="lineno"> 4930</span> </div><div class="line"><a name="l04931"></a><span class="lineno"> 4931</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04932"></a><span class="lineno"> 4932</span> rb_big2str_gmp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04933"></a><span class="lineno"> 4933</span> {</div><div class="line"><a name="l04934"></a><span class="lineno"> 4934</span>  <span class="keywordflow">return</span> big2str_gmp(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04935"></a><span class="lineno"> 4935</span> }</div><div class="line"><a name="l04936"></a><span class="lineno"> 4936</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04937"></a><span class="lineno"> 4937</span> </div><div class="line"><a name="l04938"></a><span class="lineno"> 4938</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04939"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a0dd885d29a47ce6b2fcab367979bf048"> 4939</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a0dd885d29a47ce6b2fcab367979bf048">rb_big2str1</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04940"></a><span class="lineno"> 4940</span> {</div><div class="line"><a name="l04941"></a><span class="lineno"> 4941</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds;</div><div class="line"><a name="l04942"></a><span class="lineno"> 4942</span>  <span class="keywordtype">size_t</span> xn;</div><div class="line"><a name="l04943"></a><span class="lineno"> 4943</span> </div><div class="line"><a name="l04944"></a><span class="lineno"> 4944</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(x)) {</div><div class="line"><a name="l04945"></a><span class="lineno"> 4945</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a514248a396e8910d80016bc5d3785a81">rb_fix2str</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04946"></a><span class="lineno"> 4946</span>  }</div><div class="line"><a name="l04947"></a><span class="lineno"> 4947</span> </div><div class="line"><a name="l04948"></a><span class="lineno"> 4948</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(x);</div><div class="line"><a name="l04949"></a><span class="lineno"> 4949</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l04950"></a><span class="lineno"> 4950</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l04951"></a><span class="lineno"> 4951</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l04952"></a><span class="lineno"> 4952</span> </div><div class="line"><a name="l04953"></a><span class="lineno"> 4953</span>  <span class="keywordflow">if</span> (xn == 0) {</div><div class="line"><a name="l04954"></a><span class="lineno"> 4954</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a99895fce59be905b7c7f0a88bd32fa1f">rb_usascii_str_new2</a>(<span class="stringliteral">"0"</span>);</div><div class="line"><a name="l04955"></a><span class="lineno"> 4955</span>  }</div><div class="line"><a name="l04956"></a><span class="lineno"> 4956</span> </div><div class="line"><a name="l04957"></a><span class="lineno"> 4957</span>  <span class="keywordflow">if</span> (<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a> < 2 || 36 < <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l04958"></a><span class="lineno"> 4958</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"invalid radix %d"</span>, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04959"></a><span class="lineno"> 4959</span> </div><div class="line"><a name="l04960"></a><span class="lineno"> 4960</span>  <span class="keywordflow">if</span> (xn >= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>) {</div><div class="line"><a name="l04961"></a><span class="lineno"> 4961</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `string'"</span>);</div><div class="line"><a name="l04962"></a><span class="lineno"> 4962</span>  }</div><div class="line"><a name="l04963"></a><span class="lineno"> 4963</span> </div><div class="line"><a name="l04964"></a><span class="lineno"> 4964</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a>(<a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)) {</div><div class="line"><a name="l04965"></a><span class="lineno"> 4965</span>  <span class="comment">/* base == 2 || base == 4 || base == 8 || base == 16 || base == 32 */</span></div><div class="line"><a name="l04966"></a><span class="lineno"> 4966</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a2501a5fd9af709daa897ef5aefbf0e5e">big2str_base_poweroftwo</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04967"></a><span class="lineno"> 4967</span>  }</div><div class="line"><a name="l04968"></a><span class="lineno"> 4968</span> </div><div class="line"><a name="l04969"></a><span class="lineno"> 4969</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l04970"></a><span class="lineno"> 4970</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a608bd1c9d1d6da4baf95633eb21ca662">GMP_BIG2STR_DIGITS</a> < xn) {</div><div class="line"><a name="l04971"></a><span class="lineno"> 4971</span>  <span class="keywordflow">return</span> big2str_gmp(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04972"></a><span class="lineno"> 4972</span>  }</div><div class="line"><a name="l04973"></a><span class="lineno"> 4973</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04974"></a><span class="lineno"> 4974</span> </div><div class="line"><a name="l04975"></a><span class="lineno"> 4975</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a10824ba664c6cf3e0e560fcfe6a1abfe">big2str_generic</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04976"></a><span class="lineno"> 4976</span> }</div><div class="line"><a name="l04977"></a><span class="lineno"> 4977</span> </div><div class="line"><a name="l04978"></a><span class="lineno"> 4978</span> <span class="comment">/* deprecated */</span></div><div class="line"><a name="l04979"></a><span class="lineno"> 4979</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04980"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a992ef9095185105fb6fb192d6027195a"> 4980</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a992ef9095185105fb6fb192d6027195a">rb_big2str0</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>, <span class="keywordtype">int</span> trim)</div><div class="line"><a name="l04981"></a><span class="lineno"> 4981</span> {</div><div class="line"><a name="l04982"></a><span class="lineno"> 4982</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str;</div><div class="line"><a name="l04983"></a><span class="lineno"> 4983</span>  <span class="keywordtype">long</span> oldlen;</div><div class="line"><a name="l04984"></a><span class="lineno"> 4984</span>  <span class="keywordtype">long</span> n2;</div><div class="line"><a name="l04985"></a><span class="lineno"> 4985</span> </div><div class="line"><a name="l04986"></a><span class="lineno"> 4986</span>  str = <a class="code" href="../../d1/dcc/bignum_8c.html#a0dd885d29a47ce6b2fcab367979bf048">rb_big2str1</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04987"></a><span class="lineno"> 4987</span> </div><div class="line"><a name="l04988"></a><span class="lineno"> 4988</span>  <span class="keywordflow">if</span> (trim || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(x) || <a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(x))</div><div class="line"><a name="l04989"></a><span class="lineno"> 4989</span>  <span class="keywordflow">return</span> str;</div><div class="line"><a name="l04990"></a><span class="lineno"> 4990</span> </div><div class="line"><a name="l04991"></a><span class="lineno"> 4991</span>  oldlen = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str);</div><div class="line"><a name="l04992"></a><span class="lineno"> 4992</span>  <span class="keywordflow">if</span> (oldlen && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)[0] != <span class="charliteral">'-'</span>) {</div><div class="line"><a name="l04993"></a><span class="lineno"> 4993</span>  <a class="code" href="../../db/d2e/intern_8h.html#a0a133856edb99f69eae3cb5a9e275ac9">rb_str_resize</a>(str, oldlen+1);</div><div class="line"><a name="l04994"></a><span class="lineno"> 4994</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aad09de334c9b8c7f717d314b14679e62">MEMMOVE</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)+1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str), <span class="keywordtype">char</span>, oldlen);</div><div class="line"><a name="l04995"></a><span class="lineno"> 4995</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)[0] = <span class="charliteral">'+'</span>;</div><div class="line"><a name="l04996"></a><span class="lineno"> 4996</span>  }</div><div class="line"><a name="l04997"></a><span class="lineno"> 4997</span> </div><div class="line"><a name="l04998"></a><span class="lineno"> 4998</span>  n2 = <a class="code" href="../../d1/dcc/bignum_8c.html#aa8ee0929f2913179f2368ad8a71d9f23">big2str_find_n1</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l04999"></a><span class="lineno"> 4999</span> </div><div class="line"><a name="l05000"></a><span class="lineno"> 5000</span>  oldlen = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str);</div><div class="line"><a name="l05001"></a><span class="lineno"> 5001</span>  <span class="keywordflow">if</span> (oldlen-1 < n2) {</div><div class="line"><a name="l05002"></a><span class="lineno"> 5002</span>  <span class="keywordtype">long</span> off = n2 - (oldlen-1);</div><div class="line"><a name="l05003"></a><span class="lineno"> 5003</span>  <a class="code" href="../../db/d2e/intern_8h.html#a0a133856edb99f69eae3cb5a9e275ac9">rb_str_resize</a>(str, n2+1);</div><div class="line"><a name="l05004"></a><span class="lineno"> 5004</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aad09de334c9b8c7f717d314b14679e62">MEMMOVE</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)+1+off, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)+1, <span class="keywordtype">char</span>, oldlen-1);</div><div class="line"><a name="l05005"></a><span class="lineno"> 5005</span>  memset(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)+1, <span class="charliteral">'0'</span>, off);</div><div class="line"><a name="l05006"></a><span class="lineno"> 5006</span>  }</div><div class="line"><a name="l05007"></a><span class="lineno"> 5007</span> </div><div class="line"><a name="l05008"></a><span class="lineno"> 5008</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(str)[<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(str)] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l05009"></a><span class="lineno"> 5009</span> </div><div class="line"><a name="l05010"></a><span class="lineno"> 5010</span>  <span class="keywordflow">return</span> str;</div><div class="line"><a name="l05011"></a><span class="lineno"> 5011</span> }</div><div class="line"><a name="l05012"></a><span class="lineno"> 5012</span> </div><div class="line"><a name="l05013"></a><span class="lineno"> 5013</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05014"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#adcc16cb38b76de45fb81c43beaee7046"> 5014</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5cd9431ab7853e3adb7bf49cad4460f2">rb_big2str</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>)</div><div class="line"><a name="l05015"></a><span class="lineno"> 5015</span> {</div><div class="line"><a name="l05016"></a><span class="lineno"> 5016</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a0dd885d29a47ce6b2fcab367979bf048">rb_big2str1</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l05017"></a><span class="lineno"> 5017</span> }</div><div class="line"><a name="l05018"></a><span class="lineno"> 5018</span> </div><div class="line"><a name="l05019"></a><span class="lineno"> 5019</span> <span class="comment">/*</span></div><div class="line"><a name="l05020"></a><span class="lineno"> 5020</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05021"></a><span class="lineno"> 5021</span> <span class="comment"> * big.to_s(base=10) -> string</span></div><div class="line"><a name="l05022"></a><span class="lineno"> 5022</span> <span class="comment"> *</span></div><div class="line"><a name="l05023"></a><span class="lineno"> 5023</span> <span class="comment"> * Returns a string containing the representation of <i>big</i> radix</span></div><div class="line"><a name="l05024"></a><span class="lineno"> 5024</span> <span class="comment"> * <i>base</i> (2 through 36).</span></div><div class="line"><a name="l05025"></a><span class="lineno"> 5025</span> <span class="comment"> *</span></div><div class="line"><a name="l05026"></a><span class="lineno"> 5026</span> <span class="comment"> * 12345654321.to_s #=> "12345654321"</span></div><div class="line"><a name="l05027"></a><span class="lineno"> 5027</span> <span class="comment"> * 12345654321.to_s(2) #=> "1011011111110110111011110000110001"</span></div><div class="line"><a name="l05028"></a><span class="lineno"> 5028</span> <span class="comment"> * 12345654321.to_s(8) #=> "133766736061"</span></div><div class="line"><a name="l05029"></a><span class="lineno"> 5029</span> <span class="comment"> * 12345654321.to_s(16) #=> "2dfdbbc31"</span></div><div class="line"><a name="l05030"></a><span class="lineno"> 5030</span> <span class="comment"> * 78546939656932.to_s(36) #=> "rubyrules"</span></div><div class="line"><a name="l05031"></a><span class="lineno"> 5031</span> <span class="comment"> */</span></div><div class="line"><a name="l05032"></a><span class="lineno"> 5032</span> </div><div class="line"><a name="l05033"></a><span class="lineno"> 5033</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05034"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac632decf143c3ce61d8fa4c7f6f43ce8"> 5034</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac632decf143c3ce61d8fa4c7f6f43ce8">rb_big_to_s</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05035"></a><span class="lineno"> 5035</span> {</div><div class="line"><a name="l05036"></a><span class="lineno"> 5036</span>  <span class="keywordtype">int</span> <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>;</div><div class="line"><a name="l05037"></a><span class="lineno"> 5037</span> </div><div class="line"><a name="l05038"></a><span class="lineno"> 5038</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a> == 0) <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a> = 10;</div><div class="line"><a name="l05039"></a><span class="lineno"> 5039</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05040"></a><span class="lineno"> 5040</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> b;</div><div class="line"><a name="l05041"></a><span class="lineno"> 5041</span> </div><div class="line"><a name="l05042"></a><span class="lineno"> 5042</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"01"</span>, &b);</div><div class="line"><a name="l05043"></a><span class="lineno"> 5043</span>  <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(b);</div><div class="line"><a name="l05044"></a><span class="lineno"> 5044</span>  }</div><div class="line"><a name="l05045"></a><span class="lineno"> 5045</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5cd9431ab7853e3adb7bf49cad4460f2">rb_big2str</a>(x, <a class="code" href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">base</a>);</div><div class="line"><a name="l05046"></a><span class="lineno"> 5046</span> }</div><div class="line"><a name="l05047"></a><span class="lineno"> 5047</span> </div><div class="line"><a name="l05048"></a><span class="lineno"> 5048</span> <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span></div><div class="line"><a name="l05049"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173"> 5049</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173">big2ulong</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>)</div><div class="line"><a name="l05050"></a><span class="lineno"> 5050</span> {</div><div class="line"><a name="l05051"></a><span class="lineno"> 5051</span>  <span class="keywordtype">long</span> len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05052"></a><span class="lineno"> 5052</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> num;</div><div class="line"><a name="l05053"></a><span class="lineno"> 5053</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds;</div><div class="line"><a name="l05054"></a><span class="lineno"> 5054</span> </div><div class="line"><a name="l05055"></a><span class="lineno"> 5055</span>  <span class="keywordflow">if</span> (len == 0)</div><div class="line"><a name="l05056"></a><span class="lineno"> 5056</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l05057"></a><span class="lineno"> 5057</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d">BIGSIZE</a>(x) > <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>)) {</div><div class="line"><a name="l05058"></a><span class="lineno"> 5058</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `%s'"</span>, <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l05059"></a><span class="lineno"> 5059</span>  }</div><div class="line"><a name="l05060"></a><span class="lineno"> 5060</span>  ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05061"></a><span class="lineno"> 5061</span> <span class="preprocessor">#if SIZEOF_LONG <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l05062"></a><span class="lineno"> 5062</span>  num = (<span class="keywordtype">unsigned</span> long)ds[0];</div><div class="line"><a name="l05063"></a><span class="lineno"> 5063</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05064"></a><span class="lineno"> 5064</span>  num = 0;</div><div class="line"><a name="l05065"></a><span class="lineno"> 5065</span>  <span class="keywordflow">while</span> (len--) {</div><div class="line"><a name="l05066"></a><span class="lineno"> 5066</span>  num <<= <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l05067"></a><span class="lineno"> 5067</span>  num += (<span class="keywordtype">unsigned</span> long)ds[len]; <span class="comment">/* overflow is already checked */</span></div><div class="line"><a name="l05068"></a><span class="lineno"> 5068</span>  }</div><div class="line"><a name="l05069"></a><span class="lineno"> 5069</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05070"></a><span class="lineno"> 5070</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05071"></a><span class="lineno"> 5071</span> }</div><div class="line"><a name="l05072"></a><span class="lineno"> 5072</span> </div><div class="line"><a name="l05073"></a><span class="lineno"> 5073</span> <span class="comment">/* deprecated */</span></div><div class="line"><a name="l05074"></a><span class="lineno"> 5074</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05075"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a526835b7dfb6ff67195413c09c7672d2"> 5075</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a526835b7dfb6ff67195413c09c7672d2">rb_big2ulong_pack</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05076"></a><span class="lineno"> 5076</span> {</div><div class="line"><a name="l05077"></a><span class="lineno"> 5077</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> num;</div><div class="line"><a name="l05078"></a><span class="lineno"> 5078</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a>(x, &num, 1, <span class="keyword">sizeof</span>(num), 0,</div><div class="line"><a name="l05079"></a><span class="lineno"> 5079</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>|<a class="code" href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a>);</div><div class="line"><a name="l05080"></a><span class="lineno"> 5080</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05081"></a><span class="lineno"> 5081</span> }</div><div class="line"><a name="l05082"></a><span class="lineno"> 5082</span> </div><div class="line"><a name="l05083"></a><span class="lineno"> 5083</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05084"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a3a7c27e52c03850c798f331d0b2e7769"> 5084</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6eee2a4a6020c2e199ffd511bccdc8dd">rb_big2ulong</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05085"></a><span class="lineno"> 5085</span> {</div><div class="line"><a name="l05086"></a><span class="lineno"> 5086</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173">big2ulong</a>(x, <span class="stringliteral">"unsigned long"</span>);</div><div class="line"><a name="l05087"></a><span class="lineno"> 5087</span> </div><div class="line"><a name="l05088"></a><span class="lineno"> 5088</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x)) {</div><div class="line"><a name="l05089"></a><span class="lineno"> 5089</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05090"></a><span class="lineno"> 5090</span>  }</div><div class="line"><a name="l05091"></a><span class="lineno"> 5091</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05092"></a><span class="lineno"> 5092</span>  <span class="keywordflow">if</span> (num <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>)</div><div class="line"><a name="l05093"></a><span class="lineno"> 5093</span>  <span class="keywordflow">return</span> -(long)num;</div><div class="line"><a name="l05094"></a><span class="lineno"> 5094</span>  <span class="keywordflow">if</span> (num == 1+(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)(-(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a>+1)))</div><div class="line"><a name="l05095"></a><span class="lineno"> 5095</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a>;</div><div class="line"><a name="l05096"></a><span class="lineno"> 5096</span>  }</div><div class="line"><a name="l05097"></a><span class="lineno"> 5097</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum out of range of unsigned long"</span>);</div><div class="line"><a name="l05098"></a><span class="lineno"> 5098</span> }</div><div class="line"><a name="l05099"></a><span class="lineno"> 5099</span> </div><div class="line"><a name="l05100"></a><span class="lineno"> 5100</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a></div><div class="line"><a name="l05101"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#aa219c91416e3471310c5c2d7d3677216"> 5101</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a2e10eae0952b99986760a3a56ac3245a">rb_big2long</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05102"></a><span class="lineno"> 5102</span> {</div><div class="line"><a name="l05103"></a><span class="lineno"> 5103</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173">big2ulong</a>(x, <span class="stringliteral">"long"</span>);</div><div class="line"><a name="l05104"></a><span class="lineno"> 5104</span> </div><div class="line"><a name="l05105"></a><span class="lineno"> 5105</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x)) {</div><div class="line"><a name="l05106"></a><span class="lineno"> 5106</span>  <span class="keywordflow">if</span> (num <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>)</div><div class="line"><a name="l05107"></a><span class="lineno"> 5107</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05108"></a><span class="lineno"> 5108</span>  }</div><div class="line"><a name="l05109"></a><span class="lineno"> 5109</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05110"></a><span class="lineno"> 5110</span>  <span class="keywordflow">if</span> (num <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a>)</div><div class="line"><a name="l05111"></a><span class="lineno"> 5111</span>  <span class="keywordflow">return</span> -(long)num;</div><div class="line"><a name="l05112"></a><span class="lineno"> 5112</span>  <span class="keywordflow">if</span> (num == 1+(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)(-(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a>+1)))</div><div class="line"><a name="l05113"></a><span class="lineno"> 5113</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a>;</div><div class="line"><a name="l05114"></a><span class="lineno"> 5114</span>  }</div><div class="line"><a name="l05115"></a><span class="lineno"> 5115</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `long'"</span>);</div><div class="line"><a name="l05116"></a><span class="lineno"> 5116</span> }</div><div class="line"><a name="l05117"></a><span class="lineno"> 5117</span> </div><div class="line"><a name="l05118"></a><span class="lineno"> 5118</span> <span class="preprocessor">#if HAVE_LONG_LONG</span></div><div class="line"><a name="l05119"></a><span class="lineno"> 5119</span> </div><div class="line"><a name="l05120"></a><span class="lineno"> 5120</span> <span class="keyword">static</span> <span class="keywordtype">unsigned</span> LONG_LONG</div><div class="line"><a name="l05121"></a><span class="lineno"> 5121</span> big2ull(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>)</div><div class="line"><a name="l05122"></a><span class="lineno"> 5122</span> {</div><div class="line"><a name="l05123"></a><span class="lineno"> 5123</span>  <span class="keywordtype">long</span> len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05124"></a><span class="lineno"> 5124</span>  <span class="keywordtype">unsigned</span> LONG_LONG num;</div><div class="line"><a name="l05125"></a><span class="lineno"> 5125</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05126"></a><span class="lineno"> 5126</span> </div><div class="line"><a name="l05127"></a><span class="lineno"> 5127</span>  <span class="keywordflow">if</span> (len == 0)</div><div class="line"><a name="l05128"></a><span class="lineno"> 5128</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l05129"></a><span class="lineno"> 5129</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d">BIGSIZE</a>(x) > SIZEOF_LONG_LONG)</div><div class="line"><a name="l05130"></a><span class="lineno"> 5130</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `%s'"</span>, <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l05131"></a><span class="lineno"> 5131</span> <span class="preprocessor">#if SIZEOF_LONG_LONG <= SIZEOF_BDIGITS</span></div><div class="line"><a name="l05132"></a><span class="lineno"> 5132</span>  num = (<span class="keywordtype">unsigned</span> LONG_LONG)ds[0];</div><div class="line"><a name="l05133"></a><span class="lineno"> 5133</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05134"></a><span class="lineno"> 5134</span>  num = 0;</div><div class="line"><a name="l05135"></a><span class="lineno"> 5135</span>  <span class="keywordflow">while</span> (len--) {</div><div class="line"><a name="l05136"></a><span class="lineno"> 5136</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a>(num);</div><div class="line"><a name="l05137"></a><span class="lineno"> 5137</span>  num += ds[len];</div><div class="line"><a name="l05138"></a><span class="lineno"> 5138</span>  }</div><div class="line"><a name="l05139"></a><span class="lineno"> 5139</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05140"></a><span class="lineno"> 5140</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05141"></a><span class="lineno"> 5141</span> }</div><div class="line"><a name="l05142"></a><span class="lineno"> 5142</span> </div><div class="line"><a name="l05143"></a><span class="lineno"> 5143</span> <span class="keywordtype">unsigned</span> LONG_LONG</div><div class="line"><a name="l05144"></a><span class="lineno"> 5144</span> rb_big2ull(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05145"></a><span class="lineno"> 5145</span> {</div><div class="line"><a name="l05146"></a><span class="lineno"> 5146</span>  <span class="keywordtype">unsigned</span> LONG_LONG num = big2ull(x, <span class="stringliteral">"unsigned long long"</span>);</div><div class="line"><a name="l05147"></a><span class="lineno"> 5147</span> </div><div class="line"><a name="l05148"></a><span class="lineno"> 5148</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x)) {</div><div class="line"><a name="l05149"></a><span class="lineno"> 5149</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05150"></a><span class="lineno"> 5150</span>  }</div><div class="line"><a name="l05151"></a><span class="lineno"> 5151</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05152"></a><span class="lineno"> 5152</span>  <span class="keywordflow">if</span> (num <= LLONG_MAX)</div><div class="line"><a name="l05153"></a><span class="lineno"> 5153</span>  <span class="keywordflow">return</span> -(LONG_LONG)num;</div><div class="line"><a name="l05154"></a><span class="lineno"> 5154</span>  <span class="keywordflow">if</span> (num == 1+(<span class="keywordtype">unsigned</span> LONG_LONG)(-(LLONG_MIN+1)))</div><div class="line"><a name="l05155"></a><span class="lineno"> 5155</span>  <span class="keywordflow">return</span> LLONG_MIN;</div><div class="line"><a name="l05156"></a><span class="lineno"> 5156</span>  }</div><div class="line"><a name="l05157"></a><span class="lineno"> 5157</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum out of range of unsigned long long"</span>);</div><div class="line"><a name="l05158"></a><span class="lineno"> 5158</span> }</div><div class="line"><a name="l05159"></a><span class="lineno"> 5159</span> </div><div class="line"><a name="l05160"></a><span class="lineno"> 5160</span> LONG_LONG</div><div class="line"><a name="l05161"></a><span class="lineno"> 5161</span> rb_big2ll(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05162"></a><span class="lineno"> 5162</span> {</div><div class="line"><a name="l05163"></a><span class="lineno"> 5163</span>  <span class="keywordtype">unsigned</span> LONG_LONG num = big2ull(x, <span class="stringliteral">"long long"</span>);</div><div class="line"><a name="l05164"></a><span class="lineno"> 5164</span> </div><div class="line"><a name="l05165"></a><span class="lineno"> 5165</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x)) {</div><div class="line"><a name="l05166"></a><span class="lineno"> 5166</span>  <span class="keywordflow">if</span> (num <= LLONG_MAX)</div><div class="line"><a name="l05167"></a><span class="lineno"> 5167</span>  <span class="keywordflow">return</span> num;</div><div class="line"><a name="l05168"></a><span class="lineno"> 5168</span>  }</div><div class="line"><a name="l05169"></a><span class="lineno"> 5169</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05170"></a><span class="lineno"> 5170</span>  <span class="keywordflow">if</span> (num <= LLONG_MAX)</div><div class="line"><a name="l05171"></a><span class="lineno"> 5171</span>  <span class="keywordflow">return</span> -(LONG_LONG)num;</div><div class="line"><a name="l05172"></a><span class="lineno"> 5172</span>  <span class="keywordflow">if</span> (num == 1+(<span class="keywordtype">unsigned</span> LONG_LONG)(-(LLONG_MIN+1)))</div><div class="line"><a name="l05173"></a><span class="lineno"> 5173</span>  <span class="keywordflow">return</span> LLONG_MIN;</div><div class="line"><a name="l05174"></a><span class="lineno"> 5174</span>  }</div><div class="line"><a name="l05175"></a><span class="lineno"> 5175</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a>, <span class="stringliteral">"bignum too big to convert into `long long'"</span>);</div><div class="line"><a name="l05176"></a><span class="lineno"> 5176</span> }</div><div class="line"><a name="l05177"></a><span class="lineno"> 5177</span> </div><div class="line"><a name="l05178"></a><span class="lineno"> 5178</span> <span class="preprocessor">#endif </span><span class="comment">/* HAVE_LONG_LONG */</span><span class="preprocessor"></span></div><div class="line"><a name="l05179"></a><span class="lineno"> 5179</span> </div><div class="line"><a name="l05180"></a><span class="lineno"> 5180</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05181"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a96d717ef03002509bf9e231e57f5ed59"> 5181</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a96d717ef03002509bf9e231e57f5ed59">dbl2big</a>(<span class="keywordtype">double</span> d)</div><div class="line"><a name="l05182"></a><span class="lineno"> 5182</span> {</div><div class="line"><a name="l05183"></a><span class="lineno"> 5183</span>  <span class="keywordtype">long</span> i = 0;</div><div class="line"><a name="l05184"></a><span class="lineno"> 5184</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> c;</div><div class="line"><a name="l05185"></a><span class="lineno"> 5185</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *digits;</div><div class="line"><a name="l05186"></a><span class="lineno"> 5186</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05187"></a><span class="lineno"> 5187</span>  <span class="keywordtype">double</span> u = (d < 0)?-d:d;</div><div class="line"><a name="l05188"></a><span class="lineno"> 5188</span> </div><div class="line"><a name="l05189"></a><span class="lineno"> 5189</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(d)) {</div><div class="line"><a name="l05190"></a><span class="lineno"> 5190</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9d3707fd42dad026e217ea7c9dfb4948">rb_eFloatDomainError</a>, d < 0 ? <span class="stringliteral">"-Infinity"</span> : <span class="stringliteral">"Infinity"</span>);</div><div class="line"><a name="l05191"></a><span class="lineno"> 5191</span>  }</div><div class="line"><a name="l05192"></a><span class="lineno"> 5192</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/db1/win32_8h.html#a2e1baae9134e580910322362dc23290e">isnan</a>(d)) {</div><div class="line"><a name="l05193"></a><span class="lineno"> 5193</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9d3707fd42dad026e217ea7c9dfb4948">rb_eFloatDomainError</a>, <span class="stringliteral">"NaN"</span>);</div><div class="line"><a name="l05194"></a><span class="lineno"> 5194</span>  }</div><div class="line"><a name="l05195"></a><span class="lineno"> 5195</span> </div><div class="line"><a name="l05196"></a><span class="lineno"> 5196</span>  <span class="keywordflow">while</span> (1.0 <= u) {</div><div class="line"><a name="l05197"></a><span class="lineno"> 5197</span>  u /= (double)(<a class="code" href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c">BIGRAD</a>);</div><div class="line"><a name="l05198"></a><span class="lineno"> 5198</span>  i++;</div><div class="line"><a name="l05199"></a><span class="lineno"> 5199</span>  }</div><div class="line"><a name="l05200"></a><span class="lineno"> 5200</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(i, d>=0);</div><div class="line"><a name="l05201"></a><span class="lineno"> 5201</span>  digits = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05202"></a><span class="lineno"> 5202</span>  <span class="keywordflow">while</span> (i--) {</div><div class="line"><a name="l05203"></a><span class="lineno"> 5203</span>  u *= <a class="code" href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c">BIGRAD</a>;</div><div class="line"><a name="l05204"></a><span class="lineno"> 5204</span>  c = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)u;</div><div class="line"><a name="l05205"></a><span class="lineno"> 5205</span>  u -= c;</div><div class="line"><a name="l05206"></a><span class="lineno"> 5206</span>  digits[i] = c;</div><div class="line"><a name="l05207"></a><span class="lineno"> 5207</span>  }</div><div class="line"><a name="l05208"></a><span class="lineno"> 5208</span> </div><div class="line"><a name="l05209"></a><span class="lineno"> 5209</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l05210"></a><span class="lineno"> 5210</span> }</div><div class="line"><a name="l05211"></a><span class="lineno"> 5211</span> </div><div class="line"><a name="l05212"></a><span class="lineno"> 5212</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05213"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a3453bb4888314e0bab45e78d61b5dca8"> 5213</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7cf59f449a9f516aa7d781db3357dd94">rb_dbl2big</a>(<span class="keywordtype">double</span> d)</div><div class="line"><a name="l05214"></a><span class="lineno"> 5214</span> {</div><div class="line"><a name="l05215"></a><span class="lineno"> 5215</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a96d717ef03002509bf9e231e57f5ed59">dbl2big</a>(d));</div><div class="line"><a name="l05216"></a><span class="lineno"> 5216</span> }</div><div class="line"><a name="l05217"></a><span class="lineno"> 5217</span> </div><div class="line"><a name="l05218"></a><span class="lineno"> 5218</span> <span class="keyword">static</span> <span class="keywordtype">double</span></div><div class="line"><a name="l05219"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667"> 5219</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667">big2dbl</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05220"></a><span class="lineno"> 5220</span> {</div><div class="line"><a name="l05221"></a><span class="lineno"> 5221</span>  <span class="keywordtype">double</span> d = 0.0;</div><div class="line"><a name="l05222"></a><span class="lineno"> 5222</span>  <span class="keywordtype">long</span> i = (<a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(x), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)), <a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a> = 0, bits;</div><div class="line"><a name="l05223"></a><span class="lineno"> 5223</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), dl;</div><div class="line"><a name="l05224"></a><span class="lineno"> 5224</span> </div><div class="line"><a name="l05225"></a><span class="lineno"> 5225</span>  <span class="keywordflow">if</span> (i) {</div><div class="line"><a name="l05226"></a><span class="lineno"> 5226</span>  bits = i * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(ds[i-1]);</div><div class="line"><a name="l05227"></a><span class="lineno"> 5227</span>  <span class="keywordflow">if</span> (bits > <a class="code" href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a>+<a class="code" href="../../d6/d27/numeric_8c.html#a539f2dd258b96fac8f4dc9bc139d75c9">DBL_MAX_EXP</a>) {</div><div class="line"><a name="l05228"></a><span class="lineno"> 5228</span>  d = HUGE_VAL;</div><div class="line"><a name="l05229"></a><span class="lineno"> 5229</span>  }</div><div class="line"><a name="l05230"></a><span class="lineno"> 5230</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05231"></a><span class="lineno"> 5231</span>  <span class="keywordflow">if</span> (bits > <a class="code" href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a>+1)</div><div class="line"><a name="l05232"></a><span class="lineno"> 5232</span>  <a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a> = (bits -= <a class="code" href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a>+1) / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l05233"></a><span class="lineno"> 5233</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05234"></a><span class="lineno"> 5234</span>  bits = 0;</div><div class="line"><a name="l05235"></a><span class="lineno"> 5235</span>  <span class="keywordflow">while</span> (--i > <a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a>) {</div><div class="line"><a name="l05236"></a><span class="lineno"> 5236</span>  d = ds[i] + <a class="code" href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c">BIGRAD</a>*d;</div><div class="line"><a name="l05237"></a><span class="lineno"> 5237</span>  }</div><div class="line"><a name="l05238"></a><span class="lineno"> 5238</span>  dl = ds[i];</div><div class="line"><a name="l05239"></a><span class="lineno"> 5239</span>  <span class="keywordflow">if</span> (bits && (dl & ((<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)1 << (bits %= <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>)))) {</div><div class="line"><a name="l05240"></a><span class="lineno"> 5240</span>  <span class="keywordtype">int</span> carry = (dl & ~(<a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a> << bits)) != 0;</div><div class="line"><a name="l05241"></a><span class="lineno"> 5241</span>  <span class="keywordflow">if</span> (!carry) {</div><div class="line"><a name="l05242"></a><span class="lineno"> 5242</span>  <span class="keywordflow">while</span> (i-- > 0) {</div><div class="line"><a name="l05243"></a><span class="lineno"> 5243</span>  carry = ds[i] != 0;</div><div class="line"><a name="l05244"></a><span class="lineno"> 5244</span>  <span class="keywordflow">if</span> (carry) <span class="keywordflow">break</span>;</div><div class="line"><a name="l05245"></a><span class="lineno"> 5245</span>  }</div><div class="line"><a name="l05246"></a><span class="lineno"> 5246</span>  }</div><div class="line"><a name="l05247"></a><span class="lineno"> 5247</span>  <span class="keywordflow">if</span> (carry) {</div><div class="line"><a name="l05248"></a><span class="lineno"> 5248</span>  dl &= <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a> << bits;</div><div class="line"><a name="l05249"></a><span class="lineno"> 5249</span>  dl = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(dl + ((<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)1 << bits));</div><div class="line"><a name="l05250"></a><span class="lineno"> 5250</span>  <span class="keywordflow">if</span> (!dl) d += 1;</div><div class="line"><a name="l05251"></a><span class="lineno"> 5251</span>  }</div><div class="line"><a name="l05252"></a><span class="lineno"> 5252</span>  }</div><div class="line"><a name="l05253"></a><span class="lineno"> 5253</span>  d = dl + <a class="code" href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c">BIGRAD</a>*d;</div><div class="line"><a name="l05254"></a><span class="lineno"> 5254</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a>) {</div><div class="line"><a name="l05255"></a><span class="lineno"> 5255</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a> > INT_MAX / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>)</div><div class="line"><a name="l05256"></a><span class="lineno"> 5256</span>  d = HUGE_VAL;</div><div class="line"><a name="l05257"></a><span class="lineno"> 5257</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a> < INT_MIN / <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>)</div><div class="line"><a name="l05258"></a><span class="lineno"> 5258</span>  d = 0.0;</div><div class="line"><a name="l05259"></a><span class="lineno"> 5259</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05260"></a><span class="lineno"> 5260</span>  d = ldexp(d, (<span class="keywordtype">int</span>)(<a class="code" href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a> * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>));</div><div class="line"><a name="l05261"></a><span class="lineno"> 5261</span>  }</div><div class="line"><a name="l05262"></a><span class="lineno"> 5262</span>  }</div><div class="line"><a name="l05263"></a><span class="lineno"> 5263</span>  }</div><div class="line"><a name="l05264"></a><span class="lineno"> 5264</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)) d = -d;</div><div class="line"><a name="l05265"></a><span class="lineno"> 5265</span>  <span class="keywordflow">return</span> d;</div><div class="line"><a name="l05266"></a><span class="lineno"> 5266</span> }</div><div class="line"><a name="l05267"></a><span class="lineno"> 5267</span> </div><div class="line"><a name="l05268"></a><span class="lineno"> 5268</span> <span class="keywordtype">double</span></div><div class="line"><a name="l05269"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a2f2f79a2004e83f0be8eb487db060d05"> 5269</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05270"></a><span class="lineno"> 5270</span> {</div><div class="line"><a name="l05271"></a><span class="lineno"> 5271</span>  <span class="keywordtype">double</span> d = <a class="code" href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667">big2dbl</a>(x);</div><div class="line"><a name="l05272"></a><span class="lineno"> 5272</span> </div><div class="line"><a name="l05273"></a><span class="lineno"> 5273</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(d)) {</div><div class="line"><a name="l05274"></a><span class="lineno"> 5274</span>  <a class="code" href="../../db/dcc/error_8c.html#afd461c64916576849b159b21a26123da">rb_warning</a>(<span class="stringliteral">"Bignum out of Float range"</span>);</div><div class="line"><a name="l05275"></a><span class="lineno"> 5275</span>  <span class="keywordflow">if</span> (d < 0.0)</div><div class="line"><a name="l05276"></a><span class="lineno"> 5276</span>  d = -HUGE_VAL;</div><div class="line"><a name="l05277"></a><span class="lineno"> 5277</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05278"></a><span class="lineno"> 5278</span>  d = HUGE_VAL;</div><div class="line"><a name="l05279"></a><span class="lineno"> 5279</span>  }</div><div class="line"><a name="l05280"></a><span class="lineno"> 5280</span>  <span class="keywordflow">return</span> d;</div><div class="line"><a name="l05281"></a><span class="lineno"> 5281</span> }</div><div class="line"><a name="l05282"></a><span class="lineno"> 5282</span> </div><div class="line"><a name="l05283"></a><span class="lineno"> 5283</span> <span class="comment">/*</span></div><div class="line"><a name="l05284"></a><span class="lineno"> 5284</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05285"></a><span class="lineno"> 5285</span> <span class="comment"> * big.to_f -> float</span></div><div class="line"><a name="l05286"></a><span class="lineno"> 5286</span> <span class="comment"> *</span></div><div class="line"><a name="l05287"></a><span class="lineno"> 5287</span> <span class="comment"> * Converts <i>big</i> to a <code>Float</code>. If <i>big</i> doesn't</span></div><div class="line"><a name="l05288"></a><span class="lineno"> 5288</span> <span class="comment"> * fit in a <code>Float</code>, the result is infinity.</span></div><div class="line"><a name="l05289"></a><span class="lineno"> 5289</span> <span class="comment"> *</span></div><div class="line"><a name="l05290"></a><span class="lineno"> 5290</span> <span class="comment"> */</span></div><div class="line"><a name="l05291"></a><span class="lineno"> 5291</span> </div><div class="line"><a name="l05292"></a><span class="lineno"> 5292</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05293"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a89ede0740dc1fb7747b4ee506be31deb"> 5293</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a89ede0740dc1fb7747b4ee506be31deb">rb_big_to_f</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05294"></a><span class="lineno"> 5294</span> {</div><div class="line"><a name="l05295"></a><span class="lineno"> 5295</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x));</div><div class="line"><a name="l05296"></a><span class="lineno"> 5296</span> }</div><div class="line"><a name="l05297"></a><span class="lineno"> 5297</span> </div><div class="line"><a name="l05298"></a><span class="lineno"> 5298</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05299"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#aa088bf6ce0031eb077ef00d0f4a31670"> 5299</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa088bf6ce0031eb077ef00d0f4a31670">rb_integer_float_cmp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05300"></a><span class="lineno"> 5300</span> {</div><div class="line"><a name="l05301"></a><span class="lineno"> 5301</span>  <span class="keywordtype">double</span> yd = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y);</div><div class="line"><a name="l05302"></a><span class="lineno"> 5302</span>  <span class="keywordtype">double</span> yi, yf;</div><div class="line"><a name="l05303"></a><span class="lineno"> 5303</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> rel;</div><div class="line"><a name="l05304"></a><span class="lineno"> 5304</span> </div><div class="line"><a name="l05305"></a><span class="lineno"> 5305</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/db1/win32_8h.html#a2e1baae9134e580910322362dc23290e">isnan</a>(yd))</div><div class="line"><a name="l05306"></a><span class="lineno"> 5306</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05307"></a><span class="lineno"> 5307</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(yd)) {</div><div class="line"><a name="l05308"></a><span class="lineno"> 5308</span>  <span class="keywordflow">if</span> (yd > 0.0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05309"></a><span class="lineno"> 5309</span>  <span class="keywordflow">else</span> <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05310"></a><span class="lineno"> 5310</span>  }</div><div class="line"><a name="l05311"></a><span class="lineno"> 5311</span>  yf = modf(yd, &yi);</div><div class="line"><a name="l05312"></a><span class="lineno"> 5312</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(x)) {</div><div class="line"><a name="l05313"></a><span class="lineno"> 5313</span> <span class="preprocessor">#if SIZEOF_LONG * CHAR_BIT < DBL_MANT_DIG </span><span class="comment">/* assume FLT_RADIX == 2 */</span><span class="preprocessor"></span></div><div class="line"><a name="l05314"></a><span class="lineno"> 5314</span>  <span class="keywordtype">double</span> xd = (double)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(x);</div><div class="line"><a name="l05315"></a><span class="lineno"> 5315</span>  <span class="keywordflow">if</span> (xd < yd)</div><div class="line"><a name="l05316"></a><span class="lineno"> 5316</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05317"></a><span class="lineno"> 5317</span>  <span class="keywordflow">if</span> (xd > yd)</div><div class="line"><a name="l05318"></a><span class="lineno"> 5318</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05319"></a><span class="lineno"> 5319</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l05320"></a><span class="lineno"> 5320</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05321"></a><span class="lineno"> 5321</span>  <span class="keywordtype">long</span> xn, yn;</div><div class="line"><a name="l05322"></a><span class="lineno"> 5322</span>  <span class="keywordflow">if</span> (yi < <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa5bd957eb3db4bec258cd36a2cafe352">FIXNUM_MIN</a>)</div><div class="line"><a name="l05323"></a><span class="lineno"> 5323</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05324"></a><span class="lineno"> 5324</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1040c5fdcb7a88dca4c25222bf43454">FIXNUM_MAX</a>+1 <= yi)</div><div class="line"><a name="l05325"></a><span class="lineno"> 5325</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05326"></a><span class="lineno"> 5326</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(x);</div><div class="line"><a name="l05327"></a><span class="lineno"> 5327</span>  yn = (long)yi;</div><div class="line"><a name="l05328"></a><span class="lineno"> 5328</span>  <span class="keywordflow">if</span> (xn < yn)</div><div class="line"><a name="l05329"></a><span class="lineno"> 5329</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05330"></a><span class="lineno"> 5330</span>  <span class="keywordflow">if</span> (xn > yn)</div><div class="line"><a name="l05331"></a><span class="lineno"> 5331</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05332"></a><span class="lineno"> 5332</span>  <span class="keywordflow">if</span> (yf < 0.0)</div><div class="line"><a name="l05333"></a><span class="lineno"> 5333</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05334"></a><span class="lineno"> 5334</span>  <span class="keywordflow">if</span> (0.0 < yf)</div><div class="line"><a name="l05335"></a><span class="lineno"> 5335</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05336"></a><span class="lineno"> 5336</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l05337"></a><span class="lineno"> 5337</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05338"></a><span class="lineno"> 5338</span>  }</div><div class="line"><a name="l05339"></a><span class="lineno"> 5339</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a7cf59f449a9f516aa7d781db3357dd94">rb_dbl2big</a>(yi);</div><div class="line"><a name="l05340"></a><span class="lineno"> 5340</span>  rel = <a class="code" href="../../d1/dcc/bignum_8c.html#a709646dcfd8cfd6aba1c9805c7690927">rb_big_cmp</a>(x, y);</div><div class="line"><a name="l05341"></a><span class="lineno"> 5341</span>  <span class="keywordflow">if</span> (yf == 0.0 || rel != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0))</div><div class="line"><a name="l05342"></a><span class="lineno"> 5342</span>  <span class="keywordflow">return</span> rel;</div><div class="line"><a name="l05343"></a><span class="lineno"> 5343</span>  <span class="keywordflow">if</span> (yf < 0.0)</div><div class="line"><a name="l05344"></a><span class="lineno"> 5344</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05345"></a><span class="lineno"> 5345</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05346"></a><span class="lineno"> 5346</span> }</div><div class="line"><a name="l05347"></a><span class="lineno"> 5347</span> </div><div class="line"><a name="l05348"></a><span class="lineno"> 5348</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05349"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#a1b2178f547d44e73d5bb5e8cad36b24d"> 5349</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1b2178f547d44e73d5bb5e8cad36b24d">rb_integer_float_eq</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05350"></a><span class="lineno"> 5350</span> {</div><div class="line"><a name="l05351"></a><span class="lineno"> 5351</span>  <span class="keywordtype">double</span> yd = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y);</div><div class="line"><a name="l05352"></a><span class="lineno"> 5352</span>  <span class="keywordtype">double</span> yi, yf;</div><div class="line"><a name="l05353"></a><span class="lineno"> 5353</span> </div><div class="line"><a name="l05354"></a><span class="lineno"> 5354</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/db1/win32_8h.html#a2e1baae9134e580910322362dc23290e">isnan</a>(yd) || <a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(yd))</div><div class="line"><a name="l05355"></a><span class="lineno"> 5355</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05356"></a><span class="lineno"> 5356</span>  yf = modf(yd, &yi);</div><div class="line"><a name="l05357"></a><span class="lineno"> 5357</span>  <span class="keywordflow">if</span> (yf != 0)</div><div class="line"><a name="l05358"></a><span class="lineno"> 5358</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05359"></a><span class="lineno"> 5359</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(x)) {</div><div class="line"><a name="l05360"></a><span class="lineno"> 5360</span> <span class="preprocessor">#if SIZEOF_LONG * CHAR_BIT < DBL_MANT_DIG </span><span class="comment">/* assume FLT_RADIX == 2 */</span><span class="preprocessor"></span></div><div class="line"><a name="l05361"></a><span class="lineno"> 5361</span>  <span class="keywordtype">double</span> xd = (double)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(x);</div><div class="line"><a name="l05362"></a><span class="lineno"> 5362</span>  <span class="keywordflow">if</span> (xd != yd)</div><div class="line"><a name="l05363"></a><span class="lineno"> 5363</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05364"></a><span class="lineno"> 5364</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05365"></a><span class="lineno"> 5365</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05366"></a><span class="lineno"> 5366</span>  <span class="keywordtype">long</span> xn, yn;</div><div class="line"><a name="l05367"></a><span class="lineno"> 5367</span>  <span class="keywordflow">if</span> (yi < <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a> || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a> < yi)</div><div class="line"><a name="l05368"></a><span class="lineno"> 5368</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05369"></a><span class="lineno"> 5369</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(x);</div><div class="line"><a name="l05370"></a><span class="lineno"> 5370</span>  yn = (long)yi;</div><div class="line"><a name="l05371"></a><span class="lineno"> 5371</span>  <span class="keywordflow">if</span> (xn != yn)</div><div class="line"><a name="l05372"></a><span class="lineno"> 5372</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05373"></a><span class="lineno"> 5373</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05374"></a><span class="lineno"> 5374</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05375"></a><span class="lineno"> 5375</span>  }</div><div class="line"><a name="l05376"></a><span class="lineno"> 5376</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a7cf59f449a9f516aa7d781db3357dd94">rb_dbl2big</a>(yi);</div><div class="line"><a name="l05377"></a><span class="lineno"> 5377</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a80d84acdef43f8c683c020619750cfe1">rb_big_eq</a>(x, y);</div><div class="line"><a name="l05378"></a><span class="lineno"> 5378</span> }</div><div class="line"><a name="l05379"></a><span class="lineno"> 5379</span> </div><div class="line"><a name="l05380"></a><span class="lineno"> 5380</span> <span class="comment">/*</span></div><div class="line"><a name="l05381"></a><span class="lineno"> 5381</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05382"></a><span class="lineno"> 5382</span> <span class="comment"> * big <=> numeric -> -1, 0, +1 or nil</span></div><div class="line"><a name="l05383"></a><span class="lineno"> 5383</span> <span class="comment"> *</span></div><div class="line"><a name="l05384"></a><span class="lineno"> 5384</span> <span class="comment"> * Comparison---Returns -1, 0, or +1 depending on whether +big+ is</span></div><div class="line"><a name="l05385"></a><span class="lineno"> 5385</span> <span class="comment"> * less than, equal to, or greater than +numeric+. This is the</span></div><div class="line"><a name="l05386"></a><span class="lineno"> 5386</span> <span class="comment"> * basis for the tests in Comparable.</span></div><div class="line"><a name="l05387"></a><span class="lineno"> 5387</span> <span class="comment"> *</span></div><div class="line"><a name="l05388"></a><span class="lineno"> 5388</span> <span class="comment"> * +nil+ is returned if the two values are incomparable.</span></div><div class="line"><a name="l05389"></a><span class="lineno"> 5389</span> <span class="comment"> *</span></div><div class="line"><a name="l05390"></a><span class="lineno"> 5390</span> <span class="comment"> */</span></div><div class="line"><a name="l05391"></a><span class="lineno"> 5391</span> </div><div class="line"><a name="l05392"></a><span class="lineno"> 5392</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05393"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#ab4b20474ef0b874606e74c538c9e3471"> 5393</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a709646dcfd8cfd6aba1c9805c7690927">rb_big_cmp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05394"></a><span class="lineno"> 5394</span> {</div><div class="line"><a name="l05395"></a><span class="lineno"> 5395</span>  <span class="keywordtype">int</span> <a class="code" href="../../de/d6d/compar_8c.html#a087ca087a20f74015a46cf31400c675e">cmp</a>;</div><div class="line"><a name="l05396"></a><span class="lineno"> 5396</span> </div><div class="line"><a name="l05397"></a><span class="lineno"> 5397</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l05398"></a><span class="lineno"> 5398</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l05399"></a><span class="lineno"> 5399</span>  }</div><div class="line"><a name="l05400"></a><span class="lineno"> 5400</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l05401"></a><span class="lineno"> 5401</span>  }</div><div class="line"><a name="l05402"></a><span class="lineno"> 5402</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l05403"></a><span class="lineno"> 5403</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa088bf6ce0031eb077ef00d0f4a31670">rb_integer_float_cmp</a>(x, y);</div><div class="line"><a name="l05404"></a><span class="lineno"> 5404</span>  }</div><div class="line"><a name="l05405"></a><span class="lineno"> 5405</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05406"></a><span class="lineno"> 5406</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#aa9ef0eef5110cc98ba79a40a876c3d1c">rb_num_coerce_cmp</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"<=>"</span>));</div><div class="line"><a name="l05407"></a><span class="lineno"> 5407</span>  }</div><div class="line"><a name="l05408"></a><span class="lineno"> 5408</span> </div><div class="line"><a name="l05409"></a><span class="lineno"> 5409</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) > <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l05410"></a><span class="lineno"> 5410</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) < <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05411"></a><span class="lineno"> 5411</span> </div><div class="line"><a name="l05412"></a><span class="lineno"> 5412</span>  <a class="code" href="../../de/d6d/compar_8c.html#a087ca087a20f74015a46cf31400c675e">cmp</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f">bary_cmp</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y));</div><div class="line"><a name="l05413"></a><span class="lineno"> 5413</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x))</div><div class="line"><a name="l05414"></a><span class="lineno"> 5414</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(<a class="code" href="../../de/d6d/compar_8c.html#a087ca087a20f74015a46cf31400c675e">cmp</a>);</div><div class="line"><a name="l05415"></a><span class="lineno"> 5415</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05416"></a><span class="lineno"> 5416</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-<a class="code" href="../../de/d6d/compar_8c.html#a087ca087a20f74015a46cf31400c675e">cmp</a>);</div><div class="line"><a name="l05417"></a><span class="lineno"> 5417</span> }</div><div class="line"><a name="l05418"></a><span class="lineno"> 5418</span> </div><div class="line"><a name="l05419"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3f"> 5419</a></span> <span class="keyword">enum</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3f">big_op_t</a> {</div><div class="line"><a name="l05420"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf"> 5420</a></span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf">big_op_gt</a>,</div><div class="line"><a name="l05421"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01"> 5421</a></span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01">big_op_ge</a>,</div><div class="line"><a name="l05422"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5"> 5422</a></span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5">big_op_lt</a>,</div><div class="line"><a name="l05423"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f"> 5423</a></span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f">big_op_le</a></div><div class="line"><a name="l05424"></a><span class="lineno"> 5424</span> };</div><div class="line"><a name="l05425"></a><span class="lineno"> 5425</span> </div><div class="line"><a name="l05426"></a><span class="lineno"> 5426</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05427"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c"> 5427</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keyword">enum</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3f">big_op_t</a> op)</div><div class="line"><a name="l05428"></a><span class="lineno"> 5428</span> {</div><div class="line"><a name="l05429"></a><span class="lineno"> 5429</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> rel;</div><div class="line"><a name="l05430"></a><span class="lineno"> 5430</span>  <span class="keywordtype">int</span> n;</div><div class="line"><a name="l05431"></a><span class="lineno"> 5431</span> </div><div class="line"><a name="l05432"></a><span class="lineno"> 5432</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y) || <a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l05433"></a><span class="lineno"> 5433</span>  rel = <a class="code" href="../../d1/dcc/bignum_8c.html#a709646dcfd8cfd6aba1c9805c7690927">rb_big_cmp</a>(x, y);</div><div class="line"><a name="l05434"></a><span class="lineno"> 5434</span>  }</div><div class="line"><a name="l05435"></a><span class="lineno"> 5435</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l05436"></a><span class="lineno"> 5436</span>  rel = <a class="code" href="../../d1/dcc/bignum_8c.html#aa088bf6ce0031eb077ef00d0f4a31670">rb_integer_float_cmp</a>(x, y);</div><div class="line"><a name="l05437"></a><span class="lineno"> 5437</span>  }</div><div class="line"><a name="l05438"></a><span class="lineno"> 5438</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05439"></a><span class="lineno"> 5439</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> <span class="keywordtype">id</span> = 0;</div><div class="line"><a name="l05440"></a><span class="lineno"> 5440</span>  <span class="keywordflow">switch</span> (op) {</div><div class="line"><a name="l05441"></a><span class="lineno"> 5441</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf">big_op_gt</a>: <span class="keywordtype">id</span> = <span class="charliteral">'>'</span>; <span class="keywordflow">break</span>;</div><div class="line"><a name="l05442"></a><span class="lineno"> 5442</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01">big_op_ge</a>: <span class="keywordtype">id</span> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">">="</span>); <span class="keywordflow">break</span>;</div><div class="line"><a name="l05443"></a><span class="lineno"> 5443</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5">big_op_lt</a>: <span class="keywordtype">id</span> = <span class="charliteral">'<'</span>; <span class="keywordflow">break</span>;</div><div class="line"><a name="l05444"></a><span class="lineno"> 5444</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f">big_op_le</a>: <span class="keywordtype">id</span> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"<="</span>); <span class="keywordflow">break</span>;</div><div class="line"><a name="l05445"></a><span class="lineno"> 5445</span>  }</div><div class="line"><a name="l05446"></a><span class="lineno"> 5446</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#ac7a89c076f8710df7f3974af601e2b6d">rb_num_coerce_relop</a>(x, y, <span class="keywordtype">id</span>);</div><div class="line"><a name="l05447"></a><span class="lineno"> 5447</span>  }</div><div class="line"><a name="l05448"></a><span class="lineno"> 5448</span> </div><div class="line"><a name="l05449"></a><span class="lineno"> 5449</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(rel)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05450"></a><span class="lineno"> 5450</span>  n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(rel);</div><div class="line"><a name="l05451"></a><span class="lineno"> 5451</span> </div><div class="line"><a name="l05452"></a><span class="lineno"> 5452</span>  <span class="keywordflow">switch</span> (op) {</div><div class="line"><a name="l05453"></a><span class="lineno"> 5453</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf">big_op_gt</a>: <span class="keywordflow">return</span> n > 0 ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05454"></a><span class="lineno"> 5454</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01">big_op_ge</a>: <span class="keywordflow">return</span> n >= 0 ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05455"></a><span class="lineno"> 5455</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5">big_op_lt</a>: <span class="keywordflow">return</span> n < 0 ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05456"></a><span class="lineno"> 5456</span>  <span class="keywordflow">case</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f">big_op_le</a>: <span class="keywordflow">return</span> n <= 0 ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05457"></a><span class="lineno"> 5457</span>  }</div><div class="line"><a name="l05458"></a><span class="lineno"> 5458</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2edf6990280eb2637623ccd421dee4f0">Qundef</a>;</div><div class="line"><a name="l05459"></a><span class="lineno"> 5459</span> }</div><div class="line"><a name="l05460"></a><span class="lineno"> 5460</span> </div><div class="line"><a name="l05461"></a><span class="lineno"> 5461</span> <span class="comment">/*</span></div><div class="line"><a name="l05462"></a><span class="lineno"> 5462</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05463"></a><span class="lineno"> 5463</span> <span class="comment"> * big > real -> true or false</span></div><div class="line"><a name="l05464"></a><span class="lineno"> 5464</span> <span class="comment"> *</span></div><div class="line"><a name="l05465"></a><span class="lineno"> 5465</span> <span class="comment"> * Returns <code>true</code> if the value of <code>big</code> is</span></div><div class="line"><a name="l05466"></a><span class="lineno"> 5466</span> <span class="comment"> * greater than that of <code>real</code>.</span></div><div class="line"><a name="l05467"></a><span class="lineno"> 5467</span> <span class="comment"> */</span></div><div class="line"><a name="l05468"></a><span class="lineno"> 5468</span> </div><div class="line"><a name="l05469"></a><span class="lineno"> 5469</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05470"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae3c9337ee28a2564cb46cf602e41f315"> 5470</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae3c9337ee28a2564cb46cf602e41f315">big_gt</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05471"></a><span class="lineno"> 5471</span> {</div><div class="line"><a name="l05472"></a><span class="lineno"> 5472</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a>(x, y, <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf">big_op_gt</a>);</div><div class="line"><a name="l05473"></a><span class="lineno"> 5473</span> }</div><div class="line"><a name="l05474"></a><span class="lineno"> 5474</span> </div><div class="line"><a name="l05475"></a><span class="lineno"> 5475</span> <span class="comment">/*</span></div><div class="line"><a name="l05476"></a><span class="lineno"> 5476</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05477"></a><span class="lineno"> 5477</span> <span class="comment"> * big >= real -> true or false</span></div><div class="line"><a name="l05478"></a><span class="lineno"> 5478</span> <span class="comment"> *</span></div><div class="line"><a name="l05479"></a><span class="lineno"> 5479</span> <span class="comment"> * Returns <code>true</code> if the value of <code>big</code> is</span></div><div class="line"><a name="l05480"></a><span class="lineno"> 5480</span> <span class="comment"> * greater than or equal to that of <code>real</code>.</span></div><div class="line"><a name="l05481"></a><span class="lineno"> 5481</span> <span class="comment"> */</span></div><div class="line"><a name="l05482"></a><span class="lineno"> 5482</span> </div><div class="line"><a name="l05483"></a><span class="lineno"> 5483</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05484"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a76ae162226d88662980e103acc97d324"> 5484</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a76ae162226d88662980e103acc97d324">big_ge</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05485"></a><span class="lineno"> 5485</span> {</div><div class="line"><a name="l05486"></a><span class="lineno"> 5486</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a>(x, y, <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01">big_op_ge</a>);</div><div class="line"><a name="l05487"></a><span class="lineno"> 5487</span> }</div><div class="line"><a name="l05488"></a><span class="lineno"> 5488</span> </div><div class="line"><a name="l05489"></a><span class="lineno"> 5489</span> <span class="comment">/*</span></div><div class="line"><a name="l05490"></a><span class="lineno"> 5490</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05491"></a><span class="lineno"> 5491</span> <span class="comment"> * big < real -> true or false</span></div><div class="line"><a name="l05492"></a><span class="lineno"> 5492</span> <span class="comment"> *</span></div><div class="line"><a name="l05493"></a><span class="lineno"> 5493</span> <span class="comment"> * Returns <code>true</code> if the value of <code>big</code> is</span></div><div class="line"><a name="l05494"></a><span class="lineno"> 5494</span> <span class="comment"> * less than that of <code>real</code>.</span></div><div class="line"><a name="l05495"></a><span class="lineno"> 5495</span> <span class="comment"> */</span></div><div class="line"><a name="l05496"></a><span class="lineno"> 5496</span> </div><div class="line"><a name="l05497"></a><span class="lineno"> 5497</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05498"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac0793b5f02b87a2eb8a997a655c63446"> 5498</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac0793b5f02b87a2eb8a997a655c63446">big_lt</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05499"></a><span class="lineno"> 5499</span> {</div><div class="line"><a name="l05500"></a><span class="lineno"> 5500</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a>(x, y, <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5">big_op_lt</a>);</div><div class="line"><a name="l05501"></a><span class="lineno"> 5501</span> }</div><div class="line"><a name="l05502"></a><span class="lineno"> 5502</span> </div><div class="line"><a name="l05503"></a><span class="lineno"> 5503</span> <span class="comment">/*</span></div><div class="line"><a name="l05504"></a><span class="lineno"> 5504</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05505"></a><span class="lineno"> 5505</span> <span class="comment"> * big <= real -> true or false</span></div><div class="line"><a name="l05506"></a><span class="lineno"> 5506</span> <span class="comment"> *</span></div><div class="line"><a name="l05507"></a><span class="lineno"> 5507</span> <span class="comment"> * Returns <code>true</code> if the value of <code>big</code> is</span></div><div class="line"><a name="l05508"></a><span class="lineno"> 5508</span> <span class="comment"> * less than or equal to that of <code>real</code>.</span></div><div class="line"><a name="l05509"></a><span class="lineno"> 5509</span> <span class="comment"> */</span></div><div class="line"><a name="l05510"></a><span class="lineno"> 5510</span> </div><div class="line"><a name="l05511"></a><span class="lineno"> 5511</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05512"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6583290ba8fd849d1c5237254ab14e67"> 5512</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6583290ba8fd849d1c5237254ab14e67">big_le</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05513"></a><span class="lineno"> 5513</span> {</div><div class="line"><a name="l05514"></a><span class="lineno"> 5514</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a>(x, y, <a class="code" href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f">big_op_le</a>);</div><div class="line"><a name="l05515"></a><span class="lineno"> 5515</span> }</div><div class="line"><a name="l05516"></a><span class="lineno"> 5516</span> </div><div class="line"><a name="l05517"></a><span class="lineno"> 5517</span> <span class="comment">/*</span></div><div class="line"><a name="l05518"></a><span class="lineno"> 5518</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05519"></a><span class="lineno"> 5519</span> <span class="comment"> * big == obj -> true or false</span></div><div class="line"><a name="l05520"></a><span class="lineno"> 5520</span> <span class="comment"> *</span></div><div class="line"><a name="l05521"></a><span class="lineno"> 5521</span> <span class="comment"> * Returns <code>true</code> only if <i>obj</i> has the same value</span></div><div class="line"><a name="l05522"></a><span class="lineno"> 5522</span> <span class="comment"> * as <i>big</i>. Contrast this with <code>Bignum#eql?</code>, which</span></div><div class="line"><a name="l05523"></a><span class="lineno"> 5523</span> <span class="comment"> * requires <i>obj</i> to be a <code>Bignum</code>.</span></div><div class="line"><a name="l05524"></a><span class="lineno"> 5524</span> <span class="comment"> *</span></div><div class="line"><a name="l05525"></a><span class="lineno"> 5525</span> <span class="comment"> * 68719476736 == 68719476736.0 #=> true</span></div><div class="line"><a name="l05526"></a><span class="lineno"> 5526</span> <span class="comment"> */</span></div><div class="line"><a name="l05527"></a><span class="lineno"> 5527</span> </div><div class="line"><a name="l05528"></a><span class="lineno"> 5528</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05529"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a67751bda2c22a842e91a27064dcdecb9"> 5529</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a80d84acdef43f8c683c020619750cfe1">rb_big_eq</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05530"></a><span class="lineno"> 5530</span> {</div><div class="line"><a name="l05531"></a><span class="lineno"> 5531</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l05532"></a><span class="lineno"> 5532</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(x) == y) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05533"></a><span class="lineno"> 5533</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l05534"></a><span class="lineno"> 5534</span>  }</div><div class="line"><a name="l05535"></a><span class="lineno"> 5535</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l05536"></a><span class="lineno"> 5536</span>  }</div><div class="line"><a name="l05537"></a><span class="lineno"> 5537</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l05538"></a><span class="lineno"> 5538</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a1b2178f547d44e73d5bb5e8cad36b24d">rb_integer_float_eq</a>(x, y);</div><div class="line"><a name="l05539"></a><span class="lineno"> 5539</span>  }</div><div class="line"><a name="l05540"></a><span class="lineno"> 5540</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05541"></a><span class="lineno"> 5541</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae0d75edc88a608fc05dd386edf53208f">rb_equal</a>(y, x);</div><div class="line"><a name="l05542"></a><span class="lineno"> 5542</span>  }</div><div class="line"><a name="l05543"></a><span class="lineno"> 5543</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05544"></a><span class="lineno"> 5544</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05545"></a><span class="lineno"> 5545</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x),<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y),<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>,<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y)) != 0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05546"></a><span class="lineno"> 5546</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05547"></a><span class="lineno"> 5547</span> }</div><div class="line"><a name="l05548"></a><span class="lineno"> 5548</span> </div><div class="line"><a name="l05549"></a><span class="lineno"> 5549</span> <span class="comment">/*</span></div><div class="line"><a name="l05550"></a><span class="lineno"> 5550</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05551"></a><span class="lineno"> 5551</span> <span class="comment"> * big.eql?(obj) -> true or false</span></div><div class="line"><a name="l05552"></a><span class="lineno"> 5552</span> <span class="comment"> *</span></div><div class="line"><a name="l05553"></a><span class="lineno"> 5553</span> <span class="comment"> * Returns <code>true</code> only if <i>obj</i> is a</span></div><div class="line"><a name="l05554"></a><span class="lineno"> 5554</span> <span class="comment"> * <code>Bignum</code> with the same value as <i>big</i>. Contrast this</span></div><div class="line"><a name="l05555"></a><span class="lineno"> 5555</span> <span class="comment"> * with <code>Bignum#==</code>, which performs type conversions.</span></div><div class="line"><a name="l05556"></a><span class="lineno"> 5556</span> <span class="comment"> *</span></div><div class="line"><a name="l05557"></a><span class="lineno"> 5557</span> <span class="comment"> * 68719476736.eql?(68719476736.0) #=> false</span></div><div class="line"><a name="l05558"></a><span class="lineno"> 5558</span> <span class="comment"> */</span></div><div class="line"><a name="l05559"></a><span class="lineno"> 5559</span> </div><div class="line"><a name="l05560"></a><span class="lineno"> 5560</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05561"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a1d3879d41e6e15028030a6dcad4d6a00"> 5561</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a82a70258b46e56291551f0585d69cce8">rb_big_eql</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05562"></a><span class="lineno"> 5562</span> {</div><div class="line"><a name="l05563"></a><span class="lineno"> 5563</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05564"></a><span class="lineno"> 5564</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05565"></a><span class="lineno"> 5565</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05566"></a><span class="lineno"> 5566</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x),<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y),<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>,<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y)) != 0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05567"></a><span class="lineno"> 5567</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05568"></a><span class="lineno"> 5568</span> }</div><div class="line"><a name="l05569"></a><span class="lineno"> 5569</span> </div><div class="line"><a name="l05570"></a><span class="lineno"> 5570</span> <span class="comment">/*</span></div><div class="line"><a name="l05571"></a><span class="lineno"> 5571</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05572"></a><span class="lineno"> 5572</span> <span class="comment"> * -big -> integer</span></div><div class="line"><a name="l05573"></a><span class="lineno"> 5573</span> <span class="comment"> *</span></div><div class="line"><a name="l05574"></a><span class="lineno"> 5574</span> <span class="comment"> * Unary minus (returns an integer whose value is 0-big)</span></div><div class="line"><a name="l05575"></a><span class="lineno"> 5575</span> <span class="comment"> */</span></div><div class="line"><a name="l05576"></a><span class="lineno"> 5576</span> </div><div class="line"><a name="l05577"></a><span class="lineno"> 5577</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05578"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#ad1e2c95ba33754099a9789e22b014c41"> 5578</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1e2c95ba33754099a9789e22b014c41">rb_big_uminus</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05579"></a><span class="lineno"> 5579</span> {</div><div class="line"><a name="l05580"></a><span class="lineno"> 5580</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a28fe45fbc613401b17ad1e9d48c81aa2">rb_big_clone</a>(x);</div><div class="line"><a name="l05581"></a><span class="lineno"> 5581</span> </div><div class="line"><a name="l05582"></a><span class="lineno"> 5582</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(z, !<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l05583"></a><span class="lineno"> 5583</span> </div><div class="line"><a name="l05584"></a><span class="lineno"> 5584</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l05585"></a><span class="lineno"> 5585</span> }</div><div class="line"><a name="l05586"></a><span class="lineno"> 5586</span> </div><div class="line"><a name="l05587"></a><span class="lineno"> 5587</span> <span class="comment">/*</span></div><div class="line"><a name="l05588"></a><span class="lineno"> 5588</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05589"></a><span class="lineno"> 5589</span> <span class="comment"> * ~big -> integer</span></div><div class="line"><a name="l05590"></a><span class="lineno"> 5590</span> <span class="comment"> *</span></div><div class="line"><a name="l05591"></a><span class="lineno"> 5591</span> <span class="comment"> * Inverts the bits in big. As Bignums are conceptually infinite</span></div><div class="line"><a name="l05592"></a><span class="lineno"> 5592</span> <span class="comment"> * length, the result acts as if it had an infinite number of one</span></div><div class="line"><a name="l05593"></a><span class="lineno"> 5593</span> <span class="comment"> * bits to the left. In hex representations, this is displayed</span></div><div class="line"><a name="l05594"></a><span class="lineno"> 5594</span> <span class="comment"> * as two periods to the left of the digits.</span></div><div class="line"><a name="l05595"></a><span class="lineno"> 5595</span> <span class="comment"> *</span></div><div class="line"><a name="l05596"></a><span class="lineno"> 5596</span> <span class="comment"> * sprintf("%X", ~0x1122334455) #=> "..FEEDDCCBBAA"</span></div><div class="line"><a name="l05597"></a><span class="lineno"> 5597</span> <span class="comment"> */</span></div><div class="line"><a name="l05598"></a><span class="lineno"> 5598</span> </div><div class="line"><a name="l05599"></a><span class="lineno"> 5599</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05600"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a0ec7083ef8b3aee8b5b157c6d18ea3f4"> 5600</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a0ec7083ef8b3aee8b5b157c6d18ea3f4">rb_big_neg</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05601"></a><span class="lineno"> 5601</span> {</div><div class="line"><a name="l05602"></a><span class="lineno"> 5602</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = <a class="code" href="../../d1/dcc/bignum_8c.html#a28fe45fbc613401b17ad1e9d48c81aa2">rb_big_clone</a>(x);</div><div class="line"><a name="l05603"></a><span class="lineno"> 5603</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05604"></a><span class="lineno"> 5604</span>  <span class="keywordtype">long</span> n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(z);</div><div class="line"><a name="l05605"></a><span class="lineno"> 5605</span> </div><div class="line"><a name="l05606"></a><span class="lineno"> 5606</span>  <span class="keywordflow">if</span> (!n) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05607"></a><span class="lineno"> 5607</span> </div><div class="line"><a name="l05608"></a><span class="lineno"> 5608</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(z)) {</div><div class="line"><a name="l05609"></a><span class="lineno"> 5609</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6">bary_add_one</a>(ds, n)) {</div><div class="line"><a name="l05610"></a><span class="lineno"> 5610</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4">big_extend_carry</a>(z);</div><div class="line"><a name="l05611"></a><span class="lineno"> 5611</span>  }</div><div class="line"><a name="l05612"></a><span class="lineno"> 5612</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5e43bbb0b5abb7127a5e65b3f8a650fc">RBIGNUM_SET_NEGATIVE_SIGN</a>(z);</div><div class="line"><a name="l05613"></a><span class="lineno"> 5613</span>  }</div><div class="line"><a name="l05614"></a><span class="lineno"> 5614</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05615"></a><span class="lineno"> 5615</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af472e31a1f27a51efa568d73b9ebf952">bary_neg</a>(ds, n);</div><div class="line"><a name="l05616"></a><span class="lineno"> 5616</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6">bary_add_one</a>(ds, n))</div><div class="line"><a name="l05617"></a><span class="lineno"> 5617</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l05618"></a><span class="lineno"> 5618</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af472e31a1f27a51efa568d73b9ebf952">bary_neg</a>(ds, n);</div><div class="line"><a name="l05619"></a><span class="lineno"> 5619</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af07b703574484fb572c0cc3408173a38">RBIGNUM_SET_POSITIVE_SIGN</a>(z);</div><div class="line"><a name="l05620"></a><span class="lineno"> 5620</span>  }</div><div class="line"><a name="l05621"></a><span class="lineno"> 5621</span> </div><div class="line"><a name="l05622"></a><span class="lineno"> 5622</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l05623"></a><span class="lineno"> 5623</span> }</div><div class="line"><a name="l05624"></a><span class="lineno"> 5624</span> </div><div class="line"><a name="l05625"></a><span class="lineno"> 5625</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05626"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#abf1c9eae189f827c638082edd3f5ba62"> 5626</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#abf1c9eae189f827c638082edd3f5ba62">bigsub</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05627"></a><span class="lineno"> 5627</span> {</div><div class="line"><a name="l05628"></a><span class="lineno"> 5628</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05629"></a><span class="lineno"> 5629</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *yds, *zds;</div><div class="line"><a name="l05630"></a><span class="lineno"> 5630</span>  <span class="keywordtype">long</span> xn, yn, zn;</div><div class="line"><a name="l05631"></a><span class="lineno"> 5631</span> </div><div class="line"><a name="l05632"></a><span class="lineno"> 5632</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05633"></a><span class="lineno"> 5633</span>  yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y);</div><div class="line"><a name="l05634"></a><span class="lineno"> 5634</span>  zn = xn < yn ? yn : xn;</div><div class="line"><a name="l05635"></a><span class="lineno"> 5635</span> </div><div class="line"><a name="l05636"></a><span class="lineno"> 5636</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 1);</div><div class="line"><a name="l05637"></a><span class="lineno"> 5637</span> </div><div class="line"><a name="l05638"></a><span class="lineno"> 5638</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05639"></a><span class="lineno"> 5639</span>  yds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l05640"></a><span class="lineno"> 5640</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05641"></a><span class="lineno"> 5641</span> </div><div class="line"><a name="l05642"></a><span class="lineno"> 5642</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a>(zds, zn, xds, xn, yds, yn)) {</div><div class="line"><a name="l05643"></a><span class="lineno"> 5643</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a>(zds, zn);</div><div class="line"><a name="l05644"></a><span class="lineno"> 5644</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a5e43bbb0b5abb7127a5e65b3f8a650fc">RBIGNUM_SET_NEGATIVE_SIGN</a>(z);</div><div class="line"><a name="l05645"></a><span class="lineno"> 5645</span>  }</div><div class="line"><a name="l05646"></a><span class="lineno"> 5646</span> </div><div class="line"><a name="l05647"></a><span class="lineno"> 5647</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l05648"></a><span class="lineno"> 5648</span> }</div><div class="line"><a name="l05649"></a><span class="lineno"> 5649</span> </div><div class="line"><a name="l05650"></a><span class="lineno"> 5650</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd">bigadd_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> y);</div><div class="line"><a name="l05651"></a><span class="lineno"> 5651</span> </div><div class="line"><a name="l05652"></a><span class="lineno"> 5652</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05653"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a84c8b311de8dd80e5325868a40501ebc"> 5653</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a84c8b311de8dd80e5325868a40501ebc">bigsub_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> y0)</div><div class="line"><a name="l05654"></a><span class="lineno"> 5654</span> {</div><div class="line"><a name="l05655"></a><span class="lineno"> 5655</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05656"></a><span class="lineno"> 5656</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l05657"></a><span class="lineno"> 5657</span>  <span class="keywordtype">long</span> xn, zn;</div><div class="line"><a name="l05658"></a><span class="lineno"> 5658</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a> num;</div><div class="line"><a name="l05659"></a><span class="lineno"> 5659</span>  <span class="keywordtype">long</span> i, y;</div><div class="line"><a name="l05660"></a><span class="lineno"> 5660</span> </div><div class="line"><a name="l05661"></a><span class="lineno"> 5661</span>  y = y0;</div><div class="line"><a name="l05662"></a><span class="lineno"> 5662</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05663"></a><span class="lineno"> 5663</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05664"></a><span class="lineno"> 5664</span> </div><div class="line"><a name="l05665"></a><span class="lineno"> 5665</span>  <span class="keywordflow">if</span> (xn == 0)</div><div class="line"><a name="l05666"></a><span class="lineno"> 5666</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a854de1c520ed24a625d5a29f36a08f7a">LONG2NUM</a>(-y0);</div><div class="line"><a name="l05667"></a><span class="lineno"> 5667</span> </div><div class="line"><a name="l05668"></a><span class="lineno"> 5668</span>  zn = xn;</div><div class="line"><a name="l05669"></a><span class="lineno"> 5669</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l05670"></a><span class="lineno"> 5670</span>  <span class="keywordflow">if</span> (zn < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG))</div><div class="line"><a name="l05671"></a><span class="lineno"> 5671</span>  zn = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG);</div><div class="line"><a name="l05672"></a><span class="lineno"> 5672</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05673"></a><span class="lineno"> 5673</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l05674"></a><span class="lineno"> 5674</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05675"></a><span class="lineno"> 5675</span> </div><div class="line"><a name="l05676"></a><span class="lineno"> 5676</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l05677"></a><span class="lineno"> 5677</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(xn == zn);</div><div class="line"><a name="l05678"></a><span class="lineno"> 5678</span>  num = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)xds[0] - y;</div><div class="line"><a name="l05679"></a><span class="lineno"> 5679</span>  <span class="keywordflow">if</span> (xn == 1 && num < 0) {</div><div class="line"><a name="l05680"></a><span class="lineno"> 5680</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(z, !<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l05681"></a><span class="lineno"> 5681</span>  zds[0] = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)-num;</div><div class="line"><a name="l05682"></a><span class="lineno"> 5682</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l05683"></a><span class="lineno"> 5683</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l05684"></a><span class="lineno"> 5684</span>  }</div><div class="line"><a name="l05685"></a><span class="lineno"> 5685</span>  zds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05686"></a><span class="lineno"> 5686</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05687"></a><span class="lineno"> 5687</span>  i = 1;</div><div class="line"><a name="l05688"></a><span class="lineno"> 5688</span>  <span class="keywordflow">if</span> (i < xn)</div><div class="line"><a name="l05689"></a><span class="lineno"> 5689</span>  <span class="keywordflow">goto</span> y_is_zero_x;</div><div class="line"><a name="l05690"></a><span class="lineno"> 5690</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05691"></a><span class="lineno"> 5691</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05692"></a><span class="lineno"> 5692</span>  num = 0;</div><div class="line"><a name="l05693"></a><span class="lineno"> 5693</span>  <span class="keywordflow">for</span> (i=0; i < xn; i++) {</div><div class="line"><a name="l05694"></a><span class="lineno"> 5694</span>  <span class="keywordflow">if</span> (y == 0) <span class="keywordflow">goto</span> y_is_zero_x;</div><div class="line"><a name="l05695"></a><span class="lineno"> 5695</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a>)xds[i] - <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l05696"></a><span class="lineno"> 5696</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05697"></a><span class="lineno"> 5697</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05698"></a><span class="lineno"> 5698</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l05699"></a><span class="lineno"> 5699</span>  }</div><div class="line"><a name="l05700"></a><span class="lineno"> 5700</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05701"></a><span class="lineno"> 5701</span>  <span class="keywordflow">if</span> (y == 0) <span class="keywordflow">goto</span> y_is_zero_z;</div><div class="line"><a name="l05702"></a><span class="lineno"> 5702</span>  num -= <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l05703"></a><span class="lineno"> 5703</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05704"></a><span class="lineno"> 5704</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05705"></a><span class="lineno"> 5705</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l05706"></a><span class="lineno"> 5706</span>  }</div><div class="line"><a name="l05707"></a><span class="lineno"> 5707</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05708"></a><span class="lineno"> 5708</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05709"></a><span class="lineno"> 5709</span> </div><div class="line"><a name="l05710"></a><span class="lineno"> 5710</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l05711"></a><span class="lineno"> 5711</span>  y_is_zero_x:</div><div class="line"><a name="l05712"></a><span class="lineno"> 5712</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero_x;</div><div class="line"><a name="l05713"></a><span class="lineno"> 5713</span>  num += xds[i];</div><div class="line"><a name="l05714"></a><span class="lineno"> 5714</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05715"></a><span class="lineno"> 5715</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05716"></a><span class="lineno"> 5716</span>  }</div><div class="line"><a name="l05717"></a><span class="lineno"> 5717</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l05718"></a><span class="lineno"> 5718</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05719"></a><span class="lineno"> 5719</span>  y_is_zero_z:</div><div class="line"><a name="l05720"></a><span class="lineno"> 5720</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero_z;</div><div class="line"><a name="l05721"></a><span class="lineno"> 5721</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05722"></a><span class="lineno"> 5722</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05723"></a><span class="lineno"> 5723</span>  }</div><div class="line"><a name="l05724"></a><span class="lineno"> 5724</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05725"></a><span class="lineno"> 5725</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05726"></a><span class="lineno"> 5726</span> </div><div class="line"><a name="l05727"></a><span class="lineno"> 5727</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l05728"></a><span class="lineno"> 5728</span>  num_is_zero_x:</div><div class="line"><a name="l05729"></a><span class="lineno"> 5729</span>  zds[i] = xds[i];</div><div class="line"><a name="l05730"></a><span class="lineno"> 5730</span>  }</div><div class="line"><a name="l05731"></a><span class="lineno"> 5731</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l05732"></a><span class="lineno"> 5732</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05733"></a><span class="lineno"> 5733</span>  num_is_zero_z:</div><div class="line"><a name="l05734"></a><span class="lineno"> 5734</span>  zds[i] = 0;</div><div class="line"><a name="l05735"></a><span class="lineno"> 5735</span>  }</div><div class="line"><a name="l05736"></a><span class="lineno"> 5736</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05737"></a><span class="lineno"> 5737</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05738"></a><span class="lineno"> 5738</span> </div><div class="line"><a name="l05739"></a><span class="lineno"> 5739</span>  finish:</div><div class="line"><a name="l05740"></a><span class="lineno"> 5740</span>  <a class="code" href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a>(num == 0 || num == -1);</div><div class="line"><a name="l05741"></a><span class="lineno"> 5741</span>  <span class="keywordflow">if</span> (num < 0) {</div><div class="line"><a name="l05742"></a><span class="lineno"> 5742</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37">get2comp</a>(z);</div><div class="line"><a name="l05743"></a><span class="lineno"> 5743</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(z, !<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l05744"></a><span class="lineno"> 5744</span>  }</div><div class="line"><a name="l05745"></a><span class="lineno"> 5745</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l05746"></a><span class="lineno"> 5746</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l05747"></a><span class="lineno"> 5747</span> }</div><div class="line"><a name="l05748"></a><span class="lineno"> 5748</span> </div><div class="line"><a name="l05749"></a><span class="lineno"> 5749</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05750"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd"> 5750</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd">bigadd_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> y)</div><div class="line"><a name="l05751"></a><span class="lineno"> 5751</span> {</div><div class="line"><a name="l05752"></a><span class="lineno"> 5752</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05753"></a><span class="lineno"> 5753</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l05754"></a><span class="lineno"> 5754</span>  <span class="keywordtype">long</span> xn, zn;</div><div class="line"><a name="l05755"></a><span class="lineno"> 5755</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> num;</div><div class="line"><a name="l05756"></a><span class="lineno"> 5756</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l05757"></a><span class="lineno"> 5757</span> </div><div class="line"><a name="l05758"></a><span class="lineno"> 5758</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05759"></a><span class="lineno"> 5759</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05760"></a><span class="lineno"> 5760</span> </div><div class="line"><a name="l05761"></a><span class="lineno"> 5761</span>  <span class="keywordflow">if</span> (xn == 0)</div><div class="line"><a name="l05762"></a><span class="lineno"> 5762</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a854de1c520ed24a625d5a29f36a08f7a">LONG2NUM</a>(y);</div><div class="line"><a name="l05763"></a><span class="lineno"> 5763</span> </div><div class="line"><a name="l05764"></a><span class="lineno"> 5764</span>  zn = xn;</div><div class="line"><a name="l05765"></a><span class="lineno"> 5765</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l05766"></a><span class="lineno"> 5766</span>  <span class="keywordflow">if</span> (zn < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG))</div><div class="line"><a name="l05767"></a><span class="lineno"> 5767</span>  zn = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG);</div><div class="line"><a name="l05768"></a><span class="lineno"> 5768</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05769"></a><span class="lineno"> 5769</span>  zn++;</div><div class="line"><a name="l05770"></a><span class="lineno"> 5770</span> </div><div class="line"><a name="l05771"></a><span class="lineno"> 5771</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l05772"></a><span class="lineno"> 5772</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05773"></a><span class="lineno"> 5773</span> </div><div class="line"><a name="l05774"></a><span class="lineno"> 5774</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l05775"></a><span class="lineno"> 5775</span>  num = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[0] + y;</div><div class="line"><a name="l05776"></a><span class="lineno"> 5776</span>  zds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05777"></a><span class="lineno"> 5777</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05778"></a><span class="lineno"> 5778</span>  i = 1;</div><div class="line"><a name="l05779"></a><span class="lineno"> 5779</span>  <span class="keywordflow">if</span> (i < xn)</div><div class="line"><a name="l05780"></a><span class="lineno"> 5780</span>  <span class="keywordflow">goto</span> y_is_zero_x;</div><div class="line"><a name="l05781"></a><span class="lineno"> 5781</span>  <span class="keywordflow">goto</span> y_is_zero_z;</div><div class="line"><a name="l05782"></a><span class="lineno"> 5782</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05783"></a><span class="lineno"> 5783</span>  num = 0;</div><div class="line"><a name="l05784"></a><span class="lineno"> 5784</span>  <span class="keywordflow">for</span> (i=0; i < xn; i++) {</div><div class="line"><a name="l05785"></a><span class="lineno"> 5785</span>  <span class="keywordflow">if</span> (y == 0) <span class="keywordflow">goto</span> y_is_zero_x;</div><div class="line"><a name="l05786"></a><span class="lineno"> 5786</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[i] + <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l05787"></a><span class="lineno"> 5787</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05788"></a><span class="lineno"> 5788</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05789"></a><span class="lineno"> 5789</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l05790"></a><span class="lineno"> 5790</span>  }</div><div class="line"><a name="l05791"></a><span class="lineno"> 5791</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05792"></a><span class="lineno"> 5792</span>  <span class="keywordflow">if</span> (y == 0) <span class="keywordflow">goto</span> y_is_zero_z;</div><div class="line"><a name="l05793"></a><span class="lineno"> 5793</span>  num += <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l05794"></a><span class="lineno"> 5794</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05795"></a><span class="lineno"> 5795</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05796"></a><span class="lineno"> 5796</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l05797"></a><span class="lineno"> 5797</span>  }</div><div class="line"><a name="l05798"></a><span class="lineno"> 5798</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05799"></a><span class="lineno"> 5799</span> </div><div class="line"><a name="l05800"></a><span class="lineno"> 5800</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05801"></a><span class="lineno"> 5801</span> </div><div class="line"><a name="l05802"></a><span class="lineno"> 5802</span>  <span class="keywordflow">for</span> (;i < xn; i++) {</div><div class="line"><a name="l05803"></a><span class="lineno"> 5803</span>  y_is_zero_x:</div><div class="line"><a name="l05804"></a><span class="lineno"> 5804</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero_x;</div><div class="line"><a name="l05805"></a><span class="lineno"> 5805</span>  num += (<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)xds[i];</div><div class="line"><a name="l05806"></a><span class="lineno"> 5806</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05807"></a><span class="lineno"> 5807</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05808"></a><span class="lineno"> 5808</span>  }</div><div class="line"><a name="l05809"></a><span class="lineno"> 5809</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05810"></a><span class="lineno"> 5810</span>  y_is_zero_z:</div><div class="line"><a name="l05811"></a><span class="lineno"> 5811</span>  <span class="keywordflow">if</span> (num == 0) <span class="keywordflow">goto</span> num_is_zero_z;</div><div class="line"><a name="l05812"></a><span class="lineno"> 5812</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(num);</div><div class="line"><a name="l05813"></a><span class="lineno"> 5813</span>  num = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(num);</div><div class="line"><a name="l05814"></a><span class="lineno"> 5814</span>  }</div><div class="line"><a name="l05815"></a><span class="lineno"> 5815</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05816"></a><span class="lineno"> 5816</span> </div><div class="line"><a name="l05817"></a><span class="lineno"> 5817</span>  <span class="keywordflow">for</span> (;i < xn; i++) {</div><div class="line"><a name="l05818"></a><span class="lineno"> 5818</span>  num_is_zero_x:</div><div class="line"><a name="l05819"></a><span class="lineno"> 5819</span>  zds[i] = xds[i];</div><div class="line"><a name="l05820"></a><span class="lineno"> 5820</span>  }</div><div class="line"><a name="l05821"></a><span class="lineno"> 5821</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l05822"></a><span class="lineno"> 5822</span>  num_is_zero_z:</div><div class="line"><a name="l05823"></a><span class="lineno"> 5823</span>  zds[i] = 0;</div><div class="line"><a name="l05824"></a><span class="lineno"> 5824</span>  }</div><div class="line"><a name="l05825"></a><span class="lineno"> 5825</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l05826"></a><span class="lineno"> 5826</span> </div><div class="line"><a name="l05827"></a><span class="lineno"> 5827</span>  finish:</div><div class="line"><a name="l05828"></a><span class="lineno"> 5828</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l05829"></a><span class="lineno"> 5829</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l05830"></a><span class="lineno"> 5830</span> }</div><div class="line"><a name="l05831"></a><span class="lineno"> 5831</span> </div><div class="line"><a name="l05832"></a><span class="lineno"> 5832</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05833"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637"> 5833</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keywordtype">int</span> sign)</div><div class="line"><a name="l05834"></a><span class="lineno"> 5834</span> {</div><div class="line"><a name="l05835"></a><span class="lineno"> 5835</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05836"></a><span class="lineno"> 5836</span>  <span class="keywordtype">long</span> len;</div><div class="line"><a name="l05837"></a><span class="lineno"> 5837</span> </div><div class="line"><a name="l05838"></a><span class="lineno"> 5838</span>  sign = (sign == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l05839"></a><span class="lineno"> 5839</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) != sign) {</div><div class="line"><a name="l05840"></a><span class="lineno"> 5840</span>  <span class="keywordflow">if</span> (sign) <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#abf1c9eae189f827c638082edd3f5ba62">bigsub</a>(y, x);</div><div class="line"><a name="l05841"></a><span class="lineno"> 5841</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#abf1c9eae189f827c638082edd3f5ba62">bigsub</a>(x, y);</div><div class="line"><a name="l05842"></a><span class="lineno"> 5842</span>  }</div><div class="line"><a name="l05843"></a><span class="lineno"> 5843</span> </div><div class="line"><a name="l05844"></a><span class="lineno"> 5844</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) > <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y)) {</div><div class="line"><a name="l05845"></a><span class="lineno"> 5845</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x) + 1;</div><div class="line"><a name="l05846"></a><span class="lineno"> 5846</span>  }</div><div class="line"><a name="l05847"></a><span class="lineno"> 5847</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05848"></a><span class="lineno"> 5848</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y) + 1;</div><div class="line"><a name="l05849"></a><span class="lineno"> 5849</span>  }</div><div class="line"><a name="l05850"></a><span class="lineno"> 5850</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(len, sign);</div><div class="line"><a name="l05851"></a><span class="lineno"> 5851</span> </div><div class="line"><a name="l05852"></a><span class="lineno"> 5852</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(z),</div><div class="line"><a name="l05853"></a><span class="lineno"> 5853</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x),</div><div class="line"><a name="l05854"></a><span class="lineno"> 5854</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y));</div><div class="line"><a name="l05855"></a><span class="lineno"> 5855</span> </div><div class="line"><a name="l05856"></a><span class="lineno"> 5856</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l05857"></a><span class="lineno"> 5857</span> }</div><div class="line"><a name="l05858"></a><span class="lineno"> 5858</span> </div><div class="line"><a name="l05859"></a><span class="lineno"> 5859</span> <span class="comment">/*</span></div><div class="line"><a name="l05860"></a><span class="lineno"> 5860</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05861"></a><span class="lineno"> 5861</span> <span class="comment"> * big + other -> Numeric</span></div><div class="line"><a name="l05862"></a><span class="lineno"> 5862</span> <span class="comment"> *</span></div><div class="line"><a name="l05863"></a><span class="lineno"> 5863</span> <span class="comment"> * Adds big and other, returning the result.</span></div><div class="line"><a name="l05864"></a><span class="lineno"> 5864</span> <span class="comment"> */</span></div><div class="line"><a name="l05865"></a><span class="lineno"> 5865</span> </div><div class="line"><a name="l05866"></a><span class="lineno"> 5866</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05867"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#aeb43bfd15cf73a91e2e807f95effb424"> 5867</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3996827354a05ef544beeaa557ce38a3">rb_big_plus</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05868"></a><span class="lineno"> 5868</span> {</div><div class="line"><a name="l05869"></a><span class="lineno"> 5869</span>  <span class="keywordtype">long</span> n;</div><div class="line"><a name="l05870"></a><span class="lineno"> 5870</span> </div><div class="line"><a name="l05871"></a><span class="lineno"> 5871</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l05872"></a><span class="lineno"> 5872</span>  n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l05873"></a><span class="lineno"> 5873</span>  <span class="keywordflow">if</span> ((n > 0) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)) {</div><div class="line"><a name="l05874"></a><span class="lineno"> 5874</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l05875"></a><span class="lineno"> 5875</span>  n = -n;</div><div class="line"><a name="l05876"></a><span class="lineno"> 5876</span>  }</div><div class="line"><a name="l05877"></a><span class="lineno"> 5877</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a84c8b311de8dd80e5325868a40501ebc">bigsub_int</a>(x, n);</div><div class="line"><a name="l05878"></a><span class="lineno"> 5878</span>  }</div><div class="line"><a name="l05879"></a><span class="lineno"> 5879</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l05880"></a><span class="lineno"> 5880</span>  n = -n;</div><div class="line"><a name="l05881"></a><span class="lineno"> 5881</span>  }</div><div class="line"><a name="l05882"></a><span class="lineno"> 5882</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd">bigadd_int</a>(x, n);</div><div class="line"><a name="l05883"></a><span class="lineno"> 5883</span>  }</div><div class="line"><a name="l05884"></a><span class="lineno"> 5884</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l05885"></a><span class="lineno"> 5885</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a>(x, y, 1));</div><div class="line"><a name="l05886"></a><span class="lineno"> 5886</span>  }</div><div class="line"><a name="l05887"></a><span class="lineno"> 5887</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l05888"></a><span class="lineno"> 5888</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x) + <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y));</div><div class="line"><a name="l05889"></a><span class="lineno"> 5889</span>  }</div><div class="line"><a name="l05890"></a><span class="lineno"> 5890</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05891"></a><span class="lineno"> 5891</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <span class="charliteral">'+'</span>);</div><div class="line"><a name="l05892"></a><span class="lineno"> 5892</span>  }</div><div class="line"><a name="l05893"></a><span class="lineno"> 5893</span> }</div><div class="line"><a name="l05894"></a><span class="lineno"> 5894</span> </div><div class="line"><a name="l05895"></a><span class="lineno"> 5895</span> <span class="comment">/*</span></div><div class="line"><a name="l05896"></a><span class="lineno"> 5896</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05897"></a><span class="lineno"> 5897</span> <span class="comment"> * big - other -> Numeric</span></div><div class="line"><a name="l05898"></a><span class="lineno"> 5898</span> <span class="comment"> *</span></div><div class="line"><a name="l05899"></a><span class="lineno"> 5899</span> <span class="comment"> * Subtracts other from big, returning the result.</span></div><div class="line"><a name="l05900"></a><span class="lineno"> 5900</span> <span class="comment"> */</span></div><div class="line"><a name="l05901"></a><span class="lineno"> 5901</span> </div><div class="line"><a name="l05902"></a><span class="lineno"> 5902</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05903"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a1e9ae4dc334e5333236af154eba17256"> 5903</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a143ebdf019c4659ad08b313052a294f4">rb_big_minus</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05904"></a><span class="lineno"> 5904</span> {</div><div class="line"><a name="l05905"></a><span class="lineno"> 5905</span>  <span class="keywordtype">long</span> n;</div><div class="line"><a name="l05906"></a><span class="lineno"> 5906</span> </div><div class="line"><a name="l05907"></a><span class="lineno"> 5907</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l05908"></a><span class="lineno"> 5908</span>  n = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l05909"></a><span class="lineno"> 5909</span>  <span class="keywordflow">if</span> ((n > 0) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)) {</div><div class="line"><a name="l05910"></a><span class="lineno"> 5910</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l05911"></a><span class="lineno"> 5911</span>  n = -n;</div><div class="line"><a name="l05912"></a><span class="lineno"> 5912</span>  }</div><div class="line"><a name="l05913"></a><span class="lineno"> 5913</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd">bigadd_int</a>(x, n);</div><div class="line"><a name="l05914"></a><span class="lineno"> 5914</span>  }</div><div class="line"><a name="l05915"></a><span class="lineno"> 5915</span>  <span class="keywordflow">if</span> (n < 0) {</div><div class="line"><a name="l05916"></a><span class="lineno"> 5916</span>  n = -n;</div><div class="line"><a name="l05917"></a><span class="lineno"> 5917</span>  }</div><div class="line"><a name="l05918"></a><span class="lineno"> 5918</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a84c8b311de8dd80e5325868a40501ebc">bigsub_int</a>(x, n);</div><div class="line"><a name="l05919"></a><span class="lineno"> 5919</span>  }</div><div class="line"><a name="l05920"></a><span class="lineno"> 5920</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l05921"></a><span class="lineno"> 5921</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a>(x, y, 0));</div><div class="line"><a name="l05922"></a><span class="lineno"> 5922</span>  }</div><div class="line"><a name="l05923"></a><span class="lineno"> 5923</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l05924"></a><span class="lineno"> 5924</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x) - <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y));</div><div class="line"><a name="l05925"></a><span class="lineno"> 5925</span>  }</div><div class="line"><a name="l05926"></a><span class="lineno"> 5926</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l05927"></a><span class="lineno"> 5927</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <span class="charliteral">'-'</span>);</div><div class="line"><a name="l05928"></a><span class="lineno"> 5928</span>  }</div><div class="line"><a name="l05929"></a><span class="lineno"> 5929</span> }</div><div class="line"><a name="l05930"></a><span class="lineno"> 5930</span> </div><div class="line"><a name="l05931"></a><span class="lineno"> 5931</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05932"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b"> 5932</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l05933"></a><span class="lineno"> 5933</span> {</div><div class="line"><a name="l05934"></a><span class="lineno"> 5934</span>  <span class="keywordtype">long</span> xn, zn;</div><div class="line"><a name="l05935"></a><span class="lineno"> 5935</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05936"></a><span class="lineno"> 5936</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l05937"></a><span class="lineno"> 5937</span> </div><div class="line"><a name="l05938"></a><span class="lineno"> 5938</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05939"></a><span class="lineno"> 5939</span>  zn = 2 * xn;</div><div class="line"><a name="l05940"></a><span class="lineno"> 5940</span> </div><div class="line"><a name="l05941"></a><span class="lineno"> 5941</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 1);</div><div class="line"><a name="l05942"></a><span class="lineno"> 5942</span> </div><div class="line"><a name="l05943"></a><span class="lineno"> 5943</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05944"></a><span class="lineno"> 5944</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05945"></a><span class="lineno"> 5945</span> </div><div class="line"><a name="l05946"></a><span class="lineno"> 5946</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l05947"></a><span class="lineno"> 5947</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../d1/dcc/bignum_8c.html#a17b66a15a998788405dc38045e09216c">GMP_MUL_DIGITS</a>)</div><div class="line"><a name="l05948"></a><span class="lineno"> 5948</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(zds, zn, xds, xn);</div><div class="line"><a name="l05949"></a><span class="lineno"> 5949</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05950"></a><span class="lineno"> 5950</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(zds, zn, xds, xn, xds, xn);</div><div class="line"><a name="l05951"></a><span class="lineno"> 5951</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l05952"></a><span class="lineno"> 5952</span>  <span class="keywordflow">if</span> (xn < <a class="code" href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2">KARATSUBA_MUL_DIGITS</a>)</div><div class="line"><a name="l05953"></a><span class="lineno"> 5953</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a>(zds, zn, xds, xn);</div><div class="line"><a name="l05954"></a><span class="lineno"> 5954</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l05955"></a><span class="lineno"> 5955</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(zds, zn, xds, xn, xds, xn);</div><div class="line"><a name="l05956"></a><span class="lineno"> 5956</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l05957"></a><span class="lineno"> 5957</span> </div><div class="line"><a name="l05958"></a><span class="lineno"> 5958</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l05959"></a><span class="lineno"> 5959</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l05960"></a><span class="lineno"> 5960</span> }</div><div class="line"><a name="l05961"></a><span class="lineno"> 5961</span> </div><div class="line"><a name="l05962"></a><span class="lineno"> 5962</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05963"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33"> 5963</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33">bigmul0</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05964"></a><span class="lineno"> 5964</span> {</div><div class="line"><a name="l05965"></a><span class="lineno"> 5965</span>  <span class="keywordtype">long</span> xn, yn, zn;</div><div class="line"><a name="l05966"></a><span class="lineno"> 5966</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l05967"></a><span class="lineno"> 5967</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *yds, *zds;</div><div class="line"><a name="l05968"></a><span class="lineno"> 5968</span> </div><div class="line"><a name="l05969"></a><span class="lineno"> 5969</span>  <span class="keywordflow">if</span> (x == y)</div><div class="line"><a name="l05970"></a><span class="lineno"> 5970</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a>(x);</div><div class="line"><a name="l05971"></a><span class="lineno"> 5971</span> </div><div class="line"><a name="l05972"></a><span class="lineno"> 5972</span>  xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l05973"></a><span class="lineno"> 5973</span>  yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y);</div><div class="line"><a name="l05974"></a><span class="lineno"> 5974</span>  zn = xn + yn;</div><div class="line"><a name="l05975"></a><span class="lineno"> 5975</span> </div><div class="line"><a name="l05976"></a><span class="lineno"> 5976</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l05977"></a><span class="lineno"> 5977</span> </div><div class="line"><a name="l05978"></a><span class="lineno"> 5978</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l05979"></a><span class="lineno"> 5979</span>  yds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l05980"></a><span class="lineno"> 5980</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l05981"></a><span class="lineno"> 5981</span> </div><div class="line"><a name="l05982"></a><span class="lineno"> 5982</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a>(zds, zn, xds, xn, yds, yn);</div><div class="line"><a name="l05983"></a><span class="lineno"> 5983</span> </div><div class="line"><a name="l05984"></a><span class="lineno"> 5984</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l05985"></a><span class="lineno"> 5985</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l05986"></a><span class="lineno"> 5986</span>  <span class="keywordflow">return</span> z;</div><div class="line"><a name="l05987"></a><span class="lineno"> 5987</span> }</div><div class="line"><a name="l05988"></a><span class="lineno"> 5988</span> </div><div class="line"><a name="l05989"></a><span class="lineno"> 5989</span> <span class="comment">/*</span></div><div class="line"><a name="l05990"></a><span class="lineno"> 5990</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05991"></a><span class="lineno"> 5991</span> <span class="comment"> * big * other -> Numeric</span></div><div class="line"><a name="l05992"></a><span class="lineno"> 5992</span> <span class="comment"> *</span></div><div class="line"><a name="l05993"></a><span class="lineno"> 5993</span> <span class="comment"> * Multiplies big and other, returning the result.</span></div><div class="line"><a name="l05994"></a><span class="lineno"> 5994</span> <span class="comment"> */</span></div><div class="line"><a name="l05995"></a><span class="lineno"> 5995</span> </div><div class="line"><a name="l05996"></a><span class="lineno"> 5996</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05997"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a64b40494c21a0076ce71c495f959b02c"> 5997</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a838287ae9846a01c6af80502216bd9b8">rb_big_mul</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l05998"></a><span class="lineno"> 5998</span> {</div><div class="line"><a name="l05999"></a><span class="lineno"> 5999</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06000"></a><span class="lineno"> 6000</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06001"></a><span class="lineno"> 6001</span>  }</div><div class="line"><a name="l06002"></a><span class="lineno"> 6002</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06003"></a><span class="lineno"> 6003</span>  }</div><div class="line"><a name="l06004"></a><span class="lineno"> 6004</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l06005"></a><span class="lineno"> 6005</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x) * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y));</div><div class="line"><a name="l06006"></a><span class="lineno"> 6006</span>  }</div><div class="line"><a name="l06007"></a><span class="lineno"> 6007</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06008"></a><span class="lineno"> 6008</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <span class="charliteral">'*'</span>);</div><div class="line"><a name="l06009"></a><span class="lineno"> 6009</span>  }</div><div class="line"><a name="l06010"></a><span class="lineno"> 6010</span> </div><div class="line"><a name="l06011"></a><span class="lineno"> 6011</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33">bigmul0</a>(x, y));</div><div class="line"><a name="l06012"></a><span class="lineno"> 6012</span> }</div><div class="line"><a name="l06013"></a><span class="lineno"> 6013</span> </div><div class="line"><a name="l06014"></a><span class="lineno"> 6014</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06015"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f"> 6015</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f">bigdivrem</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *divp, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *modp)</div><div class="line"><a name="l06016"></a><span class="lineno"> 6016</span> {</div><div class="line"><a name="l06017"></a><span class="lineno"> 6017</span>  <span class="keywordtype">long</span> xn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x), yn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y);</div><div class="line"><a name="l06018"></a><span class="lineno"> 6018</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06019"></a><span class="lineno"> 6019</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *yds, *zds;</div><div class="line"><a name="l06020"></a><span class="lineno"> 6020</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> dd;</div><div class="line"><a name="l06021"></a><span class="lineno"> 6021</span> </div><div class="line"><a name="l06022"></a><span class="lineno"> 6022</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> q = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>, r = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06023"></a><span class="lineno"> 6023</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *qds, *rds;</div><div class="line"><a name="l06024"></a><span class="lineno"> 6024</span>  <span class="keywordtype">long</span> qn, rn;</div><div class="line"><a name="l06025"></a><span class="lineno"> 6025</span> </div><div class="line"><a name="l06026"></a><span class="lineno"> 6026</span>  yds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l06027"></a><span class="lineno"> 6027</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(yds, yn);</div><div class="line"><a name="l06028"></a><span class="lineno"> 6028</span>  <span class="keywordflow">if</span> (yn == 0)</div><div class="line"><a name="l06029"></a><span class="lineno"> 6029</span>  <a class="code" href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a>();</div><div class="line"><a name="l06030"></a><span class="lineno"> 6030</span> </div><div class="line"><a name="l06031"></a><span class="lineno"> 6031</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06032"></a><span class="lineno"> 6032</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a>(xds, xn);</div><div class="line"><a name="l06033"></a><span class="lineno"> 6033</span> </div><div class="line"><a name="l06034"></a><span class="lineno"> 6034</span>  <span class="keywordflow">if</span> (xn < yn || (xn == yn && xds[xn - 1] < yds[yn - 1])) {</div><div class="line"><a name="l06035"></a><span class="lineno"> 6035</span>  <span class="keywordflow">if</span> (divp) *divp = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(0);</div><div class="line"><a name="l06036"></a><span class="lineno"> 6036</span>  <span class="keywordflow">if</span> (modp) *modp = x;</div><div class="line"><a name="l06037"></a><span class="lineno"> 6037</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06038"></a><span class="lineno"> 6038</span>  }</div><div class="line"><a name="l06039"></a><span class="lineno"> 6039</span>  <span class="keywordflow">if</span> (yn == 1) {</div><div class="line"><a name="l06040"></a><span class="lineno"> 6040</span>  dd = yds[0];</div><div class="line"><a name="l06041"></a><span class="lineno"> 6041</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(xn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l06042"></a><span class="lineno"> 6042</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06043"></a><span class="lineno"> 6043</span>  dd = <a class="code" href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a>(zds, xds, xn, dd);</div><div class="line"><a name="l06044"></a><span class="lineno"> 6044</span>  <span class="keywordflow">if</span> (modp) {</div><div class="line"><a name="l06045"></a><span class="lineno"> 6045</span>  *modp = <a class="code" href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a>((<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)dd);</div><div class="line"><a name="l06046"></a><span class="lineno"> 6046</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(*modp, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l06047"></a><span class="lineno"> 6047</span>  }</div><div class="line"><a name="l06048"></a><span class="lineno"> 6048</span>  <span class="keywordflow">if</span> (divp) *divp = z;</div><div class="line"><a name="l06049"></a><span class="lineno"> 6049</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06050"></a><span class="lineno"> 6050</span>  }</div><div class="line"><a name="l06051"></a><span class="lineno"> 6051</span>  <span class="keywordflow">if</span> (xn == 2 && yn == 2) {</div><div class="line"><a name="l06052"></a><span class="lineno"> 6052</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> x0 = <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(xds, 2);</div><div class="line"><a name="l06053"></a><span class="lineno"> 6053</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> y0 = <a class="code" href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a>(yds, 2);</div><div class="line"><a name="l06054"></a><span class="lineno"> 6054</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> q0 = x0 / y0;</div><div class="line"><a name="l06055"></a><span class="lineno"> 6055</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a> r0 = x0 % y0;</div><div class="line"><a name="l06056"></a><span class="lineno"> 6056</span>  <span class="keywordflow">if</span> (divp) {</div><div class="line"><a name="l06057"></a><span class="lineno"> 6057</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l06058"></a><span class="lineno"> 6058</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06059"></a><span class="lineno"> 6059</span>  zds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(q0);</div><div class="line"><a name="l06060"></a><span class="lineno"> 6060</span>  zds[1] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(q0));</div><div class="line"><a name="l06061"></a><span class="lineno"> 6061</span>  *divp = z;</div><div class="line"><a name="l06062"></a><span class="lineno"> 6062</span>  }</div><div class="line"><a name="l06063"></a><span class="lineno"> 6063</span>  <span class="keywordflow">if</span> (modp) {</div><div class="line"><a name="l06064"></a><span class="lineno"> 6064</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a>)), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l06065"></a><span class="lineno"> 6065</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06066"></a><span class="lineno"> 6066</span>  zds[0] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(r0);</div><div class="line"><a name="l06067"></a><span class="lineno"> 6067</span>  zds[1] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(r0));</div><div class="line"><a name="l06068"></a><span class="lineno"> 6068</span>  *modp = z;</div><div class="line"><a name="l06069"></a><span class="lineno"> 6069</span>  }</div><div class="line"><a name="l06070"></a><span class="lineno"> 6070</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06071"></a><span class="lineno"> 6071</span>  }</div><div class="line"><a name="l06072"></a><span class="lineno"> 6072</span> </div><div class="line"><a name="l06073"></a><span class="lineno"> 6073</span>  <span class="keywordflow">if</span> (divp) {</div><div class="line"><a name="l06074"></a><span class="lineno"> 6074</span>  qn = xn + <a class="code" href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a>;</div><div class="line"><a name="l06075"></a><span class="lineno"> 6075</span>  q = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(qn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)==<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y));</div><div class="line"><a name="l06076"></a><span class="lineno"> 6076</span>  qds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(q);</div><div class="line"><a name="l06077"></a><span class="lineno"> 6077</span>  }</div><div class="line"><a name="l06078"></a><span class="lineno"> 6078</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06079"></a><span class="lineno"> 6079</span>  qn = 0;</div><div class="line"><a name="l06080"></a><span class="lineno"> 6080</span>  qds = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l06081"></a><span class="lineno"> 6081</span>  }</div><div class="line"><a name="l06082"></a><span class="lineno"> 6082</span> </div><div class="line"><a name="l06083"></a><span class="lineno"> 6083</span>  <span class="keywordflow">if</span> (modp) {</div><div class="line"><a name="l06084"></a><span class="lineno"> 6084</span>  rn = yn;</div><div class="line"><a name="l06085"></a><span class="lineno"> 6085</span>  r = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(rn, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x));</div><div class="line"><a name="l06086"></a><span class="lineno"> 6086</span>  rds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(r);</div><div class="line"><a name="l06087"></a><span class="lineno"> 6087</span>  }</div><div class="line"><a name="l06088"></a><span class="lineno"> 6088</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06089"></a><span class="lineno"> 6089</span>  rn = 0;</div><div class="line"><a name="l06090"></a><span class="lineno"> 6090</span>  rds = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l06091"></a><span class="lineno"> 6091</span>  }</div><div class="line"><a name="l06092"></a><span class="lineno"> 6092</span> </div><div class="line"><a name="l06093"></a><span class="lineno"> 6093</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa789cbec5f248ea8ed2e99ceb14951f7">bary_divmod_branch</a>(qds, qn, rds, rn, xds, xn, yds, yn);</div><div class="line"><a name="l06094"></a><span class="lineno"> 6094</span> </div><div class="line"><a name="l06095"></a><span class="lineno"> 6095</span>  <span class="keywordflow">if</span> (divp) {</div><div class="line"><a name="l06096"></a><span class="lineno"> 6096</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(q);</div><div class="line"><a name="l06097"></a><span class="lineno"> 6097</span>  *divp = q;</div><div class="line"><a name="l06098"></a><span class="lineno"> 6098</span>  }</div><div class="line"><a name="l06099"></a><span class="lineno"> 6099</span>  <span class="keywordflow">if</span> (modp) {</div><div class="line"><a name="l06100"></a><span class="lineno"> 6100</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(r);</div><div class="line"><a name="l06101"></a><span class="lineno"> 6101</span>  *modp = r;</div><div class="line"><a name="l06102"></a><span class="lineno"> 6102</span>  }</div><div class="line"><a name="l06103"></a><span class="lineno"> 6103</span> </div><div class="line"><a name="l06104"></a><span class="lineno"> 6104</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06105"></a><span class="lineno"> 6105</span> }</div><div class="line"><a name="l06106"></a><span class="lineno"> 6106</span> </div><div class="line"><a name="l06107"></a><span class="lineno"> 6107</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l06108"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae"> 6108</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *divp, <span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *modp)</div><div class="line"><a name="l06109"></a><span class="lineno"> 6109</span> {</div><div class="line"><a name="l06110"></a><span class="lineno"> 6110</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l06111"></a><span class="lineno"> 6111</span> </div><div class="line"><a name="l06112"></a><span class="lineno"> 6112</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f">bigdivrem</a>(x, y, divp, &<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>);</div><div class="line"><a name="l06113"></a><span class="lineno"> 6113</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y) && !<a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>)) {</div><div class="line"><a name="l06114"></a><span class="lineno"> 6114</span>  <span class="keywordflow">if</span> (divp) *divp = <a class="code" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a>(*divp, <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(1), 0);</div><div class="line"><a name="l06115"></a><span class="lineno"> 6115</span>  <span class="keywordflow">if</span> (modp) *modp = <a class="code" href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a>(<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>, y, 1);</div><div class="line"><a name="l06116"></a><span class="lineno"> 6116</span>  }</div><div class="line"><a name="l06117"></a><span class="lineno"> 6117</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (modp) {</div><div class="line"><a name="l06118"></a><span class="lineno"> 6118</span>  *modp = <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l06119"></a><span class="lineno"> 6119</span>  }</div><div class="line"><a name="l06120"></a><span class="lineno"> 6120</span> }</div><div class="line"><a name="l06121"></a><span class="lineno"> 6121</span> </div><div class="line"><a name="l06122"></a><span class="lineno"> 6122</span> </div><div class="line"><a name="l06123"></a><span class="lineno"> 6123</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06124"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a74874da3fd3e0fdee6bc4da800924595"> 6124</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a74874da3fd3e0fdee6bc4da800924595">rb_big_divide</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> op)</div><div class="line"><a name="l06125"></a><span class="lineno"> 6125</span> {</div><div class="line"><a name="l06126"></a><span class="lineno"> 6126</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06127"></a><span class="lineno"> 6127</span> </div><div class="line"><a name="l06128"></a><span class="lineno"> 6128</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06129"></a><span class="lineno"> 6129</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06130"></a><span class="lineno"> 6130</span>  }</div><div class="line"><a name="l06131"></a><span class="lineno"> 6131</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06132"></a><span class="lineno"> 6132</span>  }</div><div class="line"><a name="l06133"></a><span class="lineno"> 6133</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l06134"></a><span class="lineno"> 6134</span>  <span class="keywordflow">if</span> (op == <span class="charliteral">'/'</span>) {</div><div class="line"><a name="l06135"></a><span class="lineno"> 6135</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x) / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y));</div><div class="line"><a name="l06136"></a><span class="lineno"> 6136</span>  }</div><div class="line"><a name="l06137"></a><span class="lineno"> 6137</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06138"></a><span class="lineno"> 6138</span>  <span class="keywordtype">double</span> dy = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y);</div><div class="line"><a name="l06139"></a><span class="lineno"> 6139</span>  <span class="keywordflow">if</span> (dy == 0.0) <a class="code" href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a>();</div><div class="line"><a name="l06140"></a><span class="lineno"> 6140</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7cf59f449a9f516aa7d781db3357dd94">rb_dbl2big</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x) / dy);</div><div class="line"><a name="l06141"></a><span class="lineno"> 6141</span>  }</div><div class="line"><a name="l06142"></a><span class="lineno"> 6142</span>  }</div><div class="line"><a name="l06143"></a><span class="lineno"> 6143</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06144"></a><span class="lineno"> 6144</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, op);</div><div class="line"><a name="l06145"></a><span class="lineno"> 6145</span>  }</div><div class="line"><a name="l06146"></a><span class="lineno"> 6146</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a>(x, y, &z, 0);</div><div class="line"><a name="l06147"></a><span class="lineno"> 6147</span> </div><div class="line"><a name="l06148"></a><span class="lineno"> 6148</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06149"></a><span class="lineno"> 6149</span> }</div><div class="line"><a name="l06150"></a><span class="lineno"> 6150</span> </div><div class="line"><a name="l06151"></a><span class="lineno"> 6151</span> <span class="comment">/*</span></div><div class="line"><a name="l06152"></a><span class="lineno"> 6152</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06153"></a><span class="lineno"> 6153</span> <span class="comment"> * big / other -> Numeric</span></div><div class="line"><a name="l06154"></a><span class="lineno"> 6154</span> <span class="comment"> *</span></div><div class="line"><a name="l06155"></a><span class="lineno"> 6155</span> <span class="comment"> * Performs division: the class of the resulting object depends on</span></div><div class="line"><a name="l06156"></a><span class="lineno"> 6156</span> <span class="comment"> * the class of <code>numeric</code> and on the magnitude of the</span></div><div class="line"><a name="l06157"></a><span class="lineno"> 6157</span> <span class="comment"> * result.</span></div><div class="line"><a name="l06158"></a><span class="lineno"> 6158</span> <span class="comment"> */</span></div><div class="line"><a name="l06159"></a><span class="lineno"> 6159</span> </div><div class="line"><a name="l06160"></a><span class="lineno"> 6160</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06161"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a26d1176a663bd244072e1b62bec56db7"> 6161</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac951414bf7b52b8ce949e921baf793a8">rb_big_div</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06162"></a><span class="lineno"> 6162</span> {</div><div class="line"><a name="l06163"></a><span class="lineno"> 6163</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a74874da3fd3e0fdee6bc4da800924595">rb_big_divide</a>(x, y, <span class="charliteral">'/'</span>);</div><div class="line"><a name="l06164"></a><span class="lineno"> 6164</span> }</div><div class="line"><a name="l06165"></a><span class="lineno"> 6165</span> </div><div class="line"><a name="l06166"></a><span class="lineno"> 6166</span> <span class="comment">/*</span></div><div class="line"><a name="l06167"></a><span class="lineno"> 6167</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06168"></a><span class="lineno"> 6168</span> <span class="comment"> * big.div(other) -> integer</span></div><div class="line"><a name="l06169"></a><span class="lineno"> 6169</span> <span class="comment"> *</span></div><div class="line"><a name="l06170"></a><span class="lineno"> 6170</span> <span class="comment"> * Performs integer division: returns integer value.</span></div><div class="line"><a name="l06171"></a><span class="lineno"> 6171</span> <span class="comment"> */</span></div><div class="line"><a name="l06172"></a><span class="lineno"> 6172</span> </div><div class="line"><a name="l06173"></a><span class="lineno"> 6173</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06174"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a287e290252508a251c0abc1fa967fecf"> 6174</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a53fc55611c7e85d15e505299fea22694">rb_big_idiv</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06175"></a><span class="lineno"> 6175</span> {</div><div class="line"><a name="l06176"></a><span class="lineno"> 6176</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a74874da3fd3e0fdee6bc4da800924595">rb_big_divide</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"div"</span>));</div><div class="line"><a name="l06177"></a><span class="lineno"> 6177</span> }</div><div class="line"><a name="l06178"></a><span class="lineno"> 6178</span> </div><div class="line"><a name="l06179"></a><span class="lineno"> 6179</span> <span class="comment">/*</span></div><div class="line"><a name="l06180"></a><span class="lineno"> 6180</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06181"></a><span class="lineno"> 6181</span> <span class="comment"> * big % other -> Numeric</span></div><div class="line"><a name="l06182"></a><span class="lineno"> 6182</span> <span class="comment"> * big.modulo(other) -> Numeric</span></div><div class="line"><a name="l06183"></a><span class="lineno"> 6183</span> <span class="comment"> *</span></div><div class="line"><a name="l06184"></a><span class="lineno"> 6184</span> <span class="comment"> * Returns big modulo other. See Numeric.divmod for more</span></div><div class="line"><a name="l06185"></a><span class="lineno"> 6185</span> <span class="comment"> * information.</span></div><div class="line"><a name="l06186"></a><span class="lineno"> 6186</span> <span class="comment"> */</span></div><div class="line"><a name="l06187"></a><span class="lineno"> 6187</span> </div><div class="line"><a name="l06188"></a><span class="lineno"> 6188</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06189"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#aaa2916204137c63ffc862c89a1aa32b9"> 6189</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a15a52868c6862b9574ce1aceb688af97">rb_big_modulo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06190"></a><span class="lineno"> 6190</span> {</div><div class="line"><a name="l06191"></a><span class="lineno"> 6191</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06192"></a><span class="lineno"> 6192</span> </div><div class="line"><a name="l06193"></a><span class="lineno"> 6193</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06194"></a><span class="lineno"> 6194</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06195"></a><span class="lineno"> 6195</span>  }</div><div class="line"><a name="l06196"></a><span class="lineno"> 6196</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06197"></a><span class="lineno"> 6197</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <span class="charliteral">'%'</span>);</div><div class="line"><a name="l06198"></a><span class="lineno"> 6198</span>  }</div><div class="line"><a name="l06199"></a><span class="lineno"> 6199</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a>(x, y, 0, &z);</div><div class="line"><a name="l06200"></a><span class="lineno"> 6200</span> </div><div class="line"><a name="l06201"></a><span class="lineno"> 6201</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06202"></a><span class="lineno"> 6202</span> }</div><div class="line"><a name="l06203"></a><span class="lineno"> 6203</span> </div><div class="line"><a name="l06204"></a><span class="lineno"> 6204</span> <span class="comment">/*</span></div><div class="line"><a name="l06205"></a><span class="lineno"> 6205</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06206"></a><span class="lineno"> 6206</span> <span class="comment"> * big.remainder(numeric) -> number</span></div><div class="line"><a name="l06207"></a><span class="lineno"> 6207</span> <span class="comment"> *</span></div><div class="line"><a name="l06208"></a><span class="lineno"> 6208</span> <span class="comment"> * Returns the remainder after dividing <i>big</i> by <i>numeric</i>.</span></div><div class="line"><a name="l06209"></a><span class="lineno"> 6209</span> <span class="comment"> *</span></div><div class="line"><a name="l06210"></a><span class="lineno"> 6210</span> <span class="comment"> * -1234567890987654321.remainder(13731) #=> -6966</span></div><div class="line"><a name="l06211"></a><span class="lineno"> 6211</span> <span class="comment"> * -1234567890987654321.remainder(13731.24) #=> -9906.22531493148</span></div><div class="line"><a name="l06212"></a><span class="lineno"> 6212</span> <span class="comment"> */</span></div><div class="line"><a name="l06213"></a><span class="lineno"> 6213</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06214"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa8b6d1356e1d76250c63ab6c5d62f5d6"> 6214</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa8b6d1356e1d76250c63ab6c5d62f5d6">rb_big_remainder</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06215"></a><span class="lineno"> 6215</span> {</div><div class="line"><a name="l06216"></a><span class="lineno"> 6216</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06217"></a><span class="lineno"> 6217</span> </div><div class="line"><a name="l06218"></a><span class="lineno"> 6218</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06219"></a><span class="lineno"> 6219</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06220"></a><span class="lineno"> 6220</span>  }</div><div class="line"><a name="l06221"></a><span class="lineno"> 6221</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06222"></a><span class="lineno"> 6222</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"remainder"</span>));</div><div class="line"><a name="l06223"></a><span class="lineno"> 6223</span>  }</div><div class="line"><a name="l06224"></a><span class="lineno"> 6224</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f">bigdivrem</a>(x, y, 0, &z);</div><div class="line"><a name="l06225"></a><span class="lineno"> 6225</span> </div><div class="line"><a name="l06226"></a><span class="lineno"> 6226</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06227"></a><span class="lineno"> 6227</span> }</div><div class="line"><a name="l06228"></a><span class="lineno"> 6228</span> </div><div class="line"><a name="l06229"></a><span class="lineno"> 6229</span> <span class="comment">/*</span></div><div class="line"><a name="l06230"></a><span class="lineno"> 6230</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06231"></a><span class="lineno"> 6231</span> <span class="comment"> * big.divmod(numeric) -> array</span></div><div class="line"><a name="l06232"></a><span class="lineno"> 6232</span> <span class="comment"> *</span></div><div class="line"><a name="l06233"></a><span class="lineno"> 6233</span> <span class="comment"> * See <code>Numeric#divmod</code>.</span></div><div class="line"><a name="l06234"></a><span class="lineno"> 6234</span> <span class="comment"> *</span></div><div class="line"><a name="l06235"></a><span class="lineno"> 6235</span> <span class="comment"> */</span></div><div class="line"><a name="l06236"></a><span class="lineno"> 6236</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06237"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a907f03439bcbe74f0bcff2ec13a689f1"> 6237</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#abbe46ceec250a75ee9e1c53c26b05020">rb_big_divmod</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06238"></a><span class="lineno"> 6238</span> {</div><div class="line"><a name="l06239"></a><span class="lineno"> 6239</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a>, <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>;</div><div class="line"><a name="l06240"></a><span class="lineno"> 6240</span> </div><div class="line"><a name="l06241"></a><span class="lineno"> 6241</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06242"></a><span class="lineno"> 6242</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06243"></a><span class="lineno"> 6243</span>  }</div><div class="line"><a name="l06244"></a><span class="lineno"> 6244</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06245"></a><span class="lineno"> 6245</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"divmod"</span>));</div><div class="line"><a name="l06246"></a><span class="lineno"> 6246</span>  }</div><div class="line"><a name="l06247"></a><span class="lineno"> 6247</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a>(x, y, &<a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a>, &<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>);</div><div class="line"><a name="l06248"></a><span class="lineno"> 6248</span> </div><div class="line"><a name="l06249"></a><span class="lineno"> 6249</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a>), <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a>));</div><div class="line"><a name="l06250"></a><span class="lineno"> 6250</span> }</div><div class="line"><a name="l06251"></a><span class="lineno"> 6251</span> </div><div class="line"><a name="l06252"></a><span class="lineno"> 6252</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06253"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af3e7f4ad364b1e97d0b6847726a2fd62"> 6253</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af3e7f4ad364b1e97d0b6847726a2fd62">big_shift</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> n)</div><div class="line"><a name="l06254"></a><span class="lineno"> 6254</span> {</div><div class="line"><a name="l06255"></a><span class="lineno"> 6255</span>  <span class="keywordflow">if</span> (n < 0)</div><div class="line"><a name="l06256"></a><span class="lineno"> 6256</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#abe7db8a1471a3e308ce3e39fc22ea010">big_lshift</a>(x, 1+(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)(-(n+1)));</div><div class="line"><a name="l06257"></a><span class="lineno"> 6257</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (n > 0)</div><div class="line"><a name="l06258"></a><span class="lineno"> 6258</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a032eeb434262dd121fea1c51fa0613c9">big_rshift</a>(x, (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)n);</div><div class="line"><a name="l06259"></a><span class="lineno"> 6259</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l06260"></a><span class="lineno"> 6260</span> }</div><div class="line"><a name="l06261"></a><span class="lineno"> 6261</span> </div><div class="line"><a name="l06262"></a><span class="lineno"> 6262</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06263"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a513860078ce7ea09f8802a79db911e4f"> 6263</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a513860078ce7ea09f8802a79db911e4f">big_fdiv</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y, <span class="keywordtype">long</span> ey)</div><div class="line"><a name="l06264"></a><span class="lineno"> 6264</span> {</div><div class="line"><a name="l06265"></a><span class="lineno"> 6265</span> <span class="preprocessor">#define DBL_BIGDIG ((DBL_MANT_DIG + BITSPERDIG) / BITSPERDIG)</span></div><div class="line"><a name="l06266"></a><span class="lineno"> 6266</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06267"></a><span class="lineno"> 6267</span>  <span class="keywordtype">long</span> l, ex;</div><div class="line"><a name="l06268"></a><span class="lineno"> 6268</span> </div><div class="line"><a name="l06269"></a><span class="lineno"> 6269</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(x);</div><div class="line"><a name="l06270"></a><span class="lineno"> 6270</span>  l = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l06271"></a><span class="lineno"> 6271</span>  ex = l * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x)[l-1]);</div><div class="line"><a name="l06272"></a><span class="lineno"> 6272</span>  ex -= 2 * <a class="code" href="../../d1/dcc/bignum_8c.html#a0d38f300842430033b15cbf25951ea49">DBL_BIGDIG</a> * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l06273"></a><span class="lineno"> 6273</span>  <span class="keywordflow">if</span> (ex) x = <a class="code" href="../../d1/dcc/bignum_8c.html#af3e7f4ad364b1e97d0b6847726a2fd62">big_shift</a>(x, ex);</div><div class="line"><a name="l06274"></a><span class="lineno"> 6274</span> </div><div class="line"><a name="l06275"></a><span class="lineno"> 6275</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f">bigdivrem</a>(x, y, &z, 0);</div><div class="line"><a name="l06276"></a><span class="lineno"> 6276</span>  l = ex - ey;</div><div class="line"><a name="l06277"></a><span class="lineno"> 6277</span> <span class="preprocessor">#if SIZEOF_LONG > SIZEOF_INT</span></div><div class="line"><a name="l06278"></a><span class="lineno"> 6278</span>  {</div><div class="line"><a name="l06279"></a><span class="lineno"> 6279</span>  <span class="comment">/* Visual C++ can't be here */</span></div><div class="line"><a name="l06280"></a><span class="lineno"> 6280</span>  <span class="keywordflow">if</span> (l > INT_MAX) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(<a class="code" href="../../d3/d90/missing_8h.html#a956e2723d559858d08644ac99146e910">INFINITY</a>);</div><div class="line"><a name="l06281"></a><span class="lineno"> 6281</span>  <span class="keywordflow">if</span> (l < INT_MIN) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(0.0);</div><div class="line"><a name="l06282"></a><span class="lineno"> 6282</span>  }</div><div class="line"><a name="l06283"></a><span class="lineno"> 6283</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06284"></a><span class="lineno"> 6284</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(ldexp(<a class="code" href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667">big2dbl</a>(z), (<span class="keywordtype">int</span>)l));</div><div class="line"><a name="l06285"></a><span class="lineno"> 6285</span> }</div><div class="line"><a name="l06286"></a><span class="lineno"> 6286</span> </div><div class="line"><a name="l06287"></a><span class="lineno"> 6287</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06288"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac670fe1426f00dce52bebb033c85554e"> 6288</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac670fe1426f00dce52bebb033c85554e">big_fdiv_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06289"></a><span class="lineno"> 6289</span> {</div><div class="line"><a name="l06290"></a><span class="lineno"> 6290</span>  <span class="keywordtype">long</span> l, ey;</div><div class="line"><a name="l06291"></a><span class="lineno"> 6291</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(y);</div><div class="line"><a name="l06292"></a><span class="lineno"> 6292</span>  l = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(y);</div><div class="line"><a name="l06293"></a><span class="lineno"> 6293</span>  ey = l * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a> - <a class="code" href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y)[l-1]);</div><div class="line"><a name="l06294"></a><span class="lineno"> 6294</span>  ey -= <a class="code" href="../../d1/dcc/bignum_8c.html#a0d38f300842430033b15cbf25951ea49">DBL_BIGDIG</a> * <a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l06295"></a><span class="lineno"> 6295</span>  <span class="keywordflow">if</span> (ey) y = <a class="code" href="../../d1/dcc/bignum_8c.html#af3e7f4ad364b1e97d0b6847726a2fd62">big_shift</a>(y, ey);</div><div class="line"><a name="l06296"></a><span class="lineno"> 6296</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a513860078ce7ea09f8802a79db911e4f">big_fdiv</a>(x, y, ey);</div><div class="line"><a name="l06297"></a><span class="lineno"> 6297</span> }</div><div class="line"><a name="l06298"></a><span class="lineno"> 6298</span> </div><div class="line"><a name="l06299"></a><span class="lineno"> 6299</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06300"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#aa8849ce4da76a1a955721e8ff25d1d37"> 6300</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa8849ce4da76a1a955721e8ff25d1d37">big_fdiv_float</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06301"></a><span class="lineno"> 6301</span> {</div><div class="line"><a name="l06302"></a><span class="lineno"> 6302</span>  <span class="keywordtype">int</span> i;</div><div class="line"><a name="l06303"></a><span class="lineno"> 6303</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a96d717ef03002509bf9e231e57f5ed59">dbl2big</a>(ldexp(frexp(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y), &i), <a class="code" href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a>));</div><div class="line"><a name="l06304"></a><span class="lineno"> 6304</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a513860078ce7ea09f8802a79db911e4f">big_fdiv</a>(x, y, i - <a class="code" href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a>);</div><div class="line"><a name="l06305"></a><span class="lineno"> 6305</span> }</div><div class="line"><a name="l06306"></a><span class="lineno"> 6306</span> </div><div class="line"><a name="l06307"></a><span class="lineno"> 6307</span> <span class="comment">/*</span></div><div class="line"><a name="l06308"></a><span class="lineno"> 6308</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06309"></a><span class="lineno"> 6309</span> <span class="comment"> * big.fdiv(numeric) -> float</span></div><div class="line"><a name="l06310"></a><span class="lineno"> 6310</span> <span class="comment"> *</span></div><div class="line"><a name="l06311"></a><span class="lineno"> 6311</span> <span class="comment"> * Returns the floating point result of dividing <i>big</i> by</span></div><div class="line"><a name="l06312"></a><span class="lineno"> 6312</span> <span class="comment"> * <i>numeric</i>.</span></div><div class="line"><a name="l06313"></a><span class="lineno"> 6313</span> <span class="comment"> *</span></div><div class="line"><a name="l06314"></a><span class="lineno"> 6314</span> <span class="comment"> * -1234567890987654321.fdiv(13731) #=> -89910996357705.5</span></div><div class="line"><a name="l06315"></a><span class="lineno"> 6315</span> <span class="comment"> * -1234567890987654321.fdiv(13731.24) #=> -89909424858035.7</span></div><div class="line"><a name="l06316"></a><span class="lineno"> 6316</span> <span class="comment"> *</span></div><div class="line"><a name="l06317"></a><span class="lineno"> 6317</span> <span class="comment"> */</span></div><div class="line"><a name="l06318"></a><span class="lineno"> 6318</span> </div><div class="line"><a name="l06319"></a><span class="lineno"> 6319</span> </div><div class="line"><a name="l06320"></a><span class="lineno"> 6320</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06321"></a><span class="lineno"><a class="line" href="../../db/dde/internal_8h.html#ab89dcf2bcfe7255146042df1d3649c52"> 6321</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ab89dcf2bcfe7255146042df1d3649c52">rb_big_fdiv</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06322"></a><span class="lineno"> 6322</span> {</div><div class="line"><a name="l06323"></a><span class="lineno"> 6323</span>  <span class="keywordtype">double</span> dx, dy;</div><div class="line"><a name="l06324"></a><span class="lineno"> 6324</span> </div><div class="line"><a name="l06325"></a><span class="lineno"> 6325</span>  dx = <a class="code" href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667">big2dbl</a>(x);</div><div class="line"><a name="l06326"></a><span class="lineno"> 6326</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06327"></a><span class="lineno"> 6327</span>  dy = (double)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l06328"></a><span class="lineno"> 6328</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(dx))</div><div class="line"><a name="l06329"></a><span class="lineno"> 6329</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac670fe1426f00dce52bebb033c85554e">big_fdiv_int</a>(x, <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y)));</div><div class="line"><a name="l06330"></a><span class="lineno"> 6330</span>  }</div><div class="line"><a name="l06331"></a><span class="lineno"> 6331</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06332"></a><span class="lineno"> 6332</span>  dy = <a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(y);</div><div class="line"><a name="l06333"></a><span class="lineno"> 6333</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(dx) || <a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(dy))</div><div class="line"><a name="l06334"></a><span class="lineno"> 6334</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac670fe1426f00dce52bebb033c85554e">big_fdiv_int</a>(x, y);</div><div class="line"><a name="l06335"></a><span class="lineno"> 6335</span>  }</div><div class="line"><a name="l06336"></a><span class="lineno"> 6336</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l06337"></a><span class="lineno"> 6337</span>  dy = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y);</div><div class="line"><a name="l06338"></a><span class="lineno"> 6338</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/db1/win32_8h.html#a2e1baae9134e580910322362dc23290e">isnan</a>(dy))</div><div class="line"><a name="l06339"></a><span class="lineno"> 6339</span>  <span class="keywordflow">return</span> y;</div><div class="line"><a name="l06340"></a><span class="lineno"> 6340</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a>(dx))</div><div class="line"><a name="l06341"></a><span class="lineno"> 6341</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#aa8849ce4da76a1a955721e8ff25d1d37">big_fdiv_float</a>(x, y);</div><div class="line"><a name="l06342"></a><span class="lineno"> 6342</span>  }</div><div class="line"><a name="l06343"></a><span class="lineno"> 6343</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06344"></a><span class="lineno"> 6344</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"fdiv"</span>));</div><div class="line"><a name="l06345"></a><span class="lineno"> 6345</span>  }</div><div class="line"><a name="l06346"></a><span class="lineno"> 6346</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(dx / dy);</div><div class="line"><a name="l06347"></a><span class="lineno"> 6347</span> }</div><div class="line"><a name="l06348"></a><span class="lineno"> 6348</span> </div><div class="line"><a name="l06349"></a><span class="lineno"> 6349</span> <span class="comment">/*</span></div><div class="line"><a name="l06350"></a><span class="lineno"> 6350</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06351"></a><span class="lineno"> 6351</span> <span class="comment"> * big ** exponent -> numeric</span></div><div class="line"><a name="l06352"></a><span class="lineno"> 6352</span> <span class="comment"> *</span></div><div class="line"><a name="l06353"></a><span class="lineno"> 6353</span> <span class="comment"> * Raises _big_ to the _exponent_ power (which may be an integer, float,</span></div><div class="line"><a name="l06354"></a><span class="lineno"> 6354</span> <span class="comment"> * or anything that will coerce to a number). The result may be</span></div><div class="line"><a name="l06355"></a><span class="lineno"> 6355</span> <span class="comment"> * a Fixnum, Bignum, or Float</span></div><div class="line"><a name="l06356"></a><span class="lineno"> 6356</span> <span class="comment"> *</span></div><div class="line"><a name="l06357"></a><span class="lineno"> 6357</span> <span class="comment"> * 123456789 ** 2 #=> 15241578750190521</span></div><div class="line"><a name="l06358"></a><span class="lineno"> 6358</span> <span class="comment"> * 123456789 ** 1.2 #=> 5126464716.09932</span></div><div class="line"><a name="l06359"></a><span class="lineno"> 6359</span> <span class="comment"> * 123456789 ** -2 #=> 6.5610001194102e-17</span></div><div class="line"><a name="l06360"></a><span class="lineno"> 6360</span> <span class="comment"> */</span></div><div class="line"><a name="l06361"></a><span class="lineno"> 6361</span> </div><div class="line"><a name="l06362"></a><span class="lineno"> 6362</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06363"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a0f5d8885c5981515bbf20ec1cc16342a"> 6363</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a22a538c97c7b21b2edd1eb2a9b54e196">rb_big_pow</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06364"></a><span class="lineno"> 6364</span> {</div><div class="line"><a name="l06365"></a><span class="lineno"> 6365</span>  <span class="keywordtype">double</span> d;</div><div class="line"><a name="l06366"></a><span class="lineno"> 6366</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a> yy;</div><div class="line"><a name="l06367"></a><span class="lineno"> 6367</span> </div><div class="line"><a name="l06368"></a><span class="lineno"> 6368</span>  again:</div><div class="line"><a name="l06369"></a><span class="lineno"> 6369</span>  <span class="keywordflow">if</span> (y == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0)) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l06370"></a><span class="lineno"> 6370</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a>(y)) {</div><div class="line"><a name="l06371"></a><span class="lineno"> 6371</span>  d = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a>(y);</div><div class="line"><a name="l06372"></a><span class="lineno"> 6372</span>  <span class="keywordflow">if</span> ((!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) && !<a class="code" href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a>(x)) && d != <a class="code" href="../../d3/d90/missing_8h.html#a8a34ea96a46e86d80f06052188b4433f">round</a>(d))</div><div class="line"><a name="l06373"></a><span class="lineno"> 6373</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../db/d2e/intern_8h.html#a87d49f14b185644cb2ffb174c2335b45">rb_complex_raw1</a>(x), <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"**"</span>), 1, y);</div><div class="line"><a name="l06374"></a><span class="lineno"> 6374</span>  }</div><div class="line"><a name="l06375"></a><span class="lineno"> 6375</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06376"></a><span class="lineno"> 6376</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(y);</div><div class="line"><a name="l06377"></a><span class="lineno"> 6377</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y))</div><div class="line"><a name="l06378"></a><span class="lineno"> 6378</span>  <span class="keywordflow">goto</span> again;</div><div class="line"><a name="l06379"></a><span class="lineno"> 6379</span>  <a class="code" href="../../db/dcc/error_8c.html#aa5b1972d475e9a090c8ef607ce033008">rb_warn</a>(<span class="stringliteral">"in a**b, b may be too big"</span>);</div><div class="line"><a name="l06380"></a><span class="lineno"> 6380</span>  d = <a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(y);</div><div class="line"><a name="l06381"></a><span class="lineno"> 6381</span>  }</div><div class="line"><a name="l06382"></a><span class="lineno"> 6382</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06383"></a><span class="lineno"> 6383</span>  yy = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l06384"></a><span class="lineno"> 6384</span> </div><div class="line"><a name="l06385"></a><span class="lineno"> 6385</span>  <span class="keywordflow">if</span> (yy < 0)</div><div class="line"><a name="l06386"></a><span class="lineno"> 6386</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../db/d2e/intern_8h.html#a66db3a21c6f7ef77c281924c9303c8bc">rb_rational_raw1</a>(x), <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"**"</span>), 1, y);</div><div class="line"><a name="l06387"></a><span class="lineno"> 6387</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06388"></a><span class="lineno"> 6388</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z = 0;</div><div class="line"><a name="l06389"></a><span class="lineno"> 6389</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a> mask;</div><div class="line"><a name="l06390"></a><span class="lineno"> 6390</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> xbits = <a class="code" href="../../d1/dcc/bignum_8c.html#a4d13f72afe245927b1eea45acde5c842">rb_absint_numwords</a>(x, 1, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l06391"></a><span class="lineno"> 6391</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> BIGLEN_LIMIT = 32*1024*1024;</div><div class="line"><a name="l06392"></a><span class="lineno"> 6392</span> </div><div class="line"><a name="l06393"></a><span class="lineno"> 6393</span>  <span class="keywordflow">if</span> (xbits == (<span class="keywordtype">size_t</span>)-1 ||</div><div class="line"><a name="l06394"></a><span class="lineno"> 6394</span>  (xbits > BIGLEN_LIMIT) ||</div><div class="line"><a name="l06395"></a><span class="lineno"> 6395</span>  (xbits * yy > BIGLEN_LIMIT)) {</div><div class="line"><a name="l06396"></a><span class="lineno"> 6396</span>  <a class="code" href="../../db/dcc/error_8c.html#aa5b1972d475e9a090c8ef607ce033008">rb_warn</a>(<span class="stringliteral">"in a**b, b may be too big"</span>);</div><div class="line"><a name="l06397"></a><span class="lineno"> 6397</span>  d = (double)yy;</div><div class="line"><a name="l06398"></a><span class="lineno"> 6398</span>  }</div><div class="line"><a name="l06399"></a><span class="lineno"> 6399</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06400"></a><span class="lineno"> 6400</span>  <span class="keywordflow">for</span> (mask = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab1040c5fdcb7a88dca4c25222bf43454">FIXNUM_MAX</a> + 1; mask; mask >>= 1) {</div><div class="line"><a name="l06401"></a><span class="lineno"> 6401</span>  <span class="keywordflow">if</span> (z) z = <a class="code" href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a>(z);</div><div class="line"><a name="l06402"></a><span class="lineno"> 6402</span>  <span class="keywordflow">if</span> (yy & mask) {</div><div class="line"><a name="l06403"></a><span class="lineno"> 6403</span>  z = z ? <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33">bigmul0</a>(z, x)) : x;</div><div class="line"><a name="l06404"></a><span class="lineno"> 6404</span>  }</div><div class="line"><a name="l06405"></a><span class="lineno"> 6405</span>  }</div><div class="line"><a name="l06406"></a><span class="lineno"> 6406</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06407"></a><span class="lineno"> 6407</span>  }</div><div class="line"><a name="l06408"></a><span class="lineno"> 6408</span>  }</div><div class="line"><a name="l06409"></a><span class="lineno"> 6409</span>  }</div><div class="line"><a name="l06410"></a><span class="lineno"> 6410</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06411"></a><span class="lineno"> 6411</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a>(x, y, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"**"</span>));</div><div class="line"><a name="l06412"></a><span class="lineno"> 6412</span>  }</div><div class="line"><a name="l06413"></a><span class="lineno"> 6413</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a>(pow(<a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(x), d));</div><div class="line"><a name="l06414"></a><span class="lineno"> 6414</span> }</div><div class="line"><a name="l06415"></a><span class="lineno"> 6415</span> </div><div class="line"><a name="l06416"></a><span class="lineno"> 6416</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06417"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af22aa67a2e7218e29f7f26ddcc0e8149"> 6417</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af22aa67a2e7218e29f7f26ddcc0e8149">bigand_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, <span class="keywordtype">long</span> y)</div><div class="line"><a name="l06418"></a><span class="lineno"> 6418</span> {</div><div class="line"><a name="l06419"></a><span class="lineno"> 6419</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06420"></a><span class="lineno"> 6420</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l06421"></a><span class="lineno"> 6421</span>  <span class="keywordtype">long</span> zn;</div><div class="line"><a name="l06422"></a><span class="lineno"> 6422</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l06423"></a><span class="lineno"> 6423</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsy;</div><div class="line"><a name="l06424"></a><span class="lineno"> 6424</span> </div><div class="line"><a name="l06425"></a><span class="lineno"> 6425</span>  <span class="keywordflow">if</span> (y == 0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l06426"></a><span class="lineno"> 6426</span>  <span class="keywordflow">if</span> (xn == 0) <span class="keywordflow">return</span> hibitsx ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a854de1c520ed24a625d5a29f36a08f7a">LONG2NUM</a>(y) : 0;</div><div class="line"><a name="l06427"></a><span class="lineno"> 6427</span>  hibitsy = 0 <= y ? 0 : <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l06428"></a><span class="lineno"> 6428</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06429"></a><span class="lineno"> 6429</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l06430"></a><span class="lineno"> 6430</span>  <span class="keywordflow">if</span> (!hibitsy) {</div><div class="line"><a name="l06431"></a><span class="lineno"> 6431</span>  y &= xds[0];</div><div class="line"><a name="l06432"></a><span class="lineno"> 6432</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a854de1c520ed24a625d5a29f36a08f7a">LONG2NUM</a>(y);</div><div class="line"><a name="l06433"></a><span class="lineno"> 6433</span>  }</div><div class="line"><a name="l06434"></a><span class="lineno"> 6434</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06435"></a><span class="lineno"> 6435</span> </div><div class="line"><a name="l06436"></a><span class="lineno"> 6436</span>  zn = xn;</div><div class="line"><a name="l06437"></a><span class="lineno"> 6437</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l06438"></a><span class="lineno"> 6438</span>  <span class="keywordflow">if</span> (hibitsx && zn < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG))</div><div class="line"><a name="l06439"></a><span class="lineno"> 6439</span>  zn = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG);</div><div class="line"><a name="l06440"></a><span class="lineno"> 6440</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06441"></a><span class="lineno"> 6441</span> </div><div class="line"><a name="l06442"></a><span class="lineno"> 6442</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 0);</div><div class="line"><a name="l06443"></a><span class="lineno"> 6443</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06444"></a><span class="lineno"> 6444</span> </div><div class="line"><a name="l06445"></a><span class="lineno"> 6445</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l06446"></a><span class="lineno"> 6446</span>  i = 1;</div><div class="line"><a name="l06447"></a><span class="lineno"> 6447</span>  zds[0] = xds[0] & <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06448"></a><span class="lineno"> 6448</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l06449"></a><span class="lineno"> 6449</span>  <span class="keywordflow">for</span> (i=0; i < xn; i++) {</div><div class="line"><a name="l06450"></a><span class="lineno"> 6450</span>  <span class="keywordflow">if</span> (y == 0 || y == -1) <span class="keywordflow">break</span>;</div><div class="line"><a name="l06451"></a><span class="lineno"> 6451</span>  zds[i] = xds[i] & <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06452"></a><span class="lineno"> 6452</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06453"></a><span class="lineno"> 6453</span>  }</div><div class="line"><a name="l06454"></a><span class="lineno"> 6454</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06455"></a><span class="lineno"> 6455</span>  <span class="keywordflow">if</span> (y == 0 || y == -1) <span class="keywordflow">break</span>;</div><div class="line"><a name="l06456"></a><span class="lineno"> 6456</span>  zds[i] = hibitsx & <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06457"></a><span class="lineno"> 6457</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06458"></a><span class="lineno"> 6458</span>  }</div><div class="line"><a name="l06459"></a><span class="lineno"> 6459</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06460"></a><span class="lineno"> 6460</span>  <span class="keywordflow">for</span> (;i < xn; i++) {</div><div class="line"><a name="l06461"></a><span class="lineno"> 6461</span>  zds[i] = xds[i] & hibitsy;</div><div class="line"><a name="l06462"></a><span class="lineno"> 6462</span>  }</div><div class="line"><a name="l06463"></a><span class="lineno"> 6463</span>  <span class="keywordflow">for</span> (;i < zn; i++) {</div><div class="line"><a name="l06464"></a><span class="lineno"> 6464</span>  zds[i] = hibitsx & hibitsy;</div><div class="line"><a name="l06465"></a><span class="lineno"> 6465</span>  }</div><div class="line"><a name="l06466"></a><span class="lineno"> 6466</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, hibitsx && hibitsy);</div><div class="line"><a name="l06467"></a><span class="lineno"> 6467</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06468"></a><span class="lineno"> 6468</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06469"></a><span class="lineno"> 6469</span> }</div><div class="line"><a name="l06470"></a><span class="lineno"> 6470</span> </div><div class="line"><a name="l06471"></a><span class="lineno"> 6471</span> <span class="comment">/*</span></div><div class="line"><a name="l06472"></a><span class="lineno"> 6472</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06473"></a><span class="lineno"> 6473</span> <span class="comment"> * big & numeric -> integer</span></div><div class="line"><a name="l06474"></a><span class="lineno"> 6474</span> <span class="comment"> *</span></div><div class="line"><a name="l06475"></a><span class="lineno"> 6475</span> <span class="comment"> * Performs bitwise +and+ between _big_ and _numeric_.</span></div><div class="line"><a name="l06476"></a><span class="lineno"> 6476</span> <span class="comment"> */</span></div><div class="line"><a name="l06477"></a><span class="lineno"> 6477</span> </div><div class="line"><a name="l06478"></a><span class="lineno"> 6478</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06479"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#acbfe8cba3470e65050ef876beff85fbd"> 6479</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a10c615980e731c17a233773ba502873c">rb_big_and</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06480"></a><span class="lineno"> 6480</span> {</div><div class="line"><a name="l06481"></a><span class="lineno"> 6481</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06482"></a><span class="lineno"> 6482</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds1, *ds2, *zds;</div><div class="line"><a name="l06483"></a><span class="lineno"> 6483</span>  <span class="keywordtype">long</span> i, xn, yn, n1, n2;</div><div class="line"><a name="l06484"></a><span class="lineno"> 6484</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, hibitsy;</div><div class="line"><a name="l06485"></a><span class="lineno"> 6485</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibits1, hibits2;</div><div class="line"><a name="l06486"></a><span class="lineno"> 6486</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpv;</div><div class="line"><a name="l06487"></a><span class="lineno"> 6487</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> tmph;</div><div class="line"><a name="l06488"></a><span class="lineno"> 6488</span>  <span class="keywordtype">long</span> tmpn;</div><div class="line"><a name="l06489"></a><span class="lineno"> 6489</span> </div><div class="line"><a name="l06490"></a><span class="lineno"> 6490</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y) && !<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06491"></a><span class="lineno"> 6491</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a98ac4e7ef00985b7e5a3deba1caea289">rb_num_coerce_bit</a>(x, y, <span class="charliteral">'&'</span>);</div><div class="line"><a name="l06492"></a><span class="lineno"> 6492</span>  }</div><div class="line"><a name="l06493"></a><span class="lineno"> 6493</span> </div><div class="line"><a name="l06494"></a><span class="lineno"> 6494</span>  hibitsx = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&x, &xn);</div><div class="line"><a name="l06495"></a><span class="lineno"> 6495</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06496"></a><span class="lineno"> 6496</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#af22aa67a2e7218e29f7f26ddcc0e8149">bigand_int</a>(x, xn, hibitsx, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06497"></a><span class="lineno"> 6497</span>  }</div><div class="line"><a name="l06498"></a><span class="lineno"> 6498</span>  hibitsy = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&y, &yn);</div><div class="line"><a name="l06499"></a><span class="lineno"> 6499</span>  <span class="keywordflow">if</span> (xn > yn) {</div><div class="line"><a name="l06500"></a><span class="lineno"> 6500</span>  tmpv = x; x = y; y = tmpv;</div><div class="line"><a name="l06501"></a><span class="lineno"> 6501</span>  tmpn = xn; xn = yn; yn = tmpn;</div><div class="line"><a name="l06502"></a><span class="lineno"> 6502</span>  tmph = hibitsx; hibitsx = hibitsy; hibitsy = tmph;</div><div class="line"><a name="l06503"></a><span class="lineno"> 6503</span>  }</div><div class="line"><a name="l06504"></a><span class="lineno"> 6504</span>  n1 = xn;</div><div class="line"><a name="l06505"></a><span class="lineno"> 6505</span>  n2 = yn;</div><div class="line"><a name="l06506"></a><span class="lineno"> 6506</span>  ds1 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06507"></a><span class="lineno"> 6507</span>  ds2 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l06508"></a><span class="lineno"> 6508</span>  hibits1 = hibitsx;</div><div class="line"><a name="l06509"></a><span class="lineno"> 6509</span>  hibits2 = hibitsy;</div><div class="line"><a name="l06510"></a><span class="lineno"> 6510</span> </div><div class="line"><a name="l06511"></a><span class="lineno"> 6511</span>  <span class="keywordflow">if</span> (!hibits1)</div><div class="line"><a name="l06512"></a><span class="lineno"> 6512</span>  n2 = n1;</div><div class="line"><a name="l06513"></a><span class="lineno"> 6513</span> </div><div class="line"><a name="l06514"></a><span class="lineno"> 6514</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(n2, 0);</div><div class="line"><a name="l06515"></a><span class="lineno"> 6515</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06516"></a><span class="lineno"> 6516</span> </div><div class="line"><a name="l06517"></a><span class="lineno"> 6517</span>  <span class="keywordflow">for</span> (i=0; i<n1; i++) {</div><div class="line"><a name="l06518"></a><span class="lineno"> 6518</span>  zds[i] = ds1[i] & ds2[i];</div><div class="line"><a name="l06519"></a><span class="lineno"> 6519</span>  }</div><div class="line"><a name="l06520"></a><span class="lineno"> 6520</span>  <span class="keywordflow">for</span> (; i<n2; i++) {</div><div class="line"><a name="l06521"></a><span class="lineno"> 6521</span>  zds[i] = hibits1 & ds2[i];</div><div class="line"><a name="l06522"></a><span class="lineno"> 6522</span>  }</div><div class="line"><a name="l06523"></a><span class="lineno"> 6523</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, hibits1 && hibits2);</div><div class="line"><a name="l06524"></a><span class="lineno"> 6524</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06525"></a><span class="lineno"> 6525</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l06526"></a><span class="lineno"> 6526</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06527"></a><span class="lineno"> 6527</span> }</div><div class="line"><a name="l06528"></a><span class="lineno"> 6528</span> </div><div class="line"><a name="l06529"></a><span class="lineno"> 6529</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06530"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a6ba61de4be3532c71c2541ac82454fdb"> 6530</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6ba61de4be3532c71c2541ac82454fdb">bigor_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, <span class="keywordtype">long</span> y)</div><div class="line"><a name="l06531"></a><span class="lineno"> 6531</span> {</div><div class="line"><a name="l06532"></a><span class="lineno"> 6532</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06533"></a><span class="lineno"> 6533</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l06534"></a><span class="lineno"> 6534</span>  <span class="keywordtype">long</span> zn;</div><div class="line"><a name="l06535"></a><span class="lineno"> 6535</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l06536"></a><span class="lineno"> 6536</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsy;</div><div class="line"><a name="l06537"></a><span class="lineno"> 6537</span> </div><div class="line"><a name="l06538"></a><span class="lineno"> 6538</span>  <span class="keywordflow">if</span> (y == -1) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1);</div><div class="line"><a name="l06539"></a><span class="lineno"> 6539</span>  <span class="keywordflow">if</span> (xn == 0) <span class="keywordflow">return</span> hibitsx ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(-1) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(y);</div><div class="line"><a name="l06540"></a><span class="lineno"> 6540</span>  hibitsy = 0 <= y ? 0 : <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l06541"></a><span class="lineno"> 6541</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06542"></a><span class="lineno"> 6542</span> </div><div class="line"><a name="l06543"></a><span class="lineno"> 6543</span>  zn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l06544"></a><span class="lineno"> 6544</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l06545"></a><span class="lineno"> 6545</span>  <span class="keywordflow">if</span> (zn < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG))</div><div class="line"><a name="l06546"></a><span class="lineno"> 6546</span>  zn = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG);</div><div class="line"><a name="l06547"></a><span class="lineno"> 6547</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06548"></a><span class="lineno"> 6548</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 0);</div><div class="line"><a name="l06549"></a><span class="lineno"> 6549</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06550"></a><span class="lineno"> 6550</span> </div><div class="line"><a name="l06551"></a><span class="lineno"> 6551</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l06552"></a><span class="lineno"> 6552</span>  i = 1;</div><div class="line"><a name="l06553"></a><span class="lineno"> 6553</span>  zds[0] = xds[0] | <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06554"></a><span class="lineno"> 6554</span>  <span class="keywordflow">if</span> (i < zn)</div><div class="line"><a name="l06555"></a><span class="lineno"> 6555</span>  <span class="keywordflow">goto</span> y_is_fixed_point;</div><div class="line"><a name="l06556"></a><span class="lineno"> 6556</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l06557"></a><span class="lineno"> 6557</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l06558"></a><span class="lineno"> 6558</span>  <span class="keywordflow">for</span> (i=0; i < xn; i++) {</div><div class="line"><a name="l06559"></a><span class="lineno"> 6559</span>  <span class="keywordflow">if</span> (y == 0 || y == -1) <span class="keywordflow">goto</span> y_is_fixed_point;</div><div class="line"><a name="l06560"></a><span class="lineno"> 6560</span>  zds[i] = xds[i] | <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06561"></a><span class="lineno"> 6561</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06562"></a><span class="lineno"> 6562</span>  }</div><div class="line"><a name="l06563"></a><span class="lineno"> 6563</span>  <span class="keywordflow">if</span> (hibitsx)</div><div class="line"><a name="l06564"></a><span class="lineno"> 6564</span>  <span class="keywordflow">goto</span> fill_hibits;</div><div class="line"><a name="l06565"></a><span class="lineno"> 6565</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06566"></a><span class="lineno"> 6566</span>  <span class="keywordflow">if</span> (y == 0 || y == -1) <span class="keywordflow">goto</span> y_is_fixed_point;</div><div class="line"><a name="l06567"></a><span class="lineno"> 6567</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06568"></a><span class="lineno"> 6568</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06569"></a><span class="lineno"> 6569</span>  }</div><div class="line"><a name="l06570"></a><span class="lineno"> 6570</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l06571"></a><span class="lineno"> 6571</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06572"></a><span class="lineno"> 6572</span> </div><div class="line"><a name="l06573"></a><span class="lineno"> 6573</span>  y_is_fixed_point:</div><div class="line"><a name="l06574"></a><span class="lineno"> 6574</span>  <span class="keywordflow">if</span> (hibitsy)</div><div class="line"><a name="l06575"></a><span class="lineno"> 6575</span>  <span class="keywordflow">goto</span> fill_hibits;</div><div class="line"><a name="l06576"></a><span class="lineno"> 6576</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l06577"></a><span class="lineno"> 6577</span>  zds[i] = xds[i];</div><div class="line"><a name="l06578"></a><span class="lineno"> 6578</span>  }</div><div class="line"><a name="l06579"></a><span class="lineno"> 6579</span>  <span class="keywordflow">if</span> (hibitsx)</div><div class="line"><a name="l06580"></a><span class="lineno"> 6580</span>  <span class="keywordflow">goto</span> fill_hibits;</div><div class="line"><a name="l06581"></a><span class="lineno"> 6581</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06582"></a><span class="lineno"> 6582</span>  zds[i] = 0;</div><div class="line"><a name="l06583"></a><span class="lineno"> 6583</span>  }</div><div class="line"><a name="l06584"></a><span class="lineno"> 6584</span>  <span class="keywordflow">goto</span> finish;</div><div class="line"><a name="l06585"></a><span class="lineno"> 6585</span> </div><div class="line"><a name="l06586"></a><span class="lineno"> 6586</span>  fill_hibits:</div><div class="line"><a name="l06587"></a><span class="lineno"> 6587</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06588"></a><span class="lineno"> 6588</span>  zds[i] = <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l06589"></a><span class="lineno"> 6589</span>  }</div><div class="line"><a name="l06590"></a><span class="lineno"> 6590</span> </div><div class="line"><a name="l06591"></a><span class="lineno"> 6591</span>  finish:</div><div class="line"><a name="l06592"></a><span class="lineno"> 6592</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, hibitsx || hibitsy);</div><div class="line"><a name="l06593"></a><span class="lineno"> 6593</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06594"></a><span class="lineno"> 6594</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06595"></a><span class="lineno"> 6595</span> }</div><div class="line"><a name="l06596"></a><span class="lineno"> 6596</span> </div><div class="line"><a name="l06597"></a><span class="lineno"> 6597</span> <span class="comment">/*</span></div><div class="line"><a name="l06598"></a><span class="lineno"> 6598</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06599"></a><span class="lineno"> 6599</span> <span class="comment"> * big | numeric -> integer</span></div><div class="line"><a name="l06600"></a><span class="lineno"> 6600</span> <span class="comment"> *</span></div><div class="line"><a name="l06601"></a><span class="lineno"> 6601</span> <span class="comment"> * Performs bitwise +or+ between _big_ and _numeric_.</span></div><div class="line"><a name="l06602"></a><span class="lineno"> 6602</span> <span class="comment"> */</span></div><div class="line"><a name="l06603"></a><span class="lineno"> 6603</span> </div><div class="line"><a name="l06604"></a><span class="lineno"> 6604</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06605"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#ac109fc3b3351c1d6649c50f413536f99"> 6605</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a11145f11c8614650e43ae9616c1caea9">rb_big_or</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06606"></a><span class="lineno"> 6606</span> {</div><div class="line"><a name="l06607"></a><span class="lineno"> 6607</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06608"></a><span class="lineno"> 6608</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds1, *ds2, *zds;</div><div class="line"><a name="l06609"></a><span class="lineno"> 6609</span>  <span class="keywordtype">long</span> i, xn, yn, n1, n2;</div><div class="line"><a name="l06610"></a><span class="lineno"> 6610</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, hibitsy;</div><div class="line"><a name="l06611"></a><span class="lineno"> 6611</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibits1, hibits2;</div><div class="line"><a name="l06612"></a><span class="lineno"> 6612</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpv;</div><div class="line"><a name="l06613"></a><span class="lineno"> 6613</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> tmph;</div><div class="line"><a name="l06614"></a><span class="lineno"> 6614</span>  <span class="keywordtype">long</span> tmpn;</div><div class="line"><a name="l06615"></a><span class="lineno"> 6615</span> </div><div class="line"><a name="l06616"></a><span class="lineno"> 6616</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y) && !<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06617"></a><span class="lineno"> 6617</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a98ac4e7ef00985b7e5a3deba1caea289">rb_num_coerce_bit</a>(x, y, <span class="charliteral">'|'</span>);</div><div class="line"><a name="l06618"></a><span class="lineno"> 6618</span>  }</div><div class="line"><a name="l06619"></a><span class="lineno"> 6619</span> </div><div class="line"><a name="l06620"></a><span class="lineno"> 6620</span>  hibitsx = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&x, &xn);</div><div class="line"><a name="l06621"></a><span class="lineno"> 6621</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06622"></a><span class="lineno"> 6622</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a6ba61de4be3532c71c2541ac82454fdb">bigor_int</a>(x, xn, hibitsx, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06623"></a><span class="lineno"> 6623</span>  }</div><div class="line"><a name="l06624"></a><span class="lineno"> 6624</span>  hibitsy = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&y, &yn);</div><div class="line"><a name="l06625"></a><span class="lineno"> 6625</span>  <span class="keywordflow">if</span> (xn > yn) {</div><div class="line"><a name="l06626"></a><span class="lineno"> 6626</span>  tmpv = x; x = y; y = tmpv;</div><div class="line"><a name="l06627"></a><span class="lineno"> 6627</span>  tmpn = xn; xn = yn; yn = tmpn;</div><div class="line"><a name="l06628"></a><span class="lineno"> 6628</span>  tmph = hibitsx; hibitsx = hibitsy; hibitsy = tmph;</div><div class="line"><a name="l06629"></a><span class="lineno"> 6629</span>  }</div><div class="line"><a name="l06630"></a><span class="lineno"> 6630</span>  n1 = xn;</div><div class="line"><a name="l06631"></a><span class="lineno"> 6631</span>  n2 = yn;</div><div class="line"><a name="l06632"></a><span class="lineno"> 6632</span>  ds1 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06633"></a><span class="lineno"> 6633</span>  ds2 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l06634"></a><span class="lineno"> 6634</span>  hibits1 = hibitsx;</div><div class="line"><a name="l06635"></a><span class="lineno"> 6635</span>  hibits2 = hibitsy;</div><div class="line"><a name="l06636"></a><span class="lineno"> 6636</span> </div><div class="line"><a name="l06637"></a><span class="lineno"> 6637</span>  <span class="keywordflow">if</span> (hibits1)</div><div class="line"><a name="l06638"></a><span class="lineno"> 6638</span>  n2 = n1;</div><div class="line"><a name="l06639"></a><span class="lineno"> 6639</span> </div><div class="line"><a name="l06640"></a><span class="lineno"> 6640</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(n2, 0);</div><div class="line"><a name="l06641"></a><span class="lineno"> 6641</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06642"></a><span class="lineno"> 6642</span> </div><div class="line"><a name="l06643"></a><span class="lineno"> 6643</span>  <span class="keywordflow">for</span> (i=0; i<n1; i++) {</div><div class="line"><a name="l06644"></a><span class="lineno"> 6644</span>  zds[i] = ds1[i] | ds2[i];</div><div class="line"><a name="l06645"></a><span class="lineno"> 6645</span>  }</div><div class="line"><a name="l06646"></a><span class="lineno"> 6646</span>  <span class="keywordflow">for</span> (; i<n2; i++) {</div><div class="line"><a name="l06647"></a><span class="lineno"> 6647</span>  zds[i] = hibits1 | ds2[i];</div><div class="line"><a name="l06648"></a><span class="lineno"> 6648</span>  }</div><div class="line"><a name="l06649"></a><span class="lineno"> 6649</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, hibits1 || hibits2);</div><div class="line"><a name="l06650"></a><span class="lineno"> 6650</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06651"></a><span class="lineno"> 6651</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l06652"></a><span class="lineno"> 6652</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06653"></a><span class="lineno"> 6653</span> }</div><div class="line"><a name="l06654"></a><span class="lineno"> 6654</span> </div><div class="line"><a name="l06655"></a><span class="lineno"> 6655</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06656"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ad1cd32de7999610d81220c14cda394d1"> 6656</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1cd32de7999610d81220c14cda394d1">bigxor_int</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <span class="keywordtype">long</span> xn, <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, <span class="keywordtype">long</span> y)</div><div class="line"><a name="l06657"></a><span class="lineno"> 6657</span> {</div><div class="line"><a name="l06658"></a><span class="lineno"> 6658</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06659"></a><span class="lineno"> 6659</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds, *zds;</div><div class="line"><a name="l06660"></a><span class="lineno"> 6660</span>  <span class="keywordtype">long</span> zn;</div><div class="line"><a name="l06661"></a><span class="lineno"> 6661</span>  <span class="keywordtype">long</span> i;</div><div class="line"><a name="l06662"></a><span class="lineno"> 6662</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsy;</div><div class="line"><a name="l06663"></a><span class="lineno"> 6663</span> </div><div class="line"><a name="l06664"></a><span class="lineno"> 6664</span>  hibitsy = 0 <= y ? 0 : <a class="code" href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a>;</div><div class="line"><a name="l06665"></a><span class="lineno"> 6665</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06666"></a><span class="lineno"> 6666</span>  zn = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x);</div><div class="line"><a name="l06667"></a><span class="lineno"> 6667</span> <span class="preprocessor">#if SIZEOF_BDIGITS < SIZEOF_LONG</span></div><div class="line"><a name="l06668"></a><span class="lineno"> 6668</span>  <span class="keywordflow">if</span> (zn < <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG))</div><div class="line"><a name="l06669"></a><span class="lineno"> 6669</span>  zn = <a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(SIZEOF_LONG);</div><div class="line"><a name="l06670"></a><span class="lineno"> 6670</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06671"></a><span class="lineno"> 6671</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(zn, 0);</div><div class="line"><a name="l06672"></a><span class="lineno"> 6672</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06673"></a><span class="lineno"> 6673</span> </div><div class="line"><a name="l06674"></a><span class="lineno"> 6674</span> <span class="preprocessor">#if SIZEOF_BDIGITS >= SIZEOF_LONG</span></div><div class="line"><a name="l06675"></a><span class="lineno"> 6675</span>  i = 1;</div><div class="line"><a name="l06676"></a><span class="lineno"> 6676</span>  zds[0] = xds[0] ^ <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06677"></a><span class="lineno"> 6677</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l06678"></a><span class="lineno"> 6678</span>  <span class="keywordflow">for</span> (i = 0; i < xn; i++) {</div><div class="line"><a name="l06679"></a><span class="lineno"> 6679</span>  zds[i] = xds[i] ^ <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06680"></a><span class="lineno"> 6680</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06681"></a><span class="lineno"> 6681</span>  }</div><div class="line"><a name="l06682"></a><span class="lineno"> 6682</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06683"></a><span class="lineno"> 6683</span>  zds[i] = hibitsx ^ <a class="code" href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a>(y);</div><div class="line"><a name="l06684"></a><span class="lineno"> 6684</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a>(y);</div><div class="line"><a name="l06685"></a><span class="lineno"> 6685</span>  }</div><div class="line"><a name="l06686"></a><span class="lineno"> 6686</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l06687"></a><span class="lineno"> 6687</span>  <span class="keywordflow">for</span> (; i < xn; i++) {</div><div class="line"><a name="l06688"></a><span class="lineno"> 6688</span>  zds[i] = xds[i] ^ hibitsy;</div><div class="line"><a name="l06689"></a><span class="lineno"> 6689</span>  }</div><div class="line"><a name="l06690"></a><span class="lineno"> 6690</span>  <span class="keywordflow">for</span> (; i < zn; i++) {</div><div class="line"><a name="l06691"></a><span class="lineno"> 6691</span>  zds[i] = hibitsx ^ hibitsy;</div><div class="line"><a name="l06692"></a><span class="lineno"> 6692</span>  }</div><div class="line"><a name="l06693"></a><span class="lineno"> 6693</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, (hibitsx ^ hibitsy) != 0);</div><div class="line"><a name="l06694"></a><span class="lineno"> 6694</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06695"></a><span class="lineno"> 6695</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06696"></a><span class="lineno"> 6696</span> }</div><div class="line"><a name="l06697"></a><span class="lineno"> 6697</span> <span class="comment">/*</span></div><div class="line"><a name="l06698"></a><span class="lineno"> 6698</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06699"></a><span class="lineno"> 6699</span> <span class="comment"> * big ^ numeric -> integer</span></div><div class="line"><a name="l06700"></a><span class="lineno"> 6700</span> <span class="comment"> *</span></div><div class="line"><a name="l06701"></a><span class="lineno"> 6701</span> <span class="comment"> * Performs bitwise +exclusive or+ between _big_ and _numeric_.</span></div><div class="line"><a name="l06702"></a><span class="lineno"> 6702</span> <span class="comment"> */</span></div><div class="line"><a name="l06703"></a><span class="lineno"> 6703</span> </div><div class="line"><a name="l06704"></a><span class="lineno"> 6704</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06705"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a3c7acf29aea7adb76b47ec30da432ead"> 6705</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac2b52d6f3f5895bc7bde9e667e26fff5">rb_big_xor</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06706"></a><span class="lineno"> 6706</span> {</div><div class="line"><a name="l06707"></a><span class="lineno"> 6707</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> z;</div><div class="line"><a name="l06708"></a><span class="lineno"> 6708</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *ds1, *ds2, *zds;</div><div class="line"><a name="l06709"></a><span class="lineno"> 6709</span>  <span class="keywordtype">long</span> i, xn, yn, n1, n2;</div><div class="line"><a name="l06710"></a><span class="lineno"> 6710</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibitsx, hibitsy;</div><div class="line"><a name="l06711"></a><span class="lineno"> 6711</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> hibits1, hibits2;</div><div class="line"><a name="l06712"></a><span class="lineno"> 6712</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmpv;</div><div class="line"><a name="l06713"></a><span class="lineno"> 6713</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> tmph;</div><div class="line"><a name="l06714"></a><span class="lineno"> 6714</span>  <span class="keywordtype">long</span> tmpn;</div><div class="line"><a name="l06715"></a><span class="lineno"> 6715</span> </div><div class="line"><a name="l06716"></a><span class="lineno"> 6716</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y) && !<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06717"></a><span class="lineno"> 6717</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a98ac4e7ef00985b7e5a3deba1caea289">rb_num_coerce_bit</a>(x, y, <span class="charliteral">'^'</span>);</div><div class="line"><a name="l06718"></a><span class="lineno"> 6718</span>  }</div><div class="line"><a name="l06719"></a><span class="lineno"> 6719</span> </div><div class="line"><a name="l06720"></a><span class="lineno"> 6720</span>  hibitsx = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&x, &xn);</div><div class="line"><a name="l06721"></a><span class="lineno"> 6721</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06722"></a><span class="lineno"> 6722</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad1cd32de7999610d81220c14cda394d1">bigxor_int</a>(x, xn, hibitsx, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06723"></a><span class="lineno"> 6723</span>  }</div><div class="line"><a name="l06724"></a><span class="lineno"> 6724</span>  hibitsy = <a class="code" href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a>(&y, &yn);</div><div class="line"><a name="l06725"></a><span class="lineno"> 6725</span>  <span class="keywordflow">if</span> (xn > yn) {</div><div class="line"><a name="l06726"></a><span class="lineno"> 6726</span>  tmpv = x; x = y; y = tmpv;</div><div class="line"><a name="l06727"></a><span class="lineno"> 6727</span>  tmpn = xn; xn = yn; yn = tmpn;</div><div class="line"><a name="l06728"></a><span class="lineno"> 6728</span>  tmph = hibitsx; hibitsx = hibitsy; hibitsy = tmph;</div><div class="line"><a name="l06729"></a><span class="lineno"> 6729</span>  }</div><div class="line"><a name="l06730"></a><span class="lineno"> 6730</span>  n1 = xn;</div><div class="line"><a name="l06731"></a><span class="lineno"> 6731</span>  n2 = yn;</div><div class="line"><a name="l06732"></a><span class="lineno"> 6732</span>  ds1 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06733"></a><span class="lineno"> 6733</span>  ds2 = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(y);</div><div class="line"><a name="l06734"></a><span class="lineno"> 6734</span>  hibits1 = hibitsx;</div><div class="line"><a name="l06735"></a><span class="lineno"> 6735</span>  hibits2 = hibitsy;</div><div class="line"><a name="l06736"></a><span class="lineno"> 6736</span> </div><div class="line"><a name="l06737"></a><span class="lineno"> 6737</span>  z = <a class="code" href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a>(n2, 0);</div><div class="line"><a name="l06738"></a><span class="lineno"> 6738</span>  zds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(z);</div><div class="line"><a name="l06739"></a><span class="lineno"> 6739</span> </div><div class="line"><a name="l06740"></a><span class="lineno"> 6740</span>  <span class="keywordflow">for</span> (i=0; i<n1; i++) {</div><div class="line"><a name="l06741"></a><span class="lineno"> 6741</span>  zds[i] = ds1[i] ^ ds2[i];</div><div class="line"><a name="l06742"></a><span class="lineno"> 6742</span>  }</div><div class="line"><a name="l06743"></a><span class="lineno"> 6743</span>  <span class="keywordflow">for</span> (; i<n2; i++) {</div><div class="line"><a name="l06744"></a><span class="lineno"> 6744</span>  zds[i] = hibitsx ^ ds2[i];</div><div class="line"><a name="l06745"></a><span class="lineno"> 6745</span>  }</div><div class="line"><a name="l06746"></a><span class="lineno"> 6746</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a>(z, (hibits1 ^ hibits2) != 0);</div><div class="line"><a name="l06747"></a><span class="lineno"> 6747</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(x);</div><div class="line"><a name="l06748"></a><span class="lineno"> 6748</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a>(y);</div><div class="line"><a name="l06749"></a><span class="lineno"> 6749</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(z);</div><div class="line"><a name="l06750"></a><span class="lineno"> 6750</span> }</div><div class="line"><a name="l06751"></a><span class="lineno"> 6751</span> </div><div class="line"><a name="l06752"></a><span class="lineno"> 6752</span> <span class="comment">/*</span></div><div class="line"><a name="l06753"></a><span class="lineno"> 6753</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06754"></a><span class="lineno"> 6754</span> <span class="comment"> * big << numeric -> integer</span></div><div class="line"><a name="l06755"></a><span class="lineno"> 6755</span> <span class="comment"> *</span></div><div class="line"><a name="l06756"></a><span class="lineno"> 6756</span> <span class="comment"> * Shifts big left _numeric_ positions (right if _numeric_ is negative).</span></div><div class="line"><a name="l06757"></a><span class="lineno"> 6757</span> <span class="comment"> */</span></div><div class="line"><a name="l06758"></a><span class="lineno"> 6758</span> </div><div class="line"><a name="l06759"></a><span class="lineno"> 6759</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06760"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a3ed5d1cc739880cb28d8934bb30007e8"> 6760</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a0b74a40818aae2dd69157223fc1b069e">rb_big_lshift</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06761"></a><span class="lineno"> 6761</span> {</div><div class="line"><a name="l06762"></a><span class="lineno"> 6762</span>  <span class="keywordtype">int</span> lshift_p;</div><div class="line"><a name="l06763"></a><span class="lineno"> 6763</span>  <span class="keywordtype">size_t</span> shift_numdigits;</div><div class="line"><a name="l06764"></a><span class="lineno"> 6764</span>  <span class="keywordtype">int</span> shift_numbits;</div><div class="line"><a name="l06765"></a><span class="lineno"> 6765</span> </div><div class="line"><a name="l06766"></a><span class="lineno"> 6766</span>  <span class="keywordflow">for</span> (;;) {</div><div class="line"><a name="l06767"></a><span class="lineno"> 6767</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06768"></a><span class="lineno"> 6768</span>  <span class="keywordtype">long</span> l = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l06769"></a><span class="lineno"> 6769</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l06770"></a><span class="lineno"> 6770</span>  <span class="keywordflow">if</span> (0 <= l) {</div><div class="line"><a name="l06771"></a><span class="lineno"> 6771</span>  lshift_p = 1;</div><div class="line"><a name="l06772"></a><span class="lineno"> 6772</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = l;</div><div class="line"><a name="l06773"></a><span class="lineno"> 6773</span>  }</div><div class="line"><a name="l06774"></a><span class="lineno"> 6774</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06775"></a><span class="lineno"> 6775</span>  lshift_p = 0;</div><div class="line"><a name="l06776"></a><span class="lineno"> 6776</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = 1+(<span class="keywordtype">unsigned</span> long)(-(l+1));</div><div class="line"><a name="l06777"></a><span class="lineno"> 6777</span>  }</div><div class="line"><a name="l06778"></a><span class="lineno"> 6778</span>  shift_numbits = (int)(<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> & (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1));</div><div class="line"><a name="l06779"></a><span class="lineno"> 6779</span>  shift_numdigits = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> >> <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1);</div><div class="line"><a name="l06780"></a><span class="lineno"> 6780</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(x, lshift_p, shift_numdigits, shift_numbits));</div><div class="line"><a name="l06781"></a><span class="lineno"> 6781</span>  }</div><div class="line"><a name="l06782"></a><span class="lineno"> 6782</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06783"></a><span class="lineno"> 6783</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a082701a945ac77f49359d56d745fde21">big_shift2</a>(x, 1, y));</div><div class="line"><a name="l06784"></a><span class="lineno"> 6784</span>  }</div><div class="line"><a name="l06785"></a><span class="lineno"> 6785</span>  y = <a class="code" href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a>(y);</div><div class="line"><a name="l06786"></a><span class="lineno"> 6786</span>  }</div><div class="line"><a name="l06787"></a><span class="lineno"> 6787</span> }</div><div class="line"><a name="l06788"></a><span class="lineno"> 6788</span> </div><div class="line"><a name="l06789"></a><span class="lineno"> 6789</span> </div><div class="line"><a name="l06790"></a><span class="lineno"> 6790</span> <span class="comment">/*</span></div><div class="line"><a name="l06791"></a><span class="lineno"> 6791</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06792"></a><span class="lineno"> 6792</span> <span class="comment"> * big >> numeric -> integer</span></div><div class="line"><a name="l06793"></a><span class="lineno"> 6793</span> <span class="comment"> *</span></div><div class="line"><a name="l06794"></a><span class="lineno"> 6794</span> <span class="comment"> * Shifts big right _numeric_ positions (left if _numeric_ is negative).</span></div><div class="line"><a name="l06795"></a><span class="lineno"> 6795</span> <span class="comment"> */</span></div><div class="line"><a name="l06796"></a><span class="lineno"> 6796</span> </div><div class="line"><a name="l06797"></a><span class="lineno"> 6797</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06798"></a><span class="lineno"><a class="line" href="../../db/d2e/intern_8h.html#a44c11dd228870c83f875633e0b6fa9ef"> 6798</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ad606505b6b476ddff0addf17454da732">rb_big_rshift</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06799"></a><span class="lineno"> 6799</span> {</div><div class="line"><a name="l06800"></a><span class="lineno"> 6800</span>  <span class="keywordtype">int</span> lshift_p;</div><div class="line"><a name="l06801"></a><span class="lineno"> 6801</span>  <span class="keywordtype">size_t</span> shift_numdigits;</div><div class="line"><a name="l06802"></a><span class="lineno"> 6802</span>  <span class="keywordtype">int</span> shift_numbits;</div><div class="line"><a name="l06803"></a><span class="lineno"> 6803</span> </div><div class="line"><a name="l06804"></a><span class="lineno"> 6804</span>  <span class="keywordflow">for</span> (;;) {</div><div class="line"><a name="l06805"></a><span class="lineno"> 6805</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06806"></a><span class="lineno"> 6806</span>  <span class="keywordtype">long</span> l = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y);</div><div class="line"><a name="l06807"></a><span class="lineno"> 6807</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l06808"></a><span class="lineno"> 6808</span>  <span class="keywordflow">if</span> (0 <= l) {</div><div class="line"><a name="l06809"></a><span class="lineno"> 6809</span>  lshift_p = 0;</div><div class="line"><a name="l06810"></a><span class="lineno"> 6810</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = l;</div><div class="line"><a name="l06811"></a><span class="lineno"> 6811</span>  }</div><div class="line"><a name="l06812"></a><span class="lineno"> 6812</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06813"></a><span class="lineno"> 6813</span>  lshift_p = 1;</div><div class="line"><a name="l06814"></a><span class="lineno"> 6814</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = 1+(<span class="keywordtype">unsigned</span> long)(-(l+1));</div><div class="line"><a name="l06815"></a><span class="lineno"> 6815</span>  }</div><div class="line"><a name="l06816"></a><span class="lineno"> 6816</span>  shift_numbits = (int)(<a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> & (<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1));</div><div class="line"><a name="l06817"></a><span class="lineno"> 6817</span>  shift_numdigits = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> >> <a class="code" href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>-1);</div><div class="line"><a name="l06818"></a><span class="lineno"> 6818</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a>(x, lshift_p, shift_numdigits, shift_numbits));</div><div class="line"><a name="l06819"></a><span class="lineno"> 6819</span>  }</div><div class="line"><a name="l06820"></a><span class="lineno"> 6820</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06821"></a><span class="lineno"> 6821</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a082701a945ac77f49359d56d745fde21">big_shift2</a>(x, 0, y));</div><div class="line"><a name="l06822"></a><span class="lineno"> 6822</span>  }</div><div class="line"><a name="l06823"></a><span class="lineno"> 6823</span>  y = <a class="code" href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a>(y);</div><div class="line"><a name="l06824"></a><span class="lineno"> 6824</span>  }</div><div class="line"><a name="l06825"></a><span class="lineno"> 6825</span> }</div><div class="line"><a name="l06826"></a><span class="lineno"> 6826</span> </div><div class="line"><a name="l06827"></a><span class="lineno"> 6827</span> <span class="comment">/*</span></div><div class="line"><a name="l06828"></a><span class="lineno"> 6828</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06829"></a><span class="lineno"> 6829</span> <span class="comment"> * big[n] -> 0, 1</span></div><div class="line"><a name="l06830"></a><span class="lineno"> 6830</span> <span class="comment"> *</span></div><div class="line"><a name="l06831"></a><span class="lineno"> 6831</span> <span class="comment"> * Bit Reference---Returns the <em>n</em>th bit in the (assumed) binary</span></div><div class="line"><a name="l06832"></a><span class="lineno"> 6832</span> <span class="comment"> * representation of <i>big</i>, where <i>big</i>[0] is the least</span></div><div class="line"><a name="l06833"></a><span class="lineno"> 6833</span> <span class="comment"> * significant bit.</span></div><div class="line"><a name="l06834"></a><span class="lineno"> 6834</span> <span class="comment"> *</span></div><div class="line"><a name="l06835"></a><span class="lineno"> 6835</span> <span class="comment"> * a = 9**15</span></div><div class="line"><a name="l06836"></a><span class="lineno"> 6836</span> <span class="comment"> * 50.downto(0) do |n|</span></div><div class="line"><a name="l06837"></a><span class="lineno"> 6837</span> <span class="comment"> * print a[n]</span></div><div class="line"><a name="l06838"></a><span class="lineno"> 6838</span> <span class="comment"> * end</span></div><div class="line"><a name="l06839"></a><span class="lineno"> 6839</span> <span class="comment"> *</span></div><div class="line"><a name="l06840"></a><span class="lineno"> 6840</span> <span class="comment"> * <em>produces:</em></span></div><div class="line"><a name="l06841"></a><span class="lineno"> 6841</span> <span class="comment"> *</span></div><div class="line"><a name="l06842"></a><span class="lineno"> 6842</span> <span class="comment"> * 000101110110100000111000011110010100111100010111001</span></div><div class="line"><a name="l06843"></a><span class="lineno"> 6843</span> <span class="comment"> *</span></div><div class="line"><a name="l06844"></a><span class="lineno"> 6844</span> <span class="comment"> */</span></div><div class="line"><a name="l06845"></a><span class="lineno"> 6845</span> </div><div class="line"><a name="l06846"></a><span class="lineno"> 6846</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06847"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a7cb3b23ce9950ee59046650d5c5971bc"> 6847</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a7cb3b23ce9950ee59046650d5c5971bc">rb_big_aref</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06848"></a><span class="lineno"> 6848</span> {</div><div class="line"><a name="l06849"></a><span class="lineno"> 6849</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> *xds;</div><div class="line"><a name="l06850"></a><span class="lineno"> 6850</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>;</div><div class="line"><a name="l06851"></a><span class="lineno"> 6851</span>  <span class="keywordtype">long</span> i, s1, s2;</div><div class="line"><a name="l06852"></a><span class="lineno"> 6852</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> bit;</div><div class="line"><a name="l06853"></a><span class="lineno"> 6853</span> </div><div class="line"><a name="l06854"></a><span class="lineno"> 6854</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06855"></a><span class="lineno"> 6855</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(y))</div><div class="line"><a name="l06856"></a><span class="lineno"> 6856</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l06857"></a><span class="lineno"> 6857</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a>(y);</div><div class="line"><a name="l06858"></a><span class="lineno"> 6858</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d">BIGSIZE</a>(y) > <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>)) {</div><div class="line"><a name="l06859"></a><span class="lineno"> 6859</span>  out_of_range:</div><div class="line"><a name="l06860"></a><span class="lineno"> 6860</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l06861"></a><span class="lineno"> 6861</span>  }</div><div class="line"><a name="l06862"></a><span class="lineno"> 6862</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = <a class="code" href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173">big2ulong</a>(y, <span class="stringliteral">"long"</span>);</div><div class="line"><a name="l06863"></a><span class="lineno"> 6863</span>  }</div><div class="line"><a name="l06864"></a><span class="lineno"> 6864</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06865"></a><span class="lineno"> 6865</span>  i = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aebbec3f6980955bf51d9962ef99a5c13">NUM2LONG</a>(y);</div><div class="line"><a name="l06866"></a><span class="lineno"> 6866</span>  <span class="keywordflow">if</span> (i < 0) <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l06867"></a><span class="lineno"> 6867</span>  <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a> = i;</div><div class="line"><a name="l06868"></a><span class="lineno"> 6868</span>  }</div><div class="line"><a name="l06869"></a><span class="lineno"> 6869</span>  s1 = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>/<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l06870"></a><span class="lineno"> 6870</span>  s2 = <a class="code" href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a>%<a class="code" href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a>;</div><div class="line"><a name="l06871"></a><span class="lineno"> 6871</span>  bit = (<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)1 << s2;</div><div class="line"><a name="l06872"></a><span class="lineno"> 6872</span> </div><div class="line"><a name="l06873"></a><span class="lineno"> 6873</span>  <span class="keywordflow">if</span> (s1 >= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)) <span class="keywordflow">goto</span> out_of_range;</div><div class="line"><a name="l06874"></a><span class="lineno"> 6874</span> </div><div class="line"><a name="l06875"></a><span class="lineno"> 6875</span>  xds = <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x);</div><div class="line"><a name="l06876"></a><span class="lineno"> 6876</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a>(x))</div><div class="line"><a name="l06877"></a><span class="lineno"> 6877</span>  <span class="keywordflow">return</span> (xds[s1] & bit) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l06878"></a><span class="lineno"> 6878</span>  <span class="keywordflow">if</span> (xds[s1] & (bit-1))</div><div class="line"><a name="l06879"></a><span class="lineno"> 6879</span>  <span class="keywordflow">return</span> (xds[s1] & bit) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l06880"></a><span class="lineno"> 6880</span>  <span class="keywordflow">for</span> (i = 0; i < s1; i++)</div><div class="line"><a name="l06881"></a><span class="lineno"> 6881</span>  <span class="keywordflow">if</span> (xds[i])</div><div class="line"><a name="l06882"></a><span class="lineno"> 6882</span>  <span class="keywordflow">return</span> (xds[s1] & bit) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1);</div><div class="line"><a name="l06883"></a><span class="lineno"> 6883</span>  <span class="keywordflow">return</span> (xds[s1] & bit) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(1) : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(0);</div><div class="line"><a name="l06884"></a><span class="lineno"> 6884</span> }</div><div class="line"><a name="l06885"></a><span class="lineno"> 6885</span> </div><div class="line"><a name="l06886"></a><span class="lineno"> 6886</span> <span class="comment">/*</span></div><div class="line"><a name="l06887"></a><span class="lineno"> 6887</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06888"></a><span class="lineno"> 6888</span> <span class="comment"> * big.hash -> fixnum</span></div><div class="line"><a name="l06889"></a><span class="lineno"> 6889</span> <span class="comment"> *</span></div><div class="line"><a name="l06890"></a><span class="lineno"> 6890</span> <span class="comment"> * Compute a hash based on the value of _big_.</span></div><div class="line"><a name="l06891"></a><span class="lineno"> 6891</span> <span class="comment"> */</span></div><div class="line"><a name="l06892"></a><span class="lineno"> 6892</span> </div><div class="line"><a name="l06893"></a><span class="lineno"> 6893</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06894"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a8f43bac3f4e5908a8a4400c1c94bab79"> 6894</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a8f43bac3f4e5908a8a4400c1c94bab79">rb_big_hash</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l06895"></a><span class="lineno"> 6895</span> {</div><div class="line"><a name="l06896"></a><span class="lineno"> 6896</span>  <a class="code" href="../../dd/d24/st_8h.html#ac214e5cdcf0de6a2108b9643e7fc12e0">st_index_t</a> <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>;</div><div class="line"><a name="l06897"></a><span class="lineno"> 6897</span> </div><div class="line"><a name="l06898"></a><span class="lineno"> 6898</span>  <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a> = <a class="code" href="../../db/d2e/intern_8h.html#a467461650cee651125cdac471160b9cd">rb_memhash</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(x), <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>)*<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(x)) ^ <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x);</div><div class="line"><a name="l06899"></a><span class="lineno"> 6899</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>);</div><div class="line"><a name="l06900"></a><span class="lineno"> 6900</span> }</div><div class="line"><a name="l06901"></a><span class="lineno"> 6901</span> </div><div class="line"><a name="l06902"></a><span class="lineno"> 6902</span> <span class="comment">/*</span></div><div class="line"><a name="l06903"></a><span class="lineno"> 6903</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06904"></a><span class="lineno"> 6904</span> <span class="comment"> * big.coerce(numeric) -> array</span></div><div class="line"><a name="l06905"></a><span class="lineno"> 6905</span> <span class="comment"> *</span></div><div class="line"><a name="l06906"></a><span class="lineno"> 6906</span> <span class="comment"> * Returns an array with both a +numeric+ and a +big+ represented as Bignum</span></div><div class="line"><a name="l06907"></a><span class="lineno"> 6907</span> <span class="comment"> * objects.</span></div><div class="line"><a name="l06908"></a><span class="lineno"> 6908</span> <span class="comment"> *</span></div><div class="line"><a name="l06909"></a><span class="lineno"> 6909</span> <span class="comment"> * This is achieved by converting +numeric+ to a Bignum.</span></div><div class="line"><a name="l06910"></a><span class="lineno"> 6910</span> <span class="comment"> *</span></div><div class="line"><a name="l06911"></a><span class="lineno"> 6911</span> <span class="comment"> * A TypeError is raised if the +numeric+ is not a Fixnum or Bignum type.</span></div><div class="line"><a name="l06912"></a><span class="lineno"> 6912</span> <span class="comment"> *</span></div><div class="line"><a name="l06913"></a><span class="lineno"> 6913</span> <span class="comment"> * (0x3FFFFFFFFFFFFFFF+1).coerce(42) #=> [42, 4611686018427387904]</span></div><div class="line"><a name="l06914"></a><span class="lineno"> 6914</span> <span class="comment"> */</span></div><div class="line"><a name="l06915"></a><span class="lineno"> 6915</span> </div><div class="line"><a name="l06916"></a><span class="lineno"> 6916</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06917"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ac312b5f2525686d21d47e7748c091e7f"> 6917</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ac312b5f2525686d21d47e7748c091e7f">rb_big_coerce</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> y)</div><div class="line"><a name="l06918"></a><span class="lineno"> 6918</span> {</div><div class="line"><a name="l06919"></a><span class="lineno"> 6919</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a>(y)) {</div><div class="line"><a name="l06920"></a><span class="lineno"> 6920</span>  y = <a class="code" href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a>(y));</div><div class="line"><a name="l06921"></a><span class="lineno"> 6921</span>  }</div><div class="line"><a name="l06922"></a><span class="lineno"> 6922</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (!<a class="code" href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a>(y)) {</div><div class="line"><a name="l06923"></a><span class="lineno"> 6923</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"can't coerce %s to Bignum"</span>,</div><div class="line"><a name="l06924"></a><span class="lineno"> 6924</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9b4f42ada717bfbe7a78830639476aed">rb_obj_classname</a>(y));</div><div class="line"><a name="l06925"></a><span class="lineno"> 6925</span>  }</div><div class="line"><a name="l06926"></a><span class="lineno"> 6926</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a>(y, x);</div><div class="line"><a name="l06927"></a><span class="lineno"> 6927</span> }</div><div class="line"><a name="l06928"></a><span class="lineno"> 6928</span> </div><div class="line"><a name="l06929"></a><span class="lineno"> 6929</span> <span class="comment">/*</span></div><div class="line"><a name="l06930"></a><span class="lineno"> 6930</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06931"></a><span class="lineno"> 6931</span> <span class="comment"> * big.abs -> aBignum</span></div><div class="line"><a name="l06932"></a><span class="lineno"> 6932</span> <span class="comment"> * big.magnitude -> aBignum</span></div><div class="line"><a name="l06933"></a><span class="lineno"> 6933</span> <span class="comment"> *</span></div><div class="line"><a name="l06934"></a><span class="lineno"> 6934</span> <span class="comment"> * Returns the absolute value of <i>big</i>.</span></div><div class="line"><a name="l06935"></a><span class="lineno"> 6935</span> <span class="comment"> *</span></div><div class="line"><a name="l06936"></a><span class="lineno"> 6936</span> <span class="comment"> * -1234567890987654321.abs #=> 1234567890987654321</span></div><div class="line"><a name="l06937"></a><span class="lineno"> 6937</span> <span class="comment"> */</span></div><div class="line"><a name="l06938"></a><span class="lineno"> 6938</span> </div><div class="line"><a name="l06939"></a><span class="lineno"> 6939</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06940"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a5c93aa8889d11cf70b9c0e6a694c2953"> 6940</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a5c93aa8889d11cf70b9c0e6a694c2953">rb_big_abs</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> x)</div><div class="line"><a name="l06941"></a><span class="lineno"> 6941</span> {</div><div class="line"><a name="l06942"></a><span class="lineno"> 6942</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a>(x)) {</div><div class="line"><a name="l06943"></a><span class="lineno"> 6943</span>  x = <a class="code" href="../../d1/dcc/bignum_8c.html#a28fe45fbc613401b17ad1e9d48c81aa2">rb_big_clone</a>(x);</div><div class="line"><a name="l06944"></a><span class="lineno"> 6944</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a>(x, 1);</div><div class="line"><a name="l06945"></a><span class="lineno"> 6945</span>  }</div><div class="line"><a name="l06946"></a><span class="lineno"> 6946</span>  <span class="keywordflow">return</span> x;</div><div class="line"><a name="l06947"></a><span class="lineno"> 6947</span> }</div><div class="line"><a name="l06948"></a><span class="lineno"> 6948</span> </div><div class="line"><a name="l06949"></a><span class="lineno"> 6949</span> <span class="comment">/*</span></div><div class="line"><a name="l06950"></a><span class="lineno"> 6950</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06951"></a><span class="lineno"> 6951</span> <span class="comment"> * big.size -> integer</span></div><div class="line"><a name="l06952"></a><span class="lineno"> 6952</span> <span class="comment"> *</span></div><div class="line"><a name="l06953"></a><span class="lineno"> 6953</span> <span class="comment"> * Returns the number of bytes in the machine representation of</span></div><div class="line"><a name="l06954"></a><span class="lineno"> 6954</span> <span class="comment"> * <i>big</i>.</span></div><div class="line"><a name="l06955"></a><span class="lineno"> 6955</span> <span class="comment"> *</span></div><div class="line"><a name="l06956"></a><span class="lineno"> 6956</span> <span class="comment"> * (256**10 - 1).size #=> 12</span></div><div class="line"><a name="l06957"></a><span class="lineno"> 6957</span> <span class="comment"> * (256**20 - 1).size #=> 20</span></div><div class="line"><a name="l06958"></a><span class="lineno"> 6958</span> <span class="comment"> * (256**40 - 1).size #=> 40</span></div><div class="line"><a name="l06959"></a><span class="lineno"> 6959</span> <span class="comment"> */</span></div><div class="line"><a name="l06960"></a><span class="lineno"> 6960</span> </div><div class="line"><a name="l06961"></a><span class="lineno"> 6961</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06962"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a95cd4cbf6e72ddc62a85e92607ff7896"> 6962</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a95cd4cbf6e72ddc62a85e92607ff7896">rb_big_size</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big)</div><div class="line"><a name="l06963"></a><span class="lineno"> 6963</span> {</div><div class="line"><a name="l06964"></a><span class="lineno"> 6964</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#af89e74d2dcf3eef15b29fa6015984af3">SIZET2NUM</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d">BIGSIZE</a>(big));</div><div class="line"><a name="l06965"></a><span class="lineno"> 6965</span> }</div><div class="line"><a name="l06966"></a><span class="lineno"> 6966</span> </div><div class="line"><a name="l06967"></a><span class="lineno"> 6967</span> <span class="comment">/*</span></div><div class="line"><a name="l06968"></a><span class="lineno"> 6968</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06969"></a><span class="lineno"> 6969</span> <span class="comment"> * int.bit_length -> integer</span></div><div class="line"><a name="l06970"></a><span class="lineno"> 6970</span> <span class="comment"> *</span></div><div class="line"><a name="l06971"></a><span class="lineno"> 6971</span> <span class="comment"> * Returns the number of bits of the value of <i>int</i>.</span></div><div class="line"><a name="l06972"></a><span class="lineno"> 6972</span> <span class="comment"> *</span></div><div class="line"><a name="l06973"></a><span class="lineno"> 6973</span> <span class="comment"> * "the number of bits" means that</span></div><div class="line"><a name="l06974"></a><span class="lineno"> 6974</span> <span class="comment"> * the bit position of the highest bit which is different to the sign bit.</span></div><div class="line"><a name="l06975"></a><span class="lineno"> 6975</span> <span class="comment"> * (The bit position of the bit 2**n is n+1.)</span></div><div class="line"><a name="l06976"></a><span class="lineno"> 6976</span> <span class="comment"> * If there is no such bit (zero or minus one), zero is returned.</span></div><div class="line"><a name="l06977"></a><span class="lineno"> 6977</span> <span class="comment"> *</span></div><div class="line"><a name="l06978"></a><span class="lineno"> 6978</span> <span class="comment"> * I.e. This method returns ceil(log2(int < 0 ? -int : int+1)).</span></div><div class="line"><a name="l06979"></a><span class="lineno"> 6979</span> <span class="comment"> *</span></div><div class="line"><a name="l06980"></a><span class="lineno"> 6980</span> <span class="comment"> * (-2**10000-1).bit_length #=> 10001</span></div><div class="line"><a name="l06981"></a><span class="lineno"> 6981</span> <span class="comment"> * (-2**10000).bit_length #=> 10000</span></div><div class="line"><a name="l06982"></a><span class="lineno"> 6982</span> <span class="comment"> * (-2**10000+1).bit_length #=> 10000</span></div><div class="line"><a name="l06983"></a><span class="lineno"> 6983</span> <span class="comment"> *</span></div><div class="line"><a name="l06984"></a><span class="lineno"> 6984</span> <span class="comment"> * (-2**1000-1).bit_length #=> 1001</span></div><div class="line"><a name="l06985"></a><span class="lineno"> 6985</span> <span class="comment"> * (-2**1000).bit_length #=> 1000</span></div><div class="line"><a name="l06986"></a><span class="lineno"> 6986</span> <span class="comment"> * (-2**1000+1).bit_length #=> 1000</span></div><div class="line"><a name="l06987"></a><span class="lineno"> 6987</span> <span class="comment"> *</span></div><div class="line"><a name="l06988"></a><span class="lineno"> 6988</span> <span class="comment"> * (2**1000-1).bit_length #=> 1000</span></div><div class="line"><a name="l06989"></a><span class="lineno"> 6989</span> <span class="comment"> * (2**1000).bit_length #=> 1001</span></div><div class="line"><a name="l06990"></a><span class="lineno"> 6990</span> <span class="comment"> * (2**1000+1).bit_length #=> 1001</span></div><div class="line"><a name="l06991"></a><span class="lineno"> 6991</span> <span class="comment"> *</span></div><div class="line"><a name="l06992"></a><span class="lineno"> 6992</span> <span class="comment"> * (2**10000-1).bit_length #=> 10000</span></div><div class="line"><a name="l06993"></a><span class="lineno"> 6993</span> <span class="comment"> * (2**10000).bit_length #=> 10001</span></div><div class="line"><a name="l06994"></a><span class="lineno"> 6994</span> <span class="comment"> * (2**10000+1).bit_length #=> 10001</span></div><div class="line"><a name="l06995"></a><span class="lineno"> 6995</span> <span class="comment"> *</span></div><div class="line"><a name="l06996"></a><span class="lineno"> 6996</span> <span class="comment"> */</span></div><div class="line"><a name="l06997"></a><span class="lineno"> 6997</span> </div><div class="line"><a name="l06998"></a><span class="lineno"> 6998</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06999"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#af92e1ed73d87370a6377d5dfea7398c6"> 6999</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#af92e1ed73d87370a6377d5dfea7398c6">rb_big_bit_length</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> big)</div><div class="line"><a name="l07000"></a><span class="lineno"> 7000</span> {</div><div class="line"><a name="l07001"></a><span class="lineno"> 7001</span>  <span class="keywordtype">int</span> nlz_bits;</div><div class="line"><a name="l07002"></a><span class="lineno"> 7002</span>  <span class="keywordtype">size_t</span> numbytes;</div><div class="line"><a name="l07003"></a><span class="lineno"> 7003</span> </div><div class="line"><a name="l07004"></a><span class="lineno"> 7004</span>  <span class="keyword">static</span> <span class="keyword">const</span> <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> char_bit[1] = { <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> };</div><div class="line"><a name="l07005"></a><span class="lineno"> 7005</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> numbytes_bary[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<span class="keywordtype">size_t</span>))];</div><div class="line"><a name="l07006"></a><span class="lineno"> 7006</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> nlz_bary[1];</div><div class="line"><a name="l07007"></a><span class="lineno"> 7007</span>  <a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a> result_bary[<a class="code" href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a>(<span class="keyword">sizeof</span>(<span class="keywordtype">size_t</span>)+1)];</div><div class="line"><a name="l07008"></a><span class="lineno"> 7008</span> </div><div class="line"><a name="l07009"></a><span class="lineno"> 7009</span>  numbytes = <a class="code" href="../../d1/dcc/bignum_8c.html#a4cd38736348907841b1dbbb04f364dd9">rb_absint_size</a>(big, &nlz_bits);</div><div class="line"><a name="l07010"></a><span class="lineno"> 7010</span> </div><div class="line"><a name="l07011"></a><span class="lineno"> 7011</span>  <span class="keywordflow">if</span> (numbytes == 0)</div><div class="line"><a name="l07012"></a><span class="lineno"> 7012</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a>(0);</div><div class="line"><a name="l07013"></a><span class="lineno"> 7013</span> </div><div class="line"><a name="l07014"></a><span class="lineno"> 7014</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a>(big) && <a class="code" href="../../d1/dcc/bignum_8c.html#a4f08843e5ca09928e87c98ce46db02b8">rb_absint_singlebit_p</a>(big)) {</div><div class="line"><a name="l07015"></a><span class="lineno"> 7015</span>  <span class="keywordflow">if</span> (nlz_bits != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>-1) {</div><div class="line"><a name="l07016"></a><span class="lineno"> 7016</span>  nlz_bits++;</div><div class="line"><a name="l07017"></a><span class="lineno"> 7017</span>  }</div><div class="line"><a name="l07018"></a><span class="lineno"> 7018</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l07019"></a><span class="lineno"> 7019</span>  nlz_bits = 0;</div><div class="line"><a name="l07020"></a><span class="lineno"> 7020</span>  numbytes--;</div><div class="line"><a name="l07021"></a><span class="lineno"> 7021</span>  }</div><div class="line"><a name="l07022"></a><span class="lineno"> 7022</span>  }</div><div class="line"><a name="l07023"></a><span class="lineno"> 7023</span> </div><div class="line"><a name="l07024"></a><span class="lineno"> 7024</span>  <span class="keywordflow">if</span> (numbytes <= <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c75bb398badb69c7577b21486f9963f">SIZE_MAX</a> / <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a>) {</div><div class="line"><a name="l07025"></a><span class="lineno"> 7025</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#af89e74d2dcf3eef15b29fa6015984af3">SIZET2NUM</a>(numbytes * <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a> - nlz_bits);</div><div class="line"><a name="l07026"></a><span class="lineno"> 7026</span>  }</div><div class="line"><a name="l07027"></a><span class="lineno"> 7027</span> </div><div class="line"><a name="l07028"></a><span class="lineno"> 7028</span>  nlz_bary[0] = nlz_bits;</div><div class="line"><a name="l07029"></a><span class="lineno"> 7029</span> </div><div class="line"><a name="l07030"></a><span class="lineno"> 7030</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a">bary_unpack</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a>(numbytes_bary), &numbytes, 1, <span class="keyword">sizeof</span>(numbytes), 0,</div><div class="line"><a name="l07031"></a><span class="lineno"> 7031</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l07032"></a><span class="lineno"> 7032</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af9bebc3d4ee972ff7419afa73acb49e1">BARY_SHORT_MUL</a>(result_bary, numbytes_bary, char_bit);</div><div class="line"><a name="l07033"></a><span class="lineno"> 7033</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#aa99de588906902bc3a4255b72254d9b1">BARY_SUB</a>(result_bary, result_bary, nlz_bary);</div><div class="line"><a name="l07034"></a><span class="lineno"> 7034</span> </div><div class="line"><a name="l07035"></a><span class="lineno"> 7035</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/dcc/bignum_8c.html#a4f623845f4719716b70e4025508657fc">rb_integer_unpack</a>(result_bary, <a class="code" href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a>(result_bary), <span class="keyword">sizeof</span>(<a class="code" href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a>), 0,</div><div class="line"><a name="l07036"></a><span class="lineno"> 7036</span>  <a class="code" href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a>|<a class="code" href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a>);</div><div class="line"><a name="l07037"></a><span class="lineno"> 7037</span> }</div><div class="line"><a name="l07038"></a><span class="lineno"> 7038</span> </div><div class="line"><a name="l07039"></a><span class="lineno"> 7039</span> <span class="comment">/*</span></div><div class="line"><a name="l07040"></a><span class="lineno"> 7040</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07041"></a><span class="lineno"> 7041</span> <span class="comment"> * big.odd? -> true or false</span></div><div class="line"><a name="l07042"></a><span class="lineno"> 7042</span> <span class="comment"> *</span></div><div class="line"><a name="l07043"></a><span class="lineno"> 7043</span> <span class="comment"> * Returns <code>true</code> if <i>big</i> is an odd number.</span></div><div class="line"><a name="l07044"></a><span class="lineno"> 7044</span> <span class="comment"> */</span></div><div class="line"><a name="l07045"></a><span class="lineno"> 7045</span> </div><div class="line"><a name="l07046"></a><span class="lineno"> 7046</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07047"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#adc2db6d65acb6a1c64e8c7571d062bf4"> 7047</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#adc2db6d65acb6a1c64e8c7571d062bf4">rb_big_odd_p</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> num)</div><div class="line"><a name="l07048"></a><span class="lineno"> 7048</span> {</div><div class="line"><a name="l07049"></a><span class="lineno"> 7049</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(num) != 0 && <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(num)[0] & 1) {</div><div class="line"><a name="l07050"></a><span class="lineno"> 7050</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l07051"></a><span class="lineno"> 7051</span>  }</div><div class="line"><a name="l07052"></a><span class="lineno"> 7052</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l07053"></a><span class="lineno"> 7053</span> }</div><div class="line"><a name="l07054"></a><span class="lineno"> 7054</span> </div><div class="line"><a name="l07055"></a><span class="lineno"> 7055</span> <span class="comment">/*</span></div><div class="line"><a name="l07056"></a><span class="lineno"> 7056</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07057"></a><span class="lineno"> 7057</span> <span class="comment"> * big.even? -> true or false</span></div><div class="line"><a name="l07058"></a><span class="lineno"> 7058</span> <span class="comment"> *</span></div><div class="line"><a name="l07059"></a><span class="lineno"> 7059</span> <span class="comment"> * Returns <code>true</code> if <i>big</i> is an even number.</span></div><div class="line"><a name="l07060"></a><span class="lineno"> 7060</span> <span class="comment"> */</span></div><div class="line"><a name="l07061"></a><span class="lineno"> 7061</span> </div><div class="line"><a name="l07062"></a><span class="lineno"> 7062</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07063"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#a515fb64160e4cf0c4765c58738942bcb"> 7063</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#a515fb64160e4cf0c4765c58738942bcb">rb_big_even_p</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> num)</div><div class="line"><a name="l07064"></a><span class="lineno"> 7064</span> {</div><div class="line"><a name="l07065"></a><span class="lineno"> 7065</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a>(num) != 0 && <a class="code" href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a>(num)[0] & 1) {</div><div class="line"><a name="l07066"></a><span class="lineno"> 7066</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l07067"></a><span class="lineno"> 7067</span>  }</div><div class="line"><a name="l07068"></a><span class="lineno"> 7068</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l07069"></a><span class="lineno"> 7069</span> }</div><div class="line"><a name="l07070"></a><span class="lineno"> 7070</span> </div><div class="line"><a name="l07071"></a><span class="lineno"> 7071</span> <span class="comment">/*</span></div><div class="line"><a name="l07072"></a><span class="lineno"> 7072</span> <span class="comment"> * Bignum objects hold integers outside the range of</span></div><div class="line"><a name="l07073"></a><span class="lineno"> 7073</span> <span class="comment"> * Fixnum. Bignum objects are created</span></div><div class="line"><a name="l07074"></a><span class="lineno"> 7074</span> <span class="comment"> * automatically when integer calculations would otherwise overflow a</span></div><div class="line"><a name="l07075"></a><span class="lineno"> 7075</span> <span class="comment"> * Fixnum. When a calculation involving</span></div><div class="line"><a name="l07076"></a><span class="lineno"> 7076</span> <span class="comment"> * Bignum objects returns a result that will fit in a</span></div><div class="line"><a name="l07077"></a><span class="lineno"> 7077</span> <span class="comment"> * Fixnum, the result is automatically converted.</span></div><div class="line"><a name="l07078"></a><span class="lineno"> 7078</span> <span class="comment"> *</span></div><div class="line"><a name="l07079"></a><span class="lineno"> 7079</span> <span class="comment"> * For the purposes of the bitwise operations and <code>[]</code>, a</span></div><div class="line"><a name="l07080"></a><span class="lineno"> 7080</span> <span class="comment"> * Bignum is treated as if it were an infinite-length</span></div><div class="line"><a name="l07081"></a><span class="lineno"> 7081</span> <span class="comment"> * bitstring with 2's complement representation.</span></div><div class="line"><a name="l07082"></a><span class="lineno"> 7082</span> <span class="comment"> *</span></div><div class="line"><a name="l07083"></a><span class="lineno"> 7083</span> <span class="comment"> * While Fixnum values are immediate, Bignum</span></div><div class="line"><a name="l07084"></a><span class="lineno"> 7084</span> <span class="comment"> * objects are not---assignment and parameter passing work with</span></div><div class="line"><a name="l07085"></a><span class="lineno"> 7085</span> <span class="comment"> * references to objects, not the objects themselves.</span></div><div class="line"><a name="l07086"></a><span class="lineno"> 7086</span> <span class="comment"> *</span></div><div class="line"><a name="l07087"></a><span class="lineno"> 7087</span> <span class="comment"> */</span></div><div class="line"><a name="l07088"></a><span class="lineno"> 7088</span> </div><div class="line"><a name="l07089"></a><span class="lineno"> 7089</span> <span class="keywordtype">void</span></div><div class="line"><a name="l07090"></a><span class="lineno"><a class="line" href="../../d1/dcc/bignum_8c.html#ae6ce75ec60fdbdf4373260bc25fae8dd"> 7090</a></span> <a class="code" href="../../d1/dcc/bignum_8c.html#ae6ce75ec60fdbdf4373260bc25fae8dd">Init_Bignum</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l07091"></a><span class="lineno"> 7091</span> {</div><div class="line"><a name="l07092"></a><span class="lineno"> 7092</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"Bignum"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a633329e55222507402831db26be9f9d2">rb_cInteger</a>);</div><div class="line"><a name="l07093"></a><span class="lineno"> 7093</span> </div><div class="line"><a name="l07094"></a><span class="lineno"> 7094</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"to_s"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ac632decf143c3ce61d8fa4c7f6f43ce8">rb_big_to_s</a>, -1);</div><div class="line"><a name="l07095"></a><span class="lineno"> 7095</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"inspect"</span>, <span class="stringliteral">"to_s"</span>);</div><div class="line"><a name="l07096"></a><span class="lineno"> 7096</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"coerce"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ac312b5f2525686d21d47e7748c091e7f">rb_big_coerce</a>, 1);</div><div class="line"><a name="l07097"></a><span class="lineno"> 7097</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"-@"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ad1e2c95ba33754099a9789e22b014c41">rb_big_uminus</a>, 0);</div><div class="line"><a name="l07098"></a><span class="lineno"> 7098</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"+"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a3996827354a05ef544beeaa557ce38a3">rb_big_plus</a>, 1);</div><div class="line"><a name="l07099"></a><span class="lineno"> 7099</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"-"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a143ebdf019c4659ad08b313052a294f4">rb_big_minus</a>, 1);</div><div class="line"><a name="l07100"></a><span class="lineno"> 7100</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"*"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a838287ae9846a01c6af80502216bd9b8">rb_big_mul</a>, 1);</div><div class="line"><a name="l07101"></a><span class="lineno"> 7101</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"/"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ac951414bf7b52b8ce949e921baf793a8">rb_big_div</a>, 1);</div><div class="line"><a name="l07102"></a><span class="lineno"> 7102</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"%"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a15a52868c6862b9574ce1aceb688af97">rb_big_modulo</a>, 1);</div><div class="line"><a name="l07103"></a><span class="lineno"> 7103</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"div"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a53fc55611c7e85d15e505299fea22694">rb_big_idiv</a>, 1);</div><div class="line"><a name="l07104"></a><span class="lineno"> 7104</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"divmod"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#abbe46ceec250a75ee9e1c53c26b05020">rb_big_divmod</a>, 1);</div><div class="line"><a name="l07105"></a><span class="lineno"> 7105</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"modulo"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a15a52868c6862b9574ce1aceb688af97">rb_big_modulo</a>, 1);</div><div class="line"><a name="l07106"></a><span class="lineno"> 7106</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"remainder"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#aa8b6d1356e1d76250c63ab6c5d62f5d6">rb_big_remainder</a>, 1);</div><div class="line"><a name="l07107"></a><span class="lineno"> 7107</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"fdiv"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ab89dcf2bcfe7255146042df1d3649c52">rb_big_fdiv</a>, 1);</div><div class="line"><a name="l07108"></a><span class="lineno"> 7108</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"**"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a22a538c97c7b21b2edd1eb2a9b54e196">rb_big_pow</a>, 1);</div><div class="line"><a name="l07109"></a><span class="lineno"> 7109</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"&"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a10c615980e731c17a233773ba502873c">rb_big_and</a>, 1);</div><div class="line"><a name="l07110"></a><span class="lineno"> 7110</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"|"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a11145f11c8614650e43ae9616c1caea9">rb_big_or</a>, 1);</div><div class="line"><a name="l07111"></a><span class="lineno"> 7111</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"^"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ac2b52d6f3f5895bc7bde9e667e26fff5">rb_big_xor</a>, 1);</div><div class="line"><a name="l07112"></a><span class="lineno"> 7112</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"~"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a0ec7083ef8b3aee8b5b157c6d18ea3f4">rb_big_neg</a>, 0);</div><div class="line"><a name="l07113"></a><span class="lineno"> 7113</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"<<"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a0b74a40818aae2dd69157223fc1b069e">rb_big_lshift</a>, 1);</div><div class="line"><a name="l07114"></a><span class="lineno"> 7114</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">">>"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ad606505b6b476ddff0addf17454da732">rb_big_rshift</a>, 1);</div><div class="line"><a name="l07115"></a><span class="lineno"> 7115</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"[]"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a7cb3b23ce9950ee59046650d5c5971bc">rb_big_aref</a>, 1);</div><div class="line"><a name="l07116"></a><span class="lineno"> 7116</span> </div><div class="line"><a name="l07117"></a><span class="lineno"> 7117</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"<=>"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a709646dcfd8cfd6aba1c9805c7690927">rb_big_cmp</a>, 1);</div><div class="line"><a name="l07118"></a><span class="lineno"> 7118</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"=="</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a80d84acdef43f8c683c020619750cfe1">rb_big_eq</a>, 1);</div><div class="line"><a name="l07119"></a><span class="lineno"> 7119</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">">"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ae3c9337ee28a2564cb46cf602e41f315">big_gt</a>, 1);</div><div class="line"><a name="l07120"></a><span class="lineno"> 7120</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">">="</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a76ae162226d88662980e103acc97d324">big_ge</a>, 1);</div><div class="line"><a name="l07121"></a><span class="lineno"> 7121</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"<"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#ac0793b5f02b87a2eb8a997a655c63446">big_lt</a>, 1);</div><div class="line"><a name="l07122"></a><span class="lineno"> 7122</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"<="</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a6583290ba8fd849d1c5237254ab14e67">big_le</a>, 1);</div><div class="line"><a name="l07123"></a><span class="lineno"> 7123</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"==="</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a80d84acdef43f8c683c020619750cfe1">rb_big_eq</a>, 1);</div><div class="line"><a name="l07124"></a><span class="lineno"> 7124</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"eql?"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a82a70258b46e56291551f0585d69cce8">rb_big_eql</a>, 1);</div><div class="line"><a name="l07125"></a><span class="lineno"> 7125</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"hash"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a8f43bac3f4e5908a8a4400c1c94bab79">rb_big_hash</a>, 0);</div><div class="line"><a name="l07126"></a><span class="lineno"> 7126</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"to_f"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a89ede0740dc1fb7747b4ee506be31deb">rb_big_to_f</a>, 0);</div><div class="line"><a name="l07127"></a><span class="lineno"> 7127</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"abs"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a5c93aa8889d11cf70b9c0e6a694c2953">rb_big_abs</a>, 0);</div><div class="line"><a name="l07128"></a><span class="lineno"> 7128</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"magnitude"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a5c93aa8889d11cf70b9c0e6a694c2953">rb_big_abs</a>, 0);</div><div class="line"><a name="l07129"></a><span class="lineno"> 7129</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"size"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a95cd4cbf6e72ddc62a85e92607ff7896">rb_big_size</a>, 0);</div><div class="line"><a name="l07130"></a><span class="lineno"> 7130</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"bit_length"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#af92e1ed73d87370a6377d5dfea7398c6">rb_big_bit_length</a>, 0);</div><div class="line"><a name="l07131"></a><span class="lineno"> 7131</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"odd?"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#adc2db6d65acb6a1c64e8c7571d062bf4">rb_big_odd_p</a>, 0);</div><div class="line"><a name="l07132"></a><span class="lineno"> 7132</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"even?"</span>, <a class="code" href="../../d1/dcc/bignum_8c.html#a515fb64160e4cf0c4765c58738942bcb">rb_big_even_p</a>, 0);</div><div class="line"><a name="l07133"></a><span class="lineno"> 7133</span> </div><div class="line"><a name="l07134"></a><span class="lineno"> 7134</span> <span class="preprocessor">#ifdef USE_GMP</span></div><div class="line"><a name="l07135"></a><span class="lineno"> 7135</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a>, <span class="stringliteral">"GMP_VERSION"</span>, <a class="code" href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a>(<span class="stringliteral">"GMP %s"</span>, gmp_version));</div><div class="line"><a name="l07136"></a><span class="lineno"> 7136</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l07137"></a><span class="lineno"> 7137</span> </div><div class="line"><a name="l07138"></a><span class="lineno"> 7138</span>  <a class="code" href="../../d1/dcc/bignum_8c.html#af4cab5f578fd9f9377ab3d63c70c4f04">power_cache_init</a>();</div><div class="line"><a name="l07139"></a><span class="lineno"> 7139</span> }</div><div class="ttc" id="bignum_8c_html_aa62842e3c25cc9c6bc118fd1bdd50173"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa62842e3c25cc9c6bc118fd1bdd50173">big2ulong</a></div><div class="ttdeci">static unsigned long big2ulong(VALUE x, const char *type)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05049">bignum.c:5049</a></div></div> <div class="ttc" id="bignum_8c_html_a15a52868c6862b9574ce1aceb688af97"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a15a52868c6862b9574ce1aceb688af97">rb_big_modulo</a></div><div class="ttdeci">VALUE rb_big_modulo(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06189">bignum.c:6189</a></div></div> <div class="ttc" id="structbig2str__struct_html_ab5a01d8becaa67cb66588540aeb4a0d0"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#ab5a01d8becaa67cb66588540aeb4a0d0">big2str_struct::base</a></div><div class="ttdeci">int base</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04599">bignum.c:4599</a></div></div> <div class="ttc" id="bignum_8c_html_a280d5ce74114cdfa63f249f960a262c3"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a280d5ce74114cdfa63f249f960a262c3">rb_bigzero_p</a></div><div class="ttdeci">int rb_bigzero_p(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02903">bignum.c:2903</a></div></div> <div class="ttc" id="bignum_8c_html_a3e73c5456b529a1c4262953dde47e7cd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3e73c5456b529a1c4262953dde47e7cd">bignorm</a></div><div class="ttdeci">static VALUE bignorm(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03127">bignum.c:3127</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a42f38632bba2bb73abb03716754f3230"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a></div><div class="ttdeci">#define MEMCMP(p1, p2, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01362">ruby.h:1362</a></div></div> <div class="ttc" id="structbig__div__struct_html_acad245855776fc91f89bbc75ffee8fce"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html#acad245855776fc91f89bbc75ffee8fce">big_div_struct::zn</a></div><div class="ttdeci">size_t zn</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02519">bignum.c:2519</a></div></div> <div class="ttc" id="bignum_8c_html_a0dd885d29a47ce6b2fcab367979bf048"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0dd885d29a47ce6b2fcab367979bf048">rb_big2str1</a></div><div class="ttdeci">static VALUE rb_big2str1(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04939">bignum.c:4939</a></div></div> <div class="ttc" id="bignum_8c_html_a28fe45fbc613401b17ad1e9d48c81aa2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a28fe45fbc613401b17ad1e9d48c81aa2">rb_big_clone</a></div><div class="ttdeci">VALUE rb_big_clone(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03004">bignum.c:3004</a></div></div> <div class="ttc" id="bignum_8c_html_acb5da76ceeff7ca3bc36e042b0fb5202"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#acb5da76ceeff7ca3bc36e042b0fb5202">STATIC_ASSERT</a></div><div class="ttdeci">STATIC_ASSERT(sizeof_bdigit_dbl, sizeof(BDIGIT_DBL)==SIZEOF_BDIGIT_DBL)</div></div> <div class="ttc" id="bignum_8c_html_af1e2c280503bb357b7494f63de82958e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af1e2c280503bb357b7494f63de82958e">ALIGNOF</a></div><div class="ttdeci">#define ALIGNOF(type)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00066">bignum.c:66</a></div></div> <div class="ttc" id="bignum_8c_html_a34adb313b37a47b5942a50c3394c9a12"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a34adb313b37a47b5942a50c3394c9a12">BARY_TRUNC</a></div><div class="ttdeci">#define BARY_TRUNC(ds, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00126">bignum.c:126</a></div></div> <div class="ttc" id="bignum_8c_html_af79b5a41c56d2875ece03b0b778509aa"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af79b5a41c56d2875ece03b0b778509aa">rb_str2big_poweroftwo</a></div><div class="ttdeci">VALUE rb_str2big_poweroftwo(VALUE arg, int base, int badcheck)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04161">bignum.c:4161</a></div></div> <div class="ttc" id="bignum_8c_html_a01dccb3f948adab23275722f384ff5ed"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a01dccb3f948adab23275722f384ff5ed">rb_integer_pack</a></div><div class="ttdeci">int rb_integer_pack(VALUE val, void *words, size_t numwords, size_t wordsize, size_t nails, int flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03531">bignum.c:3531</a></div></div> <div class="ttc" id="bignum_8c_html_afa0f0ebc2c30fa3b66607ad0f57cb8cc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#afa0f0ebc2c30fa3b66607ad0f57cb8cc">bigtrunc</a></div><div class="ttdeci">static VALUE bigtrunc(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03069">bignum.c:3069</a></div></div> <div class="ttc" id="bignum_8c_html_ae6dee9b066c3fa4fc956e9b8d5683d3f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3f">big_op_t</a></div><div class="ttdeci">big_op_t</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05419">bignum.c:5419</a></div></div> <div class="ttc" id="error_8c_html_a2d5fb28e54f792e7341b2c45f52f3860"><div class="ttname"><a href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a></div><div class="ttdeci">void rb_bug(const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00327">error.c:327</a></div></div> <div class="ttc" id="intern_8h_html_a2f38a6ab6f75e337fb80fe1351e6e8ff"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2f38a6ab6f75e337fb80fe1351e6e8ff">rb_num_coerce_bin</a></div><div class="ttdeci">VALUE rb_num_coerce_bin(VALUE, VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00285">numeric.c:285</a></div></div> <div class="ttc" id="bignum_8c_html_afbcde0954c4494692919142fe48bf60c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#afbcde0954c4494692919142fe48bf60c">rb_uint2big</a></div><div class="ttdeci">VALUE rb_uint2big(VALUE n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03142">bignum.c:3142</a></div></div> <div class="ttc" id="bignum_8c_html_ad2b6ee8539626c389a8dd757f0187bd7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad2b6ee8539626c389a8dd757f0187bd7">integer_unpack_num_bdigits_generic</a></div><div class="ttdeci">static size_t integer_unpack_num_bdigits_generic(size_t numwords, size_t wordsize, size_t nails, int *nlp_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00968">bignum.c:968</a></div></div> <div class="ttc" id="bignum_8c_html_ab87d754b1da47c4c76725152b8e92f8f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ab87d754b1da47c4c76725152b8e92f8f">twocomp2abs_bang</a></div><div class="ttdeci">static void twocomp2abs_bang(VALUE x, int hibits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03060">bignum.c:3060</a></div></div> <div class="ttc" id="bignum_8c_html_a515fb64160e4cf0c4765c58738942bcb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a515fb64160e4cf0c4765c58738942bcb">rb_big_even_p</a></div><div class="ttdeci">static VALUE rb_big_even_p(VALUE num)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l07063">bignum.c:7063</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a2d6569aa794c2f23e90691e60d2f3ad2"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a2d6569aa794c2f23e90691e60d2f3ad2">SSIZE_MAX</a></div><div class="ttdeci">#define SSIZE_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00290">ruby.h:290</a></div></div> <div class="ttc" id="bignum_8c_html_af3e7f4ad364b1e97d0b6847726a2fd62"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af3e7f4ad364b1e97d0b6847726a2fd62">big_shift</a></div><div class="ttdeci">static VALUE big_shift(VALUE x, long n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06253">bignum.c:6253</a></div></div> <div class="ttc" id="strchr_8c_html_a219836f542ce53545052bed5353820ca"><div class="ttname"><a href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a></div><div class="ttdeci">size_t strlen(const char *)</div></div> <div class="ttc" id="bignum_8c_html_af92e1ed73d87370a6377d5dfea7398c6"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af92e1ed73d87370a6377d5dfea7398c6">rb_big_bit_length</a></div><div class="ttdeci">static VALUE rb_big_bit_length(VALUE big)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06999">bignum.c:6999</a></div></div> <div class="ttc" id="structbig__div__struct_html_ac6a92fddcc37796829938ede6ea050cc"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html#ac6a92fddcc37796829938ede6ea050cc">big_div_struct::yds</a></div><div class="ttdeci">BDIGIT * yds</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02520">bignum.c:2520</a></div></div> <div class="ttc" id="bignum_8c_html_a15937b3dd9487879cf4dc0617e991984"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a15937b3dd9487879cf4dc0617e991984">bary_mul_toom3_start</a></div><div class="ttdeci">static mulfunc_t bary_mul_toom3_start</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00144">bignum.c:144</a></div></div> <div class="ttc" id="bignum_8c_html_a407e6d96f7df19d90a402b53ad328f79"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a407e6d96f7df19d90a402b53ad328f79">POW2_P</a></div><div class="ttdeci">#define POW2_P(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00072">bignum.c:72</a></div></div> <div class="ttc" id="structbig__div__struct_html_a31f53f81bca8f1059e39877a91c98134"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html#a31f53f81bca8f1059e39877a91c98134">big_div_struct::zds</a></div><div class="ttdeci">BDIGIT * zds</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02520">bignum.c:2520</a></div></div> <div class="ttc" id="intern_8h_html_af6cfddcc062ec18339fdfaf0a960b371"><div class="ttname"><a href="../../db/d2e/intern_8h.html#af6cfddcc062ec18339fdfaf0a960b371">INTEGER_PACK_LSWORD_FIRST</a></div><div class="ttdeci">#define INTEGER_PACK_LSWORD_FIRST</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00143">intern.h:143</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a1e9518f6a85315c95ed1a7530e6feee7"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a1e9518f6a85315c95ed1a7530e6feee7">RBIGNUM_EMBED_LEN_MASK</a></div><div class="ttdeci">#define RBIGNUM_EMBED_LEN_MASK</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01101">ruby.h:1101</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a877c38180d23c5447d976c70dda89d69"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a></div><div class="ttdeci">#define NUM2INT(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00630">ruby.h:630</a></div></div> <div class="ttc" id="bignum_8c_html_a5945ebc437c1efdd9023dd7e3a4498ad"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5945ebc437c1efdd9023dd7e3a4498ad">integer_pack_loop_setup</a></div><div class="ttdeci">static void integer_pack_loop_setup(size_t numwords, size_t wordsize, size_t nails, int flags, size_t *word_num_fullbytes_ret, int *word_num_partialbits_ret, size_t *word_start_ret, ssize_t *word_step_ret, size_t *word_last_ret, size_t *byte_start_ret, int *byte_step_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00523">bignum.c:523</a></div></div> <div class="ttc" id="encoding_8c_html_ad43c3812e6d13e0518d9f8b8f463ffcf"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a></div><div class="ttdeci">int count</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00048">encoding.c:48</a></div></div> <div class="ttc" id="bignum_8c_html_a656cb61daf78ef71ac1d1ea05b277d7c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a656cb61daf78ef71ac1d1ea05b277d7c">BIGRAD</a></div><div class="ttdeci">#define BIGRAD</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00076">bignum.c:76</a></div></div> <div class="ttc" id="bignum_8c_html_a6eee2a4a6020c2e199ffd511bccdc8dd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6eee2a4a6020c2e199ffd511bccdc8dd">rb_big2ulong</a></div><div class="ttdeci">VALUE rb_big2ulong(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05084">bignum.c:5084</a></div></div> <div class="ttc" id="bignum_8c_html_a2501a5fd9af709daa897ef5aefbf0e5e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a2501a5fd9af709daa897ef5aefbf0e5e">big2str_base_poweroftwo</a></div><div class="ttdeci">static VALUE big2str_base_poweroftwo(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04778">bignum.c:4778</a></div></div> <div class="ttc" id="bignum_8c_html_ab4bdb98cb5bf78165468ac02cd583696"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ab4bdb98cb5bf78165468ac02cd583696">rb_big_realloc</a></div><div class="ttdeci">static void rb_big_realloc(VALUE big, long len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02938">bignum.c:2938</a></div></div> <div class="ttc" id="structbig2str__struct_html_a2c0ae7f03eb4f95f2bf9bbbd53ba74b6"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#a2c0ae7f03eb4f95f2bf9bbbd53ba74b6">big2str_struct::result</a></div><div class="ttdeci">VALUE result</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04602">bignum.c:4602</a></div></div> <div class="ttc" id="bignum_8c_html_a1f94180a8f23e1c629f236e95c227328"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a1f94180a8f23e1c629f236e95c227328">absint_numwords_small</a></div><div class="ttdeci">static size_t absint_numwords_small(size_t numbytes, int nlz_bits_in_msbyte, size_t word_numbits, size_t *nlz_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03278">bignum.c:3278</a></div></div> <div class="ttc" id="bignum_8c_html_a8edf3360688fdbf0544b3bfe86090484"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a8edf3360688fdbf0544b3bfe86090484">bigdivrem_single1</a></div><div class="ttdeci">static BDIGIT bigdivrem_single1(BDIGIT *qds, const BDIGIT *xds, size_t xn, BDIGIT x_higher_bdigit, BDIGIT y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02567">bignum.c:2567</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html">ruby.h</a></div></div> <div class="ttc" id="bignum_8c_html_a1ab69c5bb5c4590960829a4d1c4c3a29"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a1ab69c5bb5c4590960829a4d1c4c3a29">bary_addc</a></div><div class="ttdeci">static int bary_addc(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, int carry)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01376">bignum.c:1376</a></div></div> <div class="ttc" id="bignum_8c_html_a5abddc95277ae9fc652190608e53e28c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5abddc95277ae9fc652190608e53e28c">KARATSUBA_BALANCED</a></div><div class="ttdeci">#define KARATSUBA_BALANCED(xn, yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00131">bignum.c:131</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aee992d4e37fa85281ccb35f2e855f86f"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aee992d4e37fa85281ccb35f2e855f86f">RBIGNUM</a></div><div class="ttdeci">#define RBIGNUM(obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01128">ruby.h:1128</a></div></div> <div class="ttc" id="intern_8h_html_a99895fce59be905b7c7f0a88bd32fa1f"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a99895fce59be905b7c7f0a88bd32fa1f">rb_usascii_str_new2</a></div><div class="ttdeci">#define rb_usascii_str_new2</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00846">intern.h:846</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad07df58de9895cbc33c10f02540d2d4d"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad07df58de9895cbc33c10f02540d2d4d">CLASS_OF</a></div><div class="ttdeci">#define CLASS_OF(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00440">ruby.h:440</a></div></div> <div class="ttc" id="bignum_8c_html_a95cd4cbf6e72ddc62a85e92607ff7896"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a95cd4cbf6e72ddc62a85e92607ff7896">rb_big_size</a></div><div class="ttdeci">static VALUE rb_big_size(VALUE big)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06962">bignum.c:6962</a></div></div> <div class="ttc" id="bignum_8c_html_a77d827a78a743884bbbac83efd178e4c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a77d827a78a743884bbbac83efd178e4c">bigdivrem1</a></div><div class="ttdeci">static void * bigdivrem1(void *ptr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02525">bignum.c:2525</a></div></div> <div class="ttc" id="bignum_8c_html_ae10fddcb74c0e7aa7a91cf397ec4d9db"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae10fddcb74c0e7aa7a91cf397ec4d9db">BDIGIT_MSB</a></div><div class="ttdeci">#define BDIGIT_MSB(d)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00078">bignum.c:78</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ab1040c5fdcb7a88dca4c25222bf43454"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ab1040c5fdcb7a88dca4c25222bf43454">FIXNUM_MAX</a></div><div class="ttdeci">#define FIXNUM_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00228">ruby.h:228</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aacea3516b33941ce8149098e223a7466"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a></div><div class="ttdeci">#define Qtrue</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00426">ruby.h:426</a></div></div> <div class="ttc" id="bignum_8c_html_ad3ac9992e7f6cc6ce07ea0ee59302aa8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad3ac9992e7f6cc6ce07ea0ee59302aa8">rb_big_pack</a></div><div class="ttdeci">void rb_big_pack(VALUE val, unsigned long *buf, long num_longs)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03199">bignum.c:3199</a></div></div> <div class="ttc" id="bignum_8c_html_a513860078ce7ea09f8802a79db911e4f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a513860078ce7ea09f8802a79db911e4f">big_fdiv</a></div><div class="ttdeci">static VALUE big_fdiv(VALUE x, VALUE y, long ey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06263">bignum.c:6263</a></div></div> <div class="ttc" id="bignum_8c_html_aec387ede0f4c4b8400c9c9ef1a70ebcf"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aec387ede0f4c4b8400c9c9ef1a70ebcf">rb_big_stop</a></div><div class="ttdeci">static void rb_big_stop(void *ptr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02560">bignum.c:2560</a></div></div> <div class="ttc" id="bignum_8c_html_a4cc4dbbd002c4fbf9ff33a491ccb1a6d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4cc4dbbd002c4fbf9ff33a491ccb1a6d">bary_swap</a></div><div class="ttdeci">static void bary_swap(BDIGIT *ds, size_t num_bdigits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00470">bignum.c:470</a></div></div> <div class="ttc" id="bignum_8c_html_a96d717ef03002509bf9e231e57f5ed59"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a96d717ef03002509bf9e231e57f5ed59">dbl2big</a></div><div class="ttdeci">static VALUE dbl2big(double d)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05181">bignum.c:5181</a></div></div> <div class="ttc" id="bignum_8c_html_a9ac7662aa6460f2b4de416f8e33f6cb6"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9ac7662aa6460f2b4de416f8e33f6cb6">BDIGMAX</a></div><div class="ttdeci">#define BDIGMAX</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00082">bignum.c:82</a></div></div> <div class="ttc" id="bignum_8c_html_ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3faf8ad28bdd9af669a14e83bcf5323544f">big_op_le</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05423">bignum.c:5423</a></div></div> <div class="ttc" id="bignum_8c_html_a8f14b025e8bf5b70997841c99f74c03f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a8f14b025e8bf5b70997841c99f74c03f">ruby_digitmap</a></div><div class="ttdeci">const char ruby_digitmap[]</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00036">bignum.c:36</a></div></div> <div class="ttc" id="bignum_8c_html_af94d714d360f504337f1034704863c77"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af94d714d360f504337f1034704863c77">bigdivrem_single</a></div><div class="ttdeci">static BDIGIT bigdivrem_single(BDIGIT *qds, const BDIGIT *xds, size_t xn, BDIGIT y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02592">bignum.c:2592</a></div></div> <div class="ttc" id="bignum_8c_html_ac0793b5f02b87a2eb8a997a655c63446"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac0793b5f02b87a2eb8a997a655c63446">big_lt</a></div><div class="ttdeci">static VALUE big_lt(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05498">bignum.c:5498</a></div></div> <div class="ttc" id="bignum_8c_html_a42d6c491ad6b5a939c9529ef41d2db32"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a42d6c491ad6b5a939c9529ef41d2db32">bary_mul_karatsuba_branch</a></div><div class="ttdeci">static void bary_mul_karatsuba_branch(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02424">bignum.c:2424</a></div></div> <div class="ttc" id="bignum_8c_html_a6db70bfe77172cf5a863c8f7fdb80dda"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6db70bfe77172cf5a863c8f7fdb80dda">str2big_normal</a></div><div class="ttdeci">static VALUE str2big_normal(int sign, const char *digits_start, const char *digits_end, size_t num_bdigits, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03792">bignum.c:3792</a></div></div> <div class="ttc" id="bignum_8c_html_a82a70258b46e56291551f0585d69cce8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a82a70258b46e56291551f0585d69cce8">rb_big_eql</a></div><div class="ttdeci">VALUE rb_big_eql(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05561">bignum.c:5561</a></div></div> <div class="ttc" id="bignum_8c_html_a3996827354a05ef544beeaa557ce38a3"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3996827354a05ef544beeaa557ce38a3">rb_big_plus</a></div><div class="ttdeci">VALUE rb_big_plus(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05867">bignum.c:5867</a></div></div> <div class="ttc" id="bignum_8c_html_a86a7383bb9f99d6e7067a3851226f5c7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a86a7383bb9f99d6e7067a3851226f5c7">RBIGNUM_SET_LEN</a></div><div class="ttdeci">#define RBIGNUM_SET_LEN(b, l)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02930">bignum.c:2930</a></div></div> <div class="ttc" id="bignum_8c_html_aa789cbec5f248ea8ed2e99ceb14951f7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa789cbec5f248ea8ed2e99ceb14951f7">bary_divmod_branch</a></div><div class="ttdeci">static void bary_divmod_branch(BDIGIT *qds, size_t qn, BDIGIT *rds, size_t rn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02814">bignum.c:2814</a></div></div> <div class="ttc" id="bignum_8c_html_aeb3d9927f1537ca972cadce1d6443e7e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aeb3d9927f1537ca972cadce1d6443e7e">rb_big_mul_normal</a></div><div class="ttdeci">VALUE rb_big_mul_normal(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01540">bignum.c:1540</a></div></div> <div class="ttc" id="bignum_8c_html_af22aa67a2e7218e29f7f26ddcc0e8149"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af22aa67a2e7218e29f7f26ddcc0e8149">bigand_int</a></div><div class="ttdeci">static VALUE bigand_int(VALUE x, long xn, BDIGIT hibitsx, long y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06417">bignum.c:6417</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aa5bd957eb3db4bec258cd36a2cafe352"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aa5bd957eb3db4bec258cd36a2cafe352">FIXNUM_MIN</a></div><div class="ttdeci">#define FIXNUM_MIN</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00229">ruby.h:229</a></div></div> <div class="ttc" id="bignum_8c_html_a5c93aa8889d11cf70b9c0e6a694c2953"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5c93aa8889d11cf70b9c0e6a694c2953">rb_big_abs</a></div><div class="ttdeci">static VALUE rb_big_abs(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06940">bignum.c:6940</a></div></div> <div class="ttc" id="error_8c_html_a565ed9d70f4089e1b4a36e9b3381b8c6"><div class="ttname"><a href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a></div><div class="ttdeci">VALUE rb_eTypeError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00548">error.c:548</a></div></div> <div class="ttc" id="intern_8h_html_a1d836f944855e55c11389f482b8f8a62"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a1d836f944855e55c11389f482b8f8a62">rb_must_asciicompat</a></div><div class="ttdeci">void rb_must_asciicompat(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l01579">string.c:1579</a></div></div> <div class="ttc" id="structbig__div__struct_html"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html">big_div_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02518">bignum.c:2518</a></div></div> <div class="ttc" id="structbig2str__struct_html"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html">big2str_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04597">bignum.c:4597</a></div></div> <div class="ttc" id="bignum_8c_html_a989c50eeeac6a2287d0e7448f6eea00c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a989c50eeeac6a2287d0e7448f6eea00c">bignew</a></div><div class="ttdeci">#define bignew(len, sign)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00115">bignum.c:115</a></div></div> <div class="ttc" id="bignum_8c_html_a3623de8f327057893f9936a08866101f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3623de8f327057893f9936a08866101f">FILL_DD</a></div><div class="ttdeci">#define FILL_DD</div></div> <div class="ttc" id="bignum_8c_html_adfa4c22f88d1614ccd5a3cd865f2947f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#adfa4c22f88d1614ccd5a3cd865f2947f">bary_cmp</a></div><div class="ttdeci">static int bary_cmp(const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00381">bignum.c:381</a></div></div> <div class="ttc" id="bignum_8c_html_a082701a945ac77f49359d56d745fde21"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a082701a945ac77f49359d56d745fde21">big_shift2</a></div><div class="ttdeci">static VALUE big_shift2(VALUE x, int lshift_p, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04434">bignum.c:4434</a></div></div> <div class="ttc" id="intern_8h_html_a467461650cee651125cdac471160b9cd"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a467461650cee651125cdac471160b9cd">rb_memhash</a></div><div class="ttdeci">st_index_t rb_memhash(const void *ptr, long len)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/de5/random_8c_source.html#l01302">random.c:1302</a></div></div> <div class="ttc" id="bignum_8c_html_aa96ee397739044dccd46c7a8ee3e2864"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa96ee397739044dccd46c7a8ee3e2864">MAX_BASE36_POWER_TABLE_ENTRIES</a></div><div class="ttdeci">#define MAX_BASE36_POWER_TABLE_ENTRIES</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04482">bignum.c:4482</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a6a973fe624aa9aa9ba0cdeb6792d3187"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a></div><div class="ttdeci">VALUE rb_funcall(VALUE, ID, int,...)</div><div class="ttdoc">Calls a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00781">vm_eval.c:781</a></div></div> <div class="ttc" id="bignum_8c_html_a96a6326d41bc1612171873b3046f1d8c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a96a6326d41bc1612171873b3046f1d8c">rb_str2big_normal</a></div><div class="ttdeci">VALUE rb_str2big_normal(VALUE arg, int base, int badcheck)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04194">bignum.c:4194</a></div></div> <div class="ttc" id="intern_8h_html_a5c5ebfd0e728d29888e769606dec1757"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a5c5ebfd0e728d29888e769606dec1757">rb_str_set_len</a></div><div class="ttdeci">void rb_str_set_len(VALUE, long)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l02007">string.c:2007</a></div></div> <div class="ttc" id="intern_8h_html_a2edc3938446921e0c7466814f0661425"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2edc3938446921e0c7466814f0661425">INTEGER_PACK_NATIVE_BYTE_ORDER</a></div><div class="ttdeci">#define INTEGER_PACK_NATIVE_BYTE_ORDER</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00146">intern.h:146</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae8a44c5a7436466221e0f3859d02420f"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae8a44c5a7436466221e0f3859d02420f">LONG_MIN</a></div><div class="ttdeci">#define LONG_MIN</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00195">ruby.h:195</a></div></div> <div class="ttc" id="bignum_8c_html_a9159c5991b021101e23d94963ce19ddd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9159c5991b021101e23d94963ce19ddd">BARY_DIVMOD</a></div><div class="ttdeci">#define BARY_DIVMOD(q, r, x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00109">bignum.c:109</a></div></div> <div class="ttc" id="bignum_8c_html_a208b018ce6d4eaf11de9043449ed3c82"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a208b018ce6d4eaf11de9043449ed3c82">bigfixize</a></div><div class="ttdeci">static VALUE bigfixize(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03083">bignum.c:3083</a></div></div> <div class="ttc" id="intern_8h_html_ae98f9e6c1a4b5181ca48e36d06b3157b"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ae98f9e6c1a4b5181ca48e36d06b3157b">rb_to_int</a></div><div class="ttdeci">VALUE rb_to_int(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l02700">object.c:2700</a></div></div> <div class="ttc" id="bignum_8c_html_ab89dcf2bcfe7255146042df1d3649c52"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ab89dcf2bcfe7255146042df1d3649c52">rb_big_fdiv</a></div><div class="ttdeci">VALUE rb_big_fdiv(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06321">bignum.c:6321</a></div></div> <div class="ttc" id="error_8c_html_a0f771a2840561f1838169b3d7d4616f3"><div class="ttname"><a href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a></div><div class="ttdeci">void rb_raise(VALUE exc, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l01857">error.c:1857</a></div></div> <div class="ttc" id="bignum_8c_html_aa088bf6ce0031eb077ef00d0f4a31670"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa088bf6ce0031eb077ef00d0f4a31670">rb_integer_float_cmp</a></div><div class="ttdeci">VALUE rb_integer_float_cmp(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05299">bignum.c:5299</a></div></div> <div class="ttc" id="bignum_8c_html_ad1cd32de7999610d81220c14cda394d1"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad1cd32de7999610d81220c14cda394d1">bigxor_int</a></div><div class="ttdeci">static VALUE bigxor_int(VALUE x, long xn, BDIGIT hibitsx, long y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06656">bignum.c:6656</a></div></div> <div class="ttc" id="intern_8h_html_a2c7aba55f7287f5e3aa4bef408df8ab8"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2c7aba55f7287f5e3aa4bef408df8ab8">INTEGER_PACK_LSBYTE_FIRST</a></div><div class="ttdeci">#define INTEGER_PACK_LSBYTE_FIRST</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00145">intern.h:145</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a8aa2ce26d266baf56c9068a693d6073e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a8aa2ce26d266baf56c9068a693d6073e">RB_GC_GUARD</a></div><div class="ttdeci">#define RB_GC_GUARD(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00523">ruby.h:523</a></div></div> <div class="ttc" id="bignum_8c_html_a0ec7083ef8b3aee8b5b157c6d18ea3f4"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0ec7083ef8b3aee8b5b157c6d18ea3f4">rb_big_neg</a></div><div class="ttdeci">static VALUE rb_big_neg(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05600">bignum.c:5600</a></div></div> <div class="ttc" id="bignum_8c_html_a6873647e5c5f457b63152523097e4420"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6873647e5c5f457b63152523097e4420">mulfunc_t</a></div><div class="ttdeci">void() mulfunc_t(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00142">bignum.c:142</a></div></div> <div class="ttc" id="bignum_8c_html_ad7a2844844e2572921285bde0cf2e2cd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad7a2844844e2572921285bde0cf2e2cd">bigadd_int</a></div><div class="ttdeci">static VALUE bigadd_int(VALUE x, long y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05750">bignum.c:5750</a></div></div> <div class="ttc" id="bignum_8c_html_ae6ce75ec60fdbdf4373260bc25fae8dd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6ce75ec60fdbdf4373260bc25fae8dd">Init_Bignum</a></div><div class="ttdeci">void Init_Bignum(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l07090">bignum.c:7090</a></div></div> <div class="ttc" id="bignum_8c_html_a877cf085fe3948f11b0cb7485e2560fe"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a877cf085fe3948f11b0cb7485e2560fe">HOST_BIGENDIAN_P</a></div><div class="ttdeci">#define HOST_BIGENDIAN_P</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00064">bignum.c:64</a></div></div> <div class="ttc" id="bignum_8c_html_ac59eef9ca2780d09b276ec009e5c118d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac59eef9ca2780d09b276ec009e5c118d">bary_zero_p</a></div><div class="ttdeci">static int bary_zero_p(BDIGIT *xds, size_t xn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00431">bignum.c:431</a></div></div> <div class="ttc" id="st_8h_html_ac214e5cdcf0de6a2108b9643e7fc12e0"><div class="ttname"><a href="../../dd/d24/st_8h.html#ac214e5cdcf0de6a2108b9643e7fc12e0">st_index_t</a></div><div class="ttdeci">st_data_t st_index_t</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/d24/st_8h_source.html#l00048">st.h:48</a></div></div> <div class="ttc" id="bignum_8c_html_ad7d1c2410535e73b7dce7e3ed994bcf0"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a></div><div class="ttdeci">double rb_big2dbl(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05269">bignum.c:5269</a></div></div> <div class="ttc" id="bignum_8c_html_af4cab5f578fd9f9377ab3d63c70c4f04"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af4cab5f578fd9f9377ab3d63c70c4f04">power_cache_init</a></div><div class="ttdeci">static void power_cache_init(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04488">bignum.c:4488</a></div></div> <div class="ttc" id="intern_8h_html_a87d49f14b185644cb2ffb174c2335b45"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a87d49f14b185644cb2ffb174c2335b45">rb_complex_raw1</a></div><div class="ttdeci">#define rb_complex_raw1(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00179">intern.h:179</a></div></div> <div class="ttc" id="struct_r_bignum_html"><div class="ttname"><a href="../../d3/d44/struct_r_bignum.html">RBignum</a></div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01081">ruby.h:1081</a></div></div> <div class="ttc" id="zlib_8c_html_ae893baae242001d89c2319ab442fc610"><div class="ttname"><a href="../../db/d74/zlib_8c.html#ae893baae242001d89c2319ab442fc610">VALGRIND_MAKE_MEM_UNDEFINED</a></div><div class="ttdeci">#define VALGRIND_MAKE_MEM_UNDEFINED(p, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d74/zlib_8c_source.html#l00025">zlib.c:25</a></div></div> <div class="ttc" id="bignum_8c_html_a222276a0d1e09e2d328c3a899cc95e06"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a222276a0d1e09e2d328c3a899cc95e06">bary_mul_balance_with_mulfunc</a></div><div class="ttdeci">static void bary_mul_balance_with_mulfunc(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn, mulfunc_t *mulfunc)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01620">bignum.c:1620</a></div></div> <div class="ttc" id="bignum_8c_html_a55db8db3b0dcf17677a89acb561c6574"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a55db8db3b0dcf17677a89acb561c6574">rb_big_resize</a></div><div class="ttdeci">void rb_big_resize(VALUE big, long len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02973">bignum.c:2973</a></div></div> <div class="ttc" id="bignum_8c_html_a6583290ba8fd849d1c5237254ab14e67"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6583290ba8fd849d1c5237254ab14e67">big_le</a></div><div class="ttdeci">static VALUE big_le(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05512">bignum.c:5512</a></div></div> <div class="ttc" id="bignum_8c_html_aa5376ddc40f044463d5d52d5d120e0d0"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa5376ddc40f044463d5d52d5d120e0d0">rb_big_unpack</a></div><div class="ttdeci">VALUE rb_big_unpack(unsigned long *buf, long num_longs)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03207">bignum.c:3207</a></div></div> <div class="ttc" id="bignum_8c_html_a5a6e04f79e77aad0e3ab1190b07bfabd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5a6e04f79e77aad0e3ab1190b07bfabd">rb_big_new</a></div><div class="ttdeci">VALUE rb_big_new(long len, int sign)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02998">bignum.c:2998</a></div></div> <div class="ttc" id="bignum_8c_html_a16bbc3149421b3a7391b135282efd707"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a16bbc3149421b3a7391b135282efd707">U16</a></div><div class="ttdeci">#define U16(a)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00168">bignum.c:168</a></div></div> <div class="ttc" id="bignum_8c_html_afb1ed4e8b16397c7f3503164523a41a7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#afb1ed4e8b16397c7f3503164523a41a7">str2big_poweroftwo</a></div><div class="ttdeci">static VALUE str2big_poweroftwo(int sign, const char *digits_start, const char *digits_end, size_t num_digits, int bits_per_digit)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03751">bignum.c:3751</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_acf2fcf97dcf9c7c35452730eb3e2aeb2"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#acf2fcf97dcf9c7c35452730eb3e2aeb2">FIXNUM_P</a></div><div class="ttdeci">#define FIXNUM_P(f)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00347">ruby.h:347</a></div></div> <div class="ttc" id="bignum_8c_html_ac670fe1426f00dce52bebb033c85554e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac670fe1426f00dce52bebb033c85554e">big_fdiv_int</a></div><div class="ttdeci">static VALUE big_fdiv_int(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06288">bignum.c:6288</a></div></div> <div class="ttc" id="bignum_8c_html_a178460e9f3ea7ee183fe951123a08a50"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a178460e9f3ea7ee183fe951123a08a50">rb_cmpint</a></div><div class="ttdeci">int rb_cmpint(VALUE val, VALUE a, VALUE b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02909">bignum.c:2909</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a6a6d9788cc0b18d6a01bf6f7b84500d9"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a6a6d9788cc0b18d6a01bf6f7b84500d9">PRI_SIZE_PREFIX</a></div><div class="ttdeci">#define PRI_SIZE_PREFIX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00170">ruby.h:170</a></div></div> <div class="ttc" id="bignum_8c_html_a59e205a3fd1bc09ef000a92ef2c189b6"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a59e205a3fd1bc09ef000a92ef2c189b6">bary_add_one</a></div><div class="ttdeci">static int bary_add_one(BDIGIT *ds, size_t n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01428">bignum.c:1428</a></div></div> <div class="ttc" id="intern_8h_html_a514248a396e8910d80016bc5d3785a81"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a514248a396e8910d80016bc5d3785a81">rb_fix2str</a></div><div class="ttdeci">VALUE rb_fix2str(VALUE, int)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l02653">numeric.c:2653</a></div></div> <div class="ttc" id="bignum_8c_html_a032eeb434262dd121fea1c51fa0613c9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a032eeb434262dd121fea1c51fa0613c9">big_rshift</a></div><div class="ttdeci">static VALUE big_rshift(VALUE x, unsigned long shift)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04475">bignum.c:4475</a></div></div> <div class="ttc" id="intern_8h_html_aa1441e3f0ffb0fd5e6e9aaa75295630d"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aa1441e3f0ffb0fd5e6e9aaa75295630d">INTEGER_PACK_2COMP</a></div><div class="ttdeci">#define INTEGER_PACK_2COMP</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00147">intern.h:147</a></div></div> <div class="ttc" id="bignum_8c_html_a1c6049ab714a0cbeb6fb43a36a882556"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a1c6049ab714a0cbeb6fb43a36a882556">bary_mul_toom3_branch</a></div><div class="ttdeci">static void bary_mul_toom3_branch(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02463">bignum.c:2463</a></div></div> <div class="ttc" id="error_8c_html_a5211161e80760c30e2e009ae0bee7be8"><div class="ttname"><a href="../../db/dcc/error_8c.html#a5211161e80760c30e2e009ae0bee7be8">rb_eRangeError</a></div><div class="ttdeci">VALUE rb_eRangeError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00552">error.c:552</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9b4f42ada717bfbe7a78830639476aed"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9b4f42ada717bfbe7a78830639476aed">rb_obj_classname</a></div><div class="ttdeci">const char * rb_obj_classname(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l00406">variable.c:406</a></div></div> <div class="ttc" id="sha2_8h_html_aba7bc1797add20fe3efdf37ced1182c5"><div class="ttname"><a href="../../db/d4d/sha2_8h.html#aba7bc1797add20fe3efdf37ced1182c5">uint8_t</a></div><div class="ttdeci">unsigned char uint8_t</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d4d/sha2_8h_source.html#l00100">sha2.h:100</a></div></div> <div class="ttc" id="bignum_8c_html_a91cc142dc6d521f1734348f40bf5d4cb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a91cc142dc6d521f1734348f40bf5d4cb">bary_unpack_internal</a></div><div class="ttdeci">static int bary_unpack_internal(BDIGIT *bdigits, size_t num_bdigits, const void *words, size_t numwords, size_t wordsize, size_t nails, int flags, int nlp_bits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01081">bignum.c:1081</a></div></div> <div class="ttc" id="bignum_8c_html_a97536717ae75cf6534342c05e72f35be"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a97536717ae75cf6534342c05e72f35be">FILL_LOWBITS</a></div><div class="ttdeci">#define FILL_LOWBITS(d, numbits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00071">bignum.c:71</a></div></div> <div class="ttc" id="bignum_8c_html_a7cb3b23ce9950ee59046650d5c5971bc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7cb3b23ce9950ee59046650d5c5971bc">rb_big_aref</a></div><div class="ttdeci">static VALUE rb_big_aref(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06847">bignum.c:6847</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a116f0851dec0d74b238008c40e23e783"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a116f0851dec0d74b238008c40e23e783">NEWOBJ_OF</a></div><div class="ttdeci">#define NEWOBJ_OF(obj, type, klass, flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00694">ruby.h:694</a></div></div> <div class="ttc" id="bignum_8c_html_a4f08843e5ca09928e87c98ce46db02b8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4f08843e5ca09928e87c98ce46db02b8">rb_absint_singlebit_p</a></div><div class="ttdeci">int rb_absint_singlebit_p(VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03430">bignum.c:3430</a></div></div> <div class="ttc" id="bignum_8c_html_a16fa218f374c607d043c554d02f95190"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a16fa218f374c607d043c554d02f95190">bary_divmod_normal</a></div><div class="ttdeci">static void bary_divmod_normal(BDIGIT *qds, size_t qn, BDIGIT *rds, size_t rn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02637">bignum.c:2637</a></div></div> <div class="ttc" id="bignum_8c_html_a74874da3fd3e0fdee6bc4da800924595"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a74874da3fd3e0fdee6bc4da800924595">rb_big_divide</a></div><div class="ttdeci">static VALUE rb_big_divide(VALUE x, VALUE y, ID op)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06124">bignum.c:6124</a></div></div> <div class="ttc" id="bignum_8c_html_ae6b2c04d48aa5cf4aa0956b3e497c6f2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6b2c04d48aa5cf4aa0956b3e497c6f2">maxpow_in_bdigit_dbl</a></div><div class="ttdeci">static BDIGIT_DBL maxpow_in_bdigit_dbl(int base, int *exp_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00325">bignum.c:325</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ab1d19f87c12c61fe8c0048c1f81055c6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ab1d19f87c12c61fe8c0048c1f81055c6">POSFIXABLE</a></div><div class="ttdeci">#define POSFIXABLE(f)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00348">ruby.h:348</a></div></div> <div class="ttc" id="bignum_8c_html_a526835b7dfb6ff67195413c09c7672d2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a526835b7dfb6ff67195413c09c7672d2">rb_big2ulong_pack</a></div><div class="ttdeci">VALUE rb_big2ulong_pack(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05075">bignum.c:5075</a></div></div> <div class="ttc" id="bignum_8c_html_abbe46ceec250a75ee9e1c53c26b05020"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#abbe46ceec250a75ee9e1c53c26b05020">rb_big_divmod</a></div><div class="ttdeci">VALUE rb_big_divmod(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06237">bignum.c:6237</a></div></div> <div class="ttc" id="time_8c_html_a83f11f6624f6648aa502330ab8408073"><div class="ttname"><a href="../../df/d73/time_8c.html#a83f11f6624f6648aa502330ab8408073">neg</a></div><div class="ttdeci">#define neg(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d73/time_8c_source.html#l00171">time.c:171</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a56d620b94b668ed7665d1616b2c54e48"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a56d620b94b668ed7665d1616b2c54e48">MEMZERO</a></div><div class="ttdeci">#define MEMZERO(p, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01359">ruby.h:1359</a></div></div> <div class="ttc" id="bignum_8c_html_a9a10e0cfeee97e0668bcd9de1f16c018"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9a10e0cfeee97e0668bcd9de1f16c018">bary_subb</a></div><div class="ttdeci">static int bary_subb(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, int borrow)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01313">bignum.c:1313</a></div></div> <div class="ttc" id="sha2_8h_html_aaa5d1cd013383c889537491c3cfd9aad"><div class="ttname"><a href="../../db/d4d/sha2_8h.html#aaa5d1cd013383c889537491c3cfd9aad">uint64_t</a></div><div class="ttdeci">unsigned long long uint64_t</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d4d/sha2_8h_source.html#l00102">sha2.h:102</a></div></div> <div class="ttc" id="bignum_8c_html_adcc3f078ed2c9123ce5f79a5e2609005"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#adcc3f078ed2c9123ce5f79a5e2609005">rb_big_mul_balance</a></div><div class="ttdeci">VALUE rb_big_mul_balance(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01668">bignum.c:1668</a></div></div> <div class="ttc" id="bignum_8c_html_a11b6a69f86842cb7a220bd51c00e045a"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a11b6a69f86842cb7a220bd51c00e045a">base36_numdigits_cache</a></div><div class="ttdeci">static size_t base36_numdigits_cache[35][MAX_BASE36_POWER_TABLE_ENTRIES]</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04485">bignum.c:4485</a></div></div> <div class="ttc" id="thread_8h_html"><div class="ttname"><a href="../../db/dd5/thread_8h.html">thread.h</a></div></div> <div class="ttc" id="date__strftime_8c_html_acde9d531cfa6d2dc070c51539f0b6fdf"><div class="ttname"><a href="../../d1/d6f/date__strftime_8c.html#acde9d531cfa6d2dc070c51539f0b6fdf">div</a></div><div class="ttdeci">#define div(x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d6f/date__strftime_8c_source.html#l00027">date_strftime.c:27</a></div></div> <div class="ttc" id="bignum_8c_html_a363cf15310be0b36820ece4965692ac4"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a363cf15310be0b36820ece4965692ac4">rb_big_sq_fast</a></div><div class="ttdeci">VALUE rb_big_sq_fast(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01609">bignum.c:1609</a></div></div> <div class="ttc" id="intern_8h_html_a66db3a21c6f7ef77c281924c9303c8bc"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a66db3a21c6f7ef77c281924c9303c8bc">rb_rational_raw1</a></div><div class="ttdeci">#define rb_rational_raw1(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00167">intern.h:167</a></div></div> <div class="ttc" id="bignum_8c_html_a7cf59f449a9f516aa7d781db3357dd94"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7cf59f449a9f516aa7d781db3357dd94">rb_dbl2big</a></div><div class="ttdeci">VALUE rb_dbl2big(double d)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05213">bignum.c:5213</a></div></div> <div class="ttc" id="bignum_8c_html_ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa9a0d9245f74c2b7b36513309e949eaf5">big_op_lt</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05422">bignum.c:5422</a></div></div> <div class="ttc" id="bignum_8c_html_a80d84acdef43f8c683c020619750cfe1"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a80d84acdef43f8c683c020619750cfe1">rb_big_eq</a></div><div class="ttdeci">VALUE rb_big_eq(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05529">bignum.c:5529</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a79041aa2bc7439c11906a86f82a52eb6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a></div><div class="ttdeci">#define ALLOC_N(type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01341">ruby.h:1341</a></div></div> <div class="ttc" id="bignum_8c_html_a02d562fc66e90d37c0ed571aaaf21f91"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a02d562fc66e90d37c0ed571aaaf21f91">RB_BIGNUM_TYPE_P</a></div><div class="ttdeci">#define RB_BIGNUM_TYPE_P(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00033">bignum.c:33</a></div></div> <div class="ttc" id="bignum_8c_html_afa8250822bd205430d71b6e1955bc952"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#afa8250822bd205430d71b6e1955bc952">bary_mul</a></div><div class="ttdeci">static void bary_mul(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02488">bignum.c:2488</a></div></div> <div class="ttc" id="bignum_8c_html_a57e999912fb012ca700086c9135a96f2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a57e999912fb012ca700086c9135a96f2">big2str_alloc</a></div><div class="ttdeci">static void big2str_alloc(struct big2str_struct *b2s, size_t len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04607">bignum.c:4607</a></div></div> <div class="ttc" id="vm__exec_8c_html"><div class="ttname"><a href="../../df/d38/vm__exec_8c.html">val</a></div><div class="ttdeci">#define val</div></div> <div class="ttc" id="ruby_2ruby_8h_html_a484dc4460a3e6eb2958238ab4559190c"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a484dc4460a3e6eb2958238ab4559190c">RBIGNUM_POSITIVE_P</a></div><div class="ttdeci">#define RBIGNUM_POSITIVE_P(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01097">ruby.h:1097</a></div></div> <div class="ttc" id="bignum_8c_html_a3c364897a7c673caf46ccdbf62536a07"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3c364897a7c673caf46ccdbf62536a07">rb_str_to_inum</a></div><div class="ttdeci">VALUE rb_str_to_inum(VALUE str, int base, int badcheck)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04129">bignum.c:4129</a></div></div> <div class="ttc" id="bignum_8c_html_a23e46035be6ecf9cb9499e33b9797647"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a23e46035be6ecf9cb9499e33b9797647">rb_big2str_generic</a></div><div class="ttdeci">VALUE rb_big2str_generic(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04892">bignum.c:4892</a></div></div> <div class="ttc" id="bignum_8c_html_a4f8722c6e2a4edcffbc455d1af6ced2b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4f8722c6e2a4edcffbc455d1af6ced2b">bary_add</a></div><div class="ttdeci">static int bary_add(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01422">bignum.c:1422</a></div></div> <div class="ttc" id="bignum_8c_html_a3132e89871668272efaa40899aec244d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3132e89871668272efaa40899aec244d">BIGSIZE</a></div><div class="ttdeci">#define BIGSIZE(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00096">bignum.c:96</a></div></div> <div class="ttc" id="bignum_8c_html_acdda97631eede27cd79055c677752b0c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#acdda97631eede27cd79055c677752b0c">big_op</a></div><div class="ttdeci">static VALUE big_op(VALUE x, VALUE y, enum big_op_t op)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05427">bignum.c:5427</a></div></div> <div class="ttc" id="bignum_8c_html_a709646dcfd8cfd6aba1c9805c7690927"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a709646dcfd8cfd6aba1c9805c7690927">rb_big_cmp</a></div><div class="ttdeci">VALUE rb_big_cmp(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05393">bignum.c:5393</a></div></div> <div class="ttc" id="vm__debug_8h_html_a08a47aff6867e5ae146382e66d2cc26b"><div class="ttname"><a href="../../d5/d8c/vm__debug_8h.html#a08a47aff6867e5ae146382e66d2cc26b">dp</a></div><div class="ttdeci">#define dp(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d8c/vm__debug_8h_source.html#l00021">vm_debug.h:21</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a1da69daf7d0b9dfe25ed7bd614bab9c7"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a1da69daf7d0b9dfe25ed7bd614bab9c7">STRTOUL</a></div><div class="ttdeci">#define STRTOUL(str, endptr, base)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01795">ruby.h:1795</a></div></div> <div class="ttc" id="bignum_8c_html_af07b703574484fb572c0cc3408173a38"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af07b703574484fb572c0cc3408173a38">RBIGNUM_SET_POSITIVE_SIGN</a></div><div class="ttdeci">#define RBIGNUM_SET_POSITIVE_SIGN(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00113">bignum.c:113</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a5625e120c7e075fe2e1ce77caa598951"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a5625e120c7e075fe2e1ce77caa598951">RBIGNUM_EMBED_LEN_SHIFT</a></div><div class="ttdeci">#define RBIGNUM_EMBED_LEN_SHIFT</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01102">ruby.h:1102</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a4832bad8845a35fc50f7a160901854a1"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a></div><div class="ttdeci">#define NIL_P(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00438">ruby.h:438</a></div></div> <div class="ttc" id="group__class_html_ga15d068dbe88a3bab3700b03bebb7fbac"><div class="ttname"><a href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a></div><div class="ttdeci">VALUE rb_define_class(const char *name, VALUE super)</div><div class="ttdoc">Defines a top-level class. </div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l00611">class.c:611</a></div></div> <div class="ttc" id="bignum_8c_html_adf952ae81d8afbc4cdc10c157c8b51d5"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#adf952ae81d8afbc4cdc10c157c8b51d5">SIZEOF_BDIGIT_DBL</a></div><div class="ttdeci">#define SIZEOF_BDIGIT_DBL</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00040">bignum.c:40</a></div></div> <div class="ttc" id="bigdecimal_8h_html_a5902b03e516c67fa93228f1b45fef7a1"><div class="ttname"><a href="../../d0/da5/bigdecimal_8h.html#a5902b03e516c67fa93228f1b45fef7a1">BDIGIT_DBL_SIGNED</a></div><div class="ttdeci">#define BDIGIT_DBL_SIGNED</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/da5/bigdecimal_8h_source.html#l00042">bigdecimal.h:42</a></div></div> <div class="ttc" id="bignum_8c_html_ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa7e82ad9004632df1cfe52968ae5fcf01">big_op_ge</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05421">bignum.c:5421</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a861b20872f7d24f1c5f2da5261037322"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a></div><div class="ttdeci">void rb_define_const(VALUE, const char *, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l02228">variable.c:2228</a></div></div> <div class="ttc" id="bignum_8c_html_a45e76bc03909ecc8d554ae26aa389e4a"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a45e76bc03909ecc8d554ae26aa389e4a">bary_unpack</a></div><div class="ttdeci">static void bary_unpack(BDIGIT *bdigits, size_t num_bdigits, const void *words, size_t numwords, size_t wordsize, size_t nails, int flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01281">bignum.c:1281</a></div></div> <div class="ttc" id="bignum_8c_html_a86d7a6978e740ed48d2cb6d9bbd84199"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a86d7a6978e740ed48d2cb6d9bbd84199">bary_mul_normal</a></div><div class="ttdeci">static void bary_mul_normal(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01527">bignum.c:1527</a></div></div> <div class="ttc" id="bignum_8c_html_a75a305e2eb35e9b4a4377470a763db33"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a75a305e2eb35e9b4a4377470a763db33">bigmul0</a></div><div class="ttdeci">static VALUE bigmul0(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05963">bignum.c:5963</a></div></div> <div class="ttc" id="isinf_8c_html_a94762b8530d28b85e67db02b97f3ee37"><div class="ttname"><a href="../../d9/d89/isinf_8c.html#a94762b8530d28b85e67db02b97f3ee37">one</a></div><div class="ttdeci">static double one(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d89/isinf_8c_source.html#l00052">isinf.c:52</a></div></div> <div class="ttc" id="bignum_8c_html_a69923e091a3b62326a17d4d4f1fdf088"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a69923e091a3b62326a17d4d4f1fdf088">integer_pack_take_lowbits</a></div><div class="ttdeci">static BDIGIT_DBL integer_pack_take_lowbits(int n, BDIGIT_DBL *ddp, int *numbits_in_dd_p)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00601">bignum.c:601</a></div></div> <div class="ttc" id="ruby_8c_html_ad1447518f4372828b8435ae82e48499e"><div class="ttname"><a href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a></div><div class="ttdeci">int argc</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d77/ruby_8c_source.html#l00131">ruby.c:131</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afa349daf04364678d29c61ae05b277da"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afa349daf04364678d29c61ae05b277da">RBIGNUM_LEN</a></div><div class="ttdeci">#define RBIGNUM_LEN(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01103">ruby.h:1103</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aba0717d2689eb68797421a02ab9295c6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a></div><div class="ttdeci">#define Qfalse</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00425">ruby.h:425</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aa2fd9cb81f5d1422607583906d085a11"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aa2fd9cb81f5d1422607583906d085a11">ALLOCV_N</a></div><div class="ttdeci">#define ALLOCV_N(type, v, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01356">ruby.h:1356</a></div></div> <div class="ttc" id="bignum_8c_html_ad1c4e8621223b7ba4fb0f400d5bfa312"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad1c4e8621223b7ba4fb0f400d5bfa312">BIGZEROP</a></div><div class="ttdeci">#define BIGZEROP(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00093">bignum.c:93</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a41ac74a27dd1eadc2ca86d10590f2163"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a></div><div class="ttdeci">#define T_BIGNUM</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00487">ruby.h:487</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a50fece4db74f09568b2938db583c5655"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a50fece4db74f09568b2938db583c5655">LONG_MAX</a></div><div class="ttdeci">#define LONG_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00191">ruby.h:191</a></div></div> <div class="ttc" id="gc_8c_html_adc7efe8997f04b5c275d7e7aed9169e3"><div class="ttname"><a href="../../d8/d16/gc_8c.html#adc7efe8997f04b5c275d7e7aed9169e3">rb_gc_register_mark_object</a></div><div class="ttdeci">void rb_gc_register_mark_object(VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d16/gc_8c_source.html#l04923">gc.c:4923</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a04ab67335215e8362c63ed27ae2d1c40"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a04ab67335215e8362c63ed27ae2d1c40">MEMCPY</a></div><div class="ttdeci">#define MEMCPY(p1, p2, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01360">ruby.h:1360</a></div></div> <div class="ttc" id="missing_8h_html_ae7a5ae88899707625ed6ab2ec7045583"><div class="ttname"><a href="../../d3/d90/missing_8h.html#ae7a5ae88899707625ed6ab2ec7045583">isinf</a></div><div class="ttdeci">RUBY_EXTERN int isinf(double)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d89/isinf_8c_source.html#l00056">isinf.c:56</a></div></div> <div class="ttc" id="bignum_8c_html_a2e10eae0952b99986760a3a56ac3245a"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a2e10eae0952b99986760a3a56ac3245a">rb_big2long</a></div><div class="ttdeci">SIGNED_VALUE rb_big2long(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05101">bignum.c:5101</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a7ae8fa209abf837905d53c1c4be7c75d"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a7ae8fa209abf837905d53c1c4be7c75d">OBJ_FREEZE</a></div><div class="ttdeci">#define OBJ_FREEZE(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01194">ruby.h:1194</a></div></div> <div class="ttc" id="numeric_8c_html_a049f5095b504bae18cac74150415f2de"><div class="ttname"><a href="../../d6/d27/numeric_8c.html#a049f5095b504bae18cac74150415f2de">rb_num_zerodiv</a></div><div class="ttdeci">void rb_num_zerodiv(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00125">numeric.c:125</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a13424d6f6efe4c7cf2f032744a04e51c"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a13424d6f6efe4c7cf2f032744a04e51c">ALLOCV_END</a></div><div class="ttdeci">#define ALLOCV_END(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01357">ruby.h:1357</a></div></div> <div class="ttc" id="bignum_8c_html_a5cd9431ab7853e3adb7bf49cad4460f2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5cd9431ab7853e3adb7bf49cad4460f2">rb_big2str</a></div><div class="ttdeci">VALUE rb_big2str(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05014">bignum.c:5014</a></div></div> <div class="ttc" id="bignum_8c_html_ae009a19bd520e46eedfa5f0cd544918f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae009a19bd520e46eedfa5f0cd544918f">bary_sparse_p</a></div><div class="ttdeci">static int bary_sparse_p(const BDIGIT *ds, size_t n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02314">bignum.c:2314</a></div></div> <div class="ttc" id="thread_8h_html_ad21de1b2d50de18b428dba6bd45b1c50"><div class="ttname"><a href="../../db/dd5/thread_8h.html#ad21de1b2d50de18b428dba6bd45b1c50">rb_thread_call_without_gvl</a></div><div class="ttdeci">void * rb_thread_call_without_gvl(void *(*func)(void *), void *data1, rb_unblock_function_t *ubf, void *data2)</div></div> <div class="ttc" id="bignum_8c_html_a6ba61de4be3532c71c2541ac82454fdb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6ba61de4be3532c71c2541ac82454fdb">bigor_int</a></div><div class="ttdeci">static VALUE bigor_int(VALUE x, long xn, BDIGIT hibitsx, long y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06530">bignum.c:6530</a></div></div> <div class="ttc" id="etc_8c_html_a4ac8fee05a285361c33a2b0d9c2d555c"><div class="ttname"><a href="../../d5/d97/etc_8c.html#a4ac8fee05a285361c33a2b0d9c2d555c">numberof</a></div><div class="ttdeci">#define numberof(array)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d97/etc_8c_source.html#l00602">etc.c:602</a></div></div> <div class="ttc" id="bignum_8c_html_a4f623845f4719716b70e4025508657fc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4f623845f4719716b70e4025508657fc">rb_integer_unpack</a></div><div class="ttdeci">VALUE rb_integer_unpack(const void *words, size_t numwords, size_t wordsize, size_t nails, int flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03617">bignum.c:3617</a></div></div> <div class="ttc" id="bignum_8c_html_a84c8b311de8dd80e5325868a40501ebc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a84c8b311de8dd80e5325868a40501ebc">bigsub_int</a></div><div class="ttdeci">static VALUE bigsub_int(VALUE x, long y0)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05653">bignum.c:5653</a></div></div> <div class="ttc" id="intern_8h_html_a0a133856edb99f69eae3cb5a9e275ac9"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a0a133856edb99f69eae3cb5a9e275ac9">rb_str_resize</a></div><div class="ttdeci">VALUE rb_str_resize(VALUE, long)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l02024">string.c:2024</a></div></div> <div class="ttc" id="intern_8h_html_a98ac4e7ef00985b7e5a3deba1caea289"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a98ac4e7ef00985b7e5a3deba1caea289">rb_num_coerce_bit</a></div><div class="ttdeci">VALUE rb_num_coerce_bit(VALUE, VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l03319">numeric.c:3319</a></div></div> <div class="ttc" id="bignum_8c_html_a10824ba664c6cf3e0e560fcfe6a1abfe"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a10824ba664c6cf3e0e560fcfe6a1abfe">big2str_generic</a></div><div class="ttdeci">static VALUE big2str_generic(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04815">bignum.c:4815</a></div></div> <div class="ttc" id="group__defmethod_html_ga9ee2c97671d010bcb7a27614ab28bba7"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a></div><div class="ttdeci">void rb_define_alias(VALUE klass, const char *name1, const char *name2)</div><div class="ttdoc">Defines an alias of a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01688">class.c:1688</a></div></div> <div class="ttc" id="bignum_8c_html_a143ebdf019c4659ad08b313052a294f4"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a143ebdf019c4659ad08b313052a294f4">rb_big_minus</a></div><div class="ttdeci">VALUE rb_big_minus(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05903">bignum.c:5903</a></div></div> <div class="ttc" id="bignum_8c_html_a651ff545cd4ef2c8ba0d33a0c860882c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a651ff545cd4ef2c8ba0d33a0c860882c">BDIGITS_ZERO</a></div><div class="ttdeci">#define BDIGITS_ZERO(ptr, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00117">bignum.c:117</a></div></div> <div class="ttc" id="bignum_8c_html_a608bd1c9d1d6da4baf95633eb21ca662"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a608bd1c9d1d6da4baf95633eb21ca662">GMP_BIG2STR_DIGITS</a></div><div class="ttdeci">#define GMP_BIG2STR_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00139">bignum.c:139</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a0d1c6e4431397f8bd285073af0d98d77"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a></div><div class="ttdeci">#define RSTRING_LEN(str)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00841">ruby.h:841</a></div></div> <div class="ttc" id="bignum_8c_html_ac632decf143c3ce61d8fa4c7f6f43ce8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac632decf143c3ce61d8fa4c7f6f43ce8">rb_big_to_s</a></div><div class="ttdeci">static VALUE rb_big_to_s(int argc, VALUE *argv, VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05034">bignum.c:5034</a></div></div> <div class="ttc" id="structbig2str__struct_html_a812327c200d07c2499e466e3e6b031a6"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#a812327c200d07c2499e466e3e6b031a6">big2str_struct::hbase2</a></div><div class="ttdeci">BDIGIT_DBL hbase2</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04600">bignum.c:4600</a></div></div> <div class="ttc" id="bignum_8c_html_a78c41090d6f177ec133902c871e7228b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a78c41090d6f177ec133902c871e7228b">integer_unpack_push_bits</a></div><div class="ttdeci">static void integer_unpack_push_bits(int data, int numbits, BDIGIT_DBL *ddp, int *numbits_in_dd_p, BDIGIT **dpp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01050">bignum.c:1050</a></div></div> <div class="ttc" id="internal_8h_html_a2d631f7aeba697a935288cce7a04efea"><div class="ttname"><a href="../../db/dde/internal_8h.html#a2d631f7aeba697a935288cce7a04efea">bit_length</a></div><div class="ttdeci">#define bit_length(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dde/internal_8h_source.html#l00236">internal.h:236</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a5160cad2d7d090e4d2e8803f1ba5ee3c"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a5160cad2d7d090e4d2e8803f1ba5ee3c">REALLOC_N</a></div><div class="ttdeci">#define REALLOC_N(var, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01343">ruby.h:1343</a></div></div> <div class="ttc" id="intern_8h_html_a027794599c81c7682cf165ab815eec5c"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a027794599c81c7682cf165ab815eec5c">rb_genrand_ulong_limited</a></div><div class="ttdeci">unsigned long rb_genrand_ulong_limited(unsigned long i)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/de5/random_8c_source.html#l00789">random.c:789</a></div></div> <div class="ttc" id="bignum_8c_html_a8380ed293ebfb7991dfb8e7e4c85e133"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a8380ed293ebfb7991dfb8e7e4c85e133">bary_sub</a></div><div class="ttdeci">static int bary_sub(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01364">bignum.c:1364</a></div></div> <div class="ttc" id="siphash_8c_html_a06c5f8eeca62bb9b7d4c85d43c4f20d9"><div class="ttname"><a href="../../dd/d2d/siphash_8c.html#a06c5f8eeca62bb9b7d4c85d43c4f20d9">lo</a></div><div class="ttdeci">#define lo</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/d2d/siphash_8c_source.html#l00021">siphash.c:21</a></div></div> <div class="ttc" id="util_8h_html"><div class="ttname"><a href="../../d8/d3c/util_8h.html">util.h</a></div></div> <div class="ttc" id="bignum_8c_html_a0d38f300842430033b15cbf25951ea49"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0d38f300842430033b15cbf25951ea49">DBL_BIGDIG</a></div><div class="ttdeci">#define DBL_BIGDIG</div></div> <div class="ttc" id="bignum_8c_html_aea160e452cbeff11d27d263c63889345"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aea160e452cbeff11d27d263c63889345">big_shift3</a></div><div class="ttdeci">static VALUE big_shift3(VALUE x, int lshift_p, size_t shift_numdigits, int shift_numbits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04385">bignum.c:4385</a></div></div> <div class="ttc" id="internal_8h_html_a40f89812fbb971f324be796c9854a590"><div class="ttname"><a href="../../db/dde/internal_8h.html#a40f89812fbb971f324be796c9854a590">swap32</a></div><div class="ttdeci">#define swap32(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dde/internal_8h_source.html#l00089">internal.h:89</a></div></div> <div class="ttc" id="bignum_8c_html_abc18250a1bf9ee93cc6257153ded1ccc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#abc18250a1bf9ee93cc6257153ded1ccc">BARY_ZERO_P</a></div><div class="ttdeci">#define BARY_ZERO_P(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00110">bignum.c:110</a></div></div> <div class="ttc" id="sprintf_8c_html_a05c34a91ab36c6a463c861df47808fae"><div class="ttname"><a href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a></div><div class="ttdeci">VALUE rb_sprintf(const char *format,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d2d/sprintf_8c_source.html#l01250">sprintf.c:1250</a></div></div> <div class="ttc" id="bignum_8c_html_ac951414bf7b52b8ce949e921baf793a8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac951414bf7b52b8ce949e921baf793a8">rb_big_div</a></div><div class="ttdeci">VALUE rb_big_div(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06161">bignum.c:6161</a></div></div> <div class="ttc" id="bignum_8c_html_a53fc55611c7e85d15e505299fea22694"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a53fc55611c7e85d15e505299fea22694">rb_big_idiv</a></div><div class="ttdeci">VALUE rb_big_idiv(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06174">bignum.c:6174</a></div></div> <div class="ttc" id="bignum_8c_html_ae554715ea3772fa4b2af1d9f76c198b7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae554715ea3772fa4b2af1d9f76c198b7">integer_unpack_num_bdigits</a></div><div class="ttdeci">static size_t integer_unpack_num_bdigits(size_t numwords, size_t wordsize, size_t nails, int *nlp_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01028">bignum.c:1028</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aad09de334c9b8c7f717d314b14679e62"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aad09de334c9b8c7f717d314b14679e62">MEMMOVE</a></div><div class="ttdeci">#define MEMMOVE(p1, p2, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01361">ruby.h:1361</a></div></div> <div class="ttc" id="structbig2str__struct_html_aacd01bb352498ba62c3dbf16b8d73c48"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#aacd01bb352498ba62c3dbf16b8d73c48">big2str_struct::negative</a></div><div class="ttdeci">int negative</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04598">bignum.c:4598</a></div></div> <div class="ttc" id="bignum_8c_html_aa99de588906902bc3a4255b72254d9b1"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa99de588906902bc3a4255b72254d9b1">BARY_SUB</a></div><div class="ttdeci">#define BARY_SUB(z, x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00107">bignum.c:107</a></div></div> <div class="ttc" id="bignum_8c_html_af472e31a1f27a51efa568d73b9ebf952"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af472e31a1f27a51efa568d73b9ebf952">bary_neg</a></div><div class="ttdeci">static void bary_neg(BDIGIT *ds, size_t n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00442">bignum.c:442</a></div></div> <div class="ttc" id="bignum_8c_html_a3ab066ccc8e77b1c1a7e0c74acaaa174"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3ab066ccc8e77b1c1a7e0c74acaaa174">rb_big2str_poweroftwo</a></div><div class="ttdeci">VALUE rb_big2str_poweroftwo(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04809">bignum.c:4809</a></div></div> <div class="ttc" id="group__defmethod_html_gaa7bed88640f01bee619f85fda09d28d7"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a></div><div class="ttdeci">int rb_scan_args(int argc, const VALUE *argv, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01719">class.c:1719</a></div></div> <div class="ttc" id="bignum_8c_html_a377c12ee77295ab931ad87ee53b2e451"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a377c12ee77295ab931ad87ee53b2e451">integer_pack_fill_dd</a></div><div class="ttdeci">static void integer_pack_fill_dd(BDIGIT **dpp, BDIGIT **dep, BDIGIT_DBL *ddp, int *numbits_in_dd_p)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00588">bignum.c:588</a></div></div> <div class="ttc" id="bignum_8c_html_ad16689892f192aecebbce697c4409d45"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad16689892f192aecebbce697c4409d45">TOOM3_BALANCED</a></div><div class="ttdeci">#define TOOM3_BALANCED(xn, yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00132">bignum.c:132</a></div></div> <div class="ttc" id="bignum_8c_html_a364d0cb01e91a0fc47efecc51430ff0b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a364d0cb01e91a0fc47efecc51430ff0b">bdigitdbl2bary</a></div><div class="ttdeci">static void bdigitdbl2bary(BDIGIT *ds, size_t n, BDIGIT_DBL num)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00372">bignum.c:372</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_ac37f17a60c8b5533aac4840c681f62b8"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a></div><div class="ttdeci">unsigned char buf[MIME_BUF_SIZE]</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l04308">nkf.c:4308</a></div></div> <div class="ttc" id="array_8c_html_af3085ceab406e3f4f4b90f383c440d6a"><div class="ttname"><a href="../../dc/dcc/array_8c.html#af3085ceab406e3f4f4b90f383c440d6a">rb_assoc_new</a></div><div class="ttdeci">VALUE rb_assoc_new(VALUE car, VALUE cdr)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l00620">array.c:620</a></div></div> <div class="ttc" id="internal_8h_html"><div class="ttname"><a href="../../db/dde/internal_8h.html">internal.h</a></div></div> <div class="ttc" id="bignum_8c_html_a3f27de188a3329738f2087ddb3235728"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3f27de188a3329738f2087ddb3235728">INTEGER_PACK_WORDORDER_MASK</a></div><div class="ttdeci">#define INTEGER_PACK_WORDORDER_MASK</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00481">bignum.c:481</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afa5b9137f051ac26d7ccc8824f178233"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a></div><div class="ttdeci">unsigned long ID</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00089">ruby.h:89</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aba03c3c4ff187bbda6c4459e2dc9f6c6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a></div><div class="ttdeci">#define Qnil</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00427">ruby.h:427</a></div></div> <div class="ttc" id="win32_8h_html_a728e973c799f206f0151c8a3bd1e5699"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a728e973c799f206f0151c8a3bd1e5699">uintptr_t</a></div><div class="ttdeci">unsigned int uintptr_t</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00103">win32.h:103</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a827a1fe2e4e61f806d06a1c5284c1029"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a827a1fe2e4e61f806d06a1c5284c1029">RBIGNUM_EMBED_LEN_MAX</a></div><div class="ttdeci">#define RBIGNUM_EMBED_LEN_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01076">ruby.h:1076</a></div></div> <div class="ttc" id="bignum_8c_html_a0c4daa19ce2cb7228764425342e9f98d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0c4daa19ce2cb7228764425342e9f98d">bary_small_lshift</a></div><div class="ttdeci">static BDIGIT bary_small_lshift(BDIGIT *zds, const BDIGIT *xds, size_t n, int shift)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00399">bignum.c:399</a></div></div> <div class="ttc" id="tcltklib_8c_html_ac765329451135abec74c45e1897abf26"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a></div><div class="ttdeci">int type</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00112">tcltklib.c:112</a></div></div> <div class="ttc" id="bignum_8c_html_aea58790d504fe9eb1120b749acddf61b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aea58790d504fe9eb1120b749acddf61b">rb_quad_unpack</a></div><div class="ttdeci">VALUE rb_quad_unpack(const char *buf, int signed_p)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03699">bignum.c:3699</a></div></div> <div class="ttc" id="bignum_8c_html_a26761962ce3cba5c8938c3ad2dff914e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a26761962ce3cba5c8938c3ad2dff914e">GMP_DIV_DIGITS</a></div><div class="ttdeci">#define GMP_DIV_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00138">bignum.c:138</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3c1d4bfc6a81af60bdcb48744c35f760"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="ttdeci">unsigned long VALUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00088">ruby.h:88</a></div></div> <div class="ttc" id="bignum_8c_html_a838287ae9846a01c6af80502216bd9b8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a838287ae9846a01c6af80502216bd9b8">rb_big_mul</a></div><div class="ttdeci">VALUE rb_big_mul(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05997">bignum.c:5997</a></div></div> <div class="ttc" id="bignum_8c_html_a9da7a8836f81825fb67951d7289489d1"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9da7a8836f81825fb67951d7289489d1">BITSPERDIG</a></div><div class="ttdeci">#define BITSPERDIG</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00075">bignum.c:75</a></div></div> <div class="ttc" id="bignum_8c_html_aa8b6d1356e1d76250c63ab6c5d62f5d6"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa8b6d1356e1d76250c63ab6c5d62f5d6">rb_big_remainder</a></div><div class="ttdeci">static VALUE rb_big_remainder(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06214">bignum.c:6214</a></div></div> <div class="ttc" id="nkf_8c_html_a5ea5ac7abf5cce39283e422add1067d5"><div class="ttname"><a href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a></div><div class="ttdeci">static VALUE result</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d90/nkf_8c_source.html#l00040">nkf.c:40</a></div></div> <div class="ttc" id="bignum_8c_html_a565fd78e9fb0cc88d41d6d9d183f574e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a565fd78e9fb0cc88d41d6d9d183f574e">BIGDIVREM_EXTRA_WORDS</a></div><div class="ttdeci">#define BIGDIVREM_EXTRA_WORDS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00101">bignum.c:101</a></div></div> <div class="ttc" id="bignum_8c_html_a529469bea33a70e2b7d996e5286780ad"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a529469bea33a70e2b7d996e5286780ad">U32</a></div><div class="ttdeci">#define U32(a)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00169">bignum.c:169</a></div></div> <div class="ttc" id="bignum_8c_html_a6955c9f6ce263234e0a691a068ad5565"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a6955c9f6ce263234e0a691a068ad5565">big2str_karatsuba</a></div><div class="ttdeci">static void big2str_karatsuba(struct big2str_struct *b2s, BDIGIT *xds, size_t xn, size_t wn, int power_level, size_t taillen)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04655">bignum.c:4655</a></div></div> <div class="ttc" id="bignum_8c_html_ae2580eb3e8a244273edfc42ddec9e12d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae2580eb3e8a244273edfc42ddec9e12d">BDIGITS</a></div><div class="ttdeci">#define BDIGITS(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00074">bignum.c:74</a></div></div> <div class="ttc" id="bignum_8c_html_a7ecc9b03313c487ddc335601c28b1b7f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7ecc9b03313c487ddc335601c28b1b7f">LSHIFTX</a></div><div class="ttdeci">#define LSHIFTX(d, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00069">bignum.c:69</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a1d4c05021aacd8cab989ff60f95ebe2d"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a1d4c05021aacd8cab989ff60f95ebe2d">RBASIC</a></div><div class="ttdeci">#define RBASIC(obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01116">ruby.h:1116</a></div></div> <div class="ttc" id="bignum_8c_html_ac521d08f5ca64f5574183c91e8932b8c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac521d08f5ca64f5574183c91e8932b8c">bigdivrem_mulsub</a></div><div class="ttdeci">static BDIGIT_DBL_SIGNED bigdivrem_mulsub(BDIGIT *zds, size_t zn, BDIGIT x, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01487">bignum.c:1487</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a52a7a87783545094bfdd9c93c378f570"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a52a7a87783545094bfdd9c93c378f570">rb_obj_hide</a></div><div class="ttdeci">VALUE rb_obj_hide(VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l00053">object.c:53</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a633329e55222507402831db26be9f9d2"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a633329e55222507402831db26be9f9d2">rb_cInteger</a></div><div class="ttdeci">RUBY_EXTERN VALUE rb_cInteger</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01576">ruby.h:1576</a></div></div> <div class="ttc" id="intern_8h_html_ac43f515ec7cbf82b7ed0ccb30e7bc7e4"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ac43f515ec7cbf82b7ed0ccb30e7bc7e4">INTEGER_PACK_MSWORD_FIRST</a></div><div class="ttdeci">#define INTEGER_PACK_MSWORD_FIRST</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00142">intern.h:142</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9444c431b3cb1184e7523fc572f2c758"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a></div><div class="ttdeci">#define FIX2INT(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00632">ruby.h:632</a></div></div> <div class="ttc" id="__sdbm_8c_html_ada436df6a31dab0938235cc56320e487"><div class="ttname"><a href="../../d4/db0/__sdbm_8c.html#ada436df6a31dab0938235cc56320e487">bad</a></div><div class="ttdeci">#define bad(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/db0/__sdbm_8c_source.html#l00124">_sdbm.c:124</a></div></div> <div class="ttc" id="bignum_8c_html_ae7f110e38fda0a4f2d8afa2bca089d1f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae7f110e38fda0a4f2d8afa2bca089d1f">bary_small_rshift</a></div><div class="ttdeci">static void bary_small_rshift(BDIGIT *zds, const BDIGIT *xds, size_t n, int shift, BDIGIT higher_bdigit)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00414">bignum.c:414</a></div></div> <div class="ttc" id="bignum_8c_html_a27d791e90e2fa21bee73c2c7ac471455"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a27d791e90e2fa21bee73c2c7ac471455">bytes_2comp</a></div><div class="ttdeci">static int bytes_2comp(unsigned char *buf, size_t len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00612">bignum.c:612</a></div></div> <div class="ttc" id="bignum_8c_html_aabf4b859454e358f1c494a0f914a6522"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aabf4b859454e358f1c494a0f914a6522">integer_unpack_num_bdigits_small</a></div><div class="ttdeci">static size_t integer_unpack_num_bdigits_small(size_t numwords, size_t wordsize, size_t nails, int *nlp_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00958">bignum.c:958</a></div></div> <div class="ttc" id="intern_8h_html_ac7a89c076f8710df7f3974af601e2b6d"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ac7a89c076f8710df7f3974af601e2b6d">rb_num_coerce_relop</a></div><div class="ttdeci">VALUE rb_num_coerce_relop(VALUE, VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00300">numeric.c:300</a></div></div> <div class="ttc" id="bignum_8c_html_ac312b5f2525686d21d47e7748c091e7f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac312b5f2525686d21d47e7748c091e7f">rb_big_coerce</a></div><div class="ttdeci">static VALUE rb_big_coerce(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06917">bignum.c:6917</a></div></div> <div class="ttc" id="bignum_8c_html_a9d1267fbb36f74bb13efbc1d3765dc87"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9d1267fbb36f74bb13efbc1d3765dc87">rb_big_mul_karatsuba</a></div><div class="ttdeci">VALUE rb_big_mul_karatsuba(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01849">bignum.c:1849</a></div></div> <div class="ttc" id="missing_8h_html_a956e2723d559858d08644ac99146e910"><div class="ttname"><a href="../../d3/d90/missing_8h.html#a956e2723d559858d08644ac99146e910">INFINITY</a></div><div class="ttdeci">#define INFINITY</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d90/missing_8h_source.html#l00141">missing.h:141</a></div></div> <div class="ttc" id="bignum_8c_html_aa66bf4e492bf67f68d75efbfa1ed0d92"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa66bf4e492bf67f68d75efbfa1ed0d92">bigdivrem_restoring</a></div><div class="ttdeci">static void bigdivrem_restoring(BDIGIT *zds, size_t zn, BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02598">bignum.c:2598</a></div></div> <div class="ttc" id="bignum_8c_html_a4cd38736348907841b1dbbb04f364dd9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4cd38736348907841b1dbbb04f364dd9">rb_absint_size</a></div><div class="ttdeci">size_t rb_absint_size(VALUE val, int *nlz_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03231">bignum.c:3231</a></div></div> <div class="ttc" id="win32_8h_html_a2e1baae9134e580910322362dc23290e"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a2e1baae9134e580910322362dc23290e">isnan</a></div><div class="ttdeci">#define isnan(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00376">win32.h:376</a></div></div> <div class="ttc" id="cparse_8c_html_ae2e438d537892aeadba05c15eefbe89d"><div class="ttname"><a href="../../dc/d0c/cparse_8c.html#ae2e438d537892aeadba05c15eefbe89d">shift</a></div><div class="ttdeci">static void shift(struct cparse_params *v, long act, VALUE tok, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/d0c/cparse_8c_source.html#l00662">cparse.c:662</a></div></div> <div class="ttc" id="bignum_8c_html_abe7db8a1471a3e308ce3e39fc22ea010"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#abe7db8a1471a3e308ce3e39fc22ea010">big_lshift</a></div><div class="ttdeci">static VALUE big_lshift(VALUE x, unsigned long shift)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04467">bignum.c:4467</a></div></div> <div class="ttc" id="acosh_8c_html_aeb343417fe0051b641fc7921022c7b0d"><div class="ttname"><a href="../../d7/deb/acosh_8c.html#aeb343417fe0051b641fc7921022c7b0d">DBL_MANT_DIG</a></div><div class="ttdeci">#define DBL_MANT_DIG</div><div class="ttdef"><b>Definition:</b> <a href="../../d7/deb/acosh_8c_source.html#l00019">acosh.c:19</a></div></div> <div class="ttc" id="bignum_8c_html_a241a6ae28ab53e2e7919de4331392f64"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a241a6ae28ab53e2e7919de4331392f64">big2str_2bdigits</a></div><div class="ttdeci">static void big2str_2bdigits(struct big2str_struct *b2s, BDIGIT *xds, size_t xn, size_t taillen)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04618">bignum.c:4618</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac493d4e1ca36d6a84215aad4e6ea1b4d"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac493d4e1ca36d6a84215aad4e6ea1b4d">FIXABLE</a></div><div class="ttdeci">#define FIXABLE(f)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00350">ruby.h:350</a></div></div> <div class="ttc" id="bignum_8c_html_ac355b75d5813941678cdea4cbb757517"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac355b75d5813941678cdea4cbb757517">BARY_ARGS</a></div><div class="ttdeci">#define BARY_ARGS(ary)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00104">bignum.c:104</a></div></div> <div class="ttc" id="bignum_8c_html_af9bebc3d4ee972ff7419afa73acb49e1"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af9bebc3d4ee972ff7419afa73acb49e1">BARY_SHORT_MUL</a></div><div class="ttdeci">#define BARY_SHORT_MUL(z, x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00108">bignum.c:108</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a308d9dd2c0028ddb184b455bbd7865de"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a308d9dd2c0028ddb184b455bbd7865de">CHAR_BIT</a></div><div class="ttdeci">#define CHAR_BIT</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00198">ruby.h:198</a></div></div> <div class="ttc" id="numeric_8c_html_a539f2dd258b96fac8f4dc9bc139d75c9"><div class="ttname"><a href="../../d6/d27/numeric_8c.html#a539f2dd258b96fac8f4dc9bc139d75c9">DBL_MAX_EXP</a></div><div class="ttdeci">#define DBL_MAX_EXP</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00058">numeric.c:58</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a7018f674543d7c9c7db2ecd9d88f49d1"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a7018f674543d7c9c7db2ecd9d88f49d1">RB_FLOAT_TYPE_P</a></div><div class="ttdeci">#define RB_FLOAT_TYPE_P(obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01670">ruby.h:1670</a></div></div> <div class="ttc" id="intern_8h_html_a7637d212c3fe8a0d7abd89a8554784b2"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a7637d212c3fe8a0d7abd89a8554784b2">INTEGER_PACK_BIG_ENDIAN</a></div><div class="ttdeci">#define INTEGER_PACK_BIG_ENDIAN</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00156">intern.h:156</a></div></div> <div class="ttc" id="bignum_8c_html_aa8849ce4da76a1a955721e8ff25d1d37"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa8849ce4da76a1a955721e8ff25d1d37">big_fdiv_float</a></div><div class="ttdeci">static VALUE big_fdiv_float(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06300">bignum.c:6300</a></div></div> <div class="ttc" id="bignum_8c_html_adc2db6d65acb6a1c64e8c7571d062bf4"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#adc2db6d65acb6a1c64e8c7571d062bf4">rb_big_odd_p</a></div><div class="ttdeci">static VALUE rb_big_odd_p(VALUE num)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l07047">bignum.c:7047</a></div></div> <div class="ttc" id="bignum_8c_html_a4aa7d76d3ea267508b5d7780a146e8ee"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4aa7d76d3ea267508b5d7780a146e8ee">bary_mul_toom3</a></div><div class="ttdeci">static void bary_mul_toom3(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01862">bignum.c:1862</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a854de1c520ed24a625d5a29f36a08f7a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a854de1c520ed24a625d5a29f36a08f7a">LONG2NUM</a></div><div class="ttdeci">#define LONG2NUM(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01317">ruby.h:1317</a></div></div> <div class="ttc" id="structbig2str__struct_html_a8417a165ca4af31ea154b7952a4476c8"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#a8417a165ca4af31ea154b7952a4476c8">big2str_struct::ptr</a></div><div class="ttdeci">char * ptr</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04603">bignum.c:4603</a></div></div> <div class="ttc" id="sha2_8h_html_a435d1572bf3f880d55459d9805097f62"><div class="ttname"><a href="../../db/d4d/sha2_8h.html#a435d1572bf3f880d55459d9805097f62">uint32_t</a></div><div class="ttdeci">unsigned int uint32_t</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d4d/sha2_8h_source.html#l00101">sha2.h:101</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afc32c1526ac6cb40ec33cad8782c0bae"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a></div><div class="ttdeci">#define StringValueCStr(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00541">ruby.h:541</a></div></div> <div class="ttc" id="bignum_8c_html_a70034c936c036a862d892a8c9d471a1d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a70034c936c036a862d892a8c9d471a1d">integer_unpack_single_bdigit</a></div><div class="ttdeci">static int integer_unpack_single_bdigit(BDIGIT u, size_t size, int flags, BDIGIT *dp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01062">bignum.c:1062</a></div></div> <div class="ttc" id="bignum_8c_html_ad4417beff6bf7d6ba4486885e147f61b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad4417beff6bf7d6ba4486885e147f61b">bignew_1</a></div><div class="ttdeci">static VALUE bignew_1(VALUE klass, long len, int sign)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02980">bignum.c:2980</a></div></div> <div class="ttc" id="intern_8h_html_adab236c4263927fad4fc2864b562209a"><div class="ttname"><a href="../../db/d2e/intern_8h.html#adab236c4263927fad4fc2864b562209a">INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</a></div><div class="ttdeci">#define INTEGER_PACK_FORCE_GENERIC_IMPLEMENTATION</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00148">intern.h:148</a></div></div> <div class="ttc" id="bignum_8c_html_a89ede0740dc1fb7747b4ee506be31deb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a89ede0740dc1fb7747b4ee506be31deb">rb_big_to_f</a></div><div class="ttdeci">static VALUE rb_big_to_f(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05293">bignum.c:5293</a></div></div> <div class="ttc" id="bignum_8c_html_a52c0e1e36c7d2e6e4e2ea28027103482"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a52c0e1e36c7d2e6e4e2ea28027103482">bary_short_mul</a></div><div class="ttdeci">static void bary_short_mul(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02299">bignum.c:2299</a></div></div> <div class="ttc" id="bignum_8c_html_a3673f440faa90a40d3511b0dd2f69992"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3673f440faa90a40d3511b0dd2f69992">QUAD_SIZE</a></div><div class="ttdeci">#define QUAD_SIZE</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03688">bignum.c:3688</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3f0e4e2b6d073369cc1c2ddde00b13bb"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a></div><div class="ttdeci">#define RSTRING_PTR(str)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00845">ruby.h:845</a></div></div> <div class="ttc" id="bignum_8c_html_a17b66a15a998788405dc38045e09216c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a17b66a15a998788405dc38045e09216c">GMP_MUL_DIGITS</a></div><div class="ttdeci">#define GMP_MUL_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00134">bignum.c:134</a></div></div> <div class="ttc" id="internal_8h_html_a323735ad9240b9de4b0175594eed2de4"><div class="ttname"><a href="../../db/dde/internal_8h.html#a323735ad9240b9de4b0175594eed2de4">nlz_int</a></div><div class="ttdeci">static int nlz_int(unsigned int x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dde/internal_8h_source.html#l00116">internal.h:116</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae0bf11f904fe1fc3a4bbe0d30c30b2a3"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae0bf11f904fe1fc3a4bbe0d30c30b2a3">RGENGC_WB_PROTECTED_BIGNUM</a></div><div class="ttdeci">#define RGENGC_WB_PROTECTED_BIGNUM</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00741">ruby.h:741</a></div></div> <div class="ttc" id="intern_8h_html_ab1ad93c3871177d57dd10fdb6278d7b7"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ab1ad93c3871177d57dd10fdb6278d7b7">INTEGER_PACK_NEGATIVE</a></div><div class="ttdeci">#define INTEGER_PACK_NEGATIVE</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00151">intern.h:151</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae0d75edc88a608fc05dd386edf53208f"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae0d75edc88a608fc05dd386edf53208f">rb_equal</a></div><div class="ttdeci">VALUE rb_equal(VALUE, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l00089">object.c:89</a></div></div> <div class="ttc" id="bignum_8c_html_ad1e2c95ba33754099a9789e22b014c41"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad1e2c95ba33754099a9789e22b014c41">rb_big_uminus</a></div><div class="ttdeci">VALUE rb_big_uminus(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05578">bignum.c:5578</a></div></div> <div class="ttc" id="missing_8h_html_ab7a3e36d3032ed55666ca9a97d7ea672"><div class="ttname"><a href="../../d3/d90/missing_8h.html#ab7a3e36d3032ed55666ca9a97d7ea672">ffs</a></div><div class="ttdeci">RUBY_EXTERN int ffs(int)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/df2/ffs_8c_source.html#l00006">ffs.c:6</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aa7311e0d10f373b0bb50c41522dc3981"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aa7311e0d10f373b0bb50c41522dc3981">RFLOAT_VALUE</a></div><div class="ttdeci">#define RFLOAT_VALUE(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00814">ruby.h:814</a></div></div> <div class="ttc" id="encoding_8c_html_a439227feff9d7f55384e8780cfc2eb82"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a></div><div class="ttdeci">int size</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00049">encoding.c:49</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac55fae7f748afd3fc2533d0d7d06cf5a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a></div><div class="ttdeci">#define INT2FIX(i)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00231">ruby.h:231</a></div></div> <div class="ttc" id="bignum_8c_html_a453e764af9175d3c44ee471f921f7049"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a453e764af9175d3c44ee471f921f7049">rb_cBignum</a></div><div class="ttdeci">VALUE rb_cBignum</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00035">bignum.c:35</a></div></div> <div class="ttc" id="bignum_8c_html_a7b153fcc4b4d55bd963c38def0a8a3cb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7b153fcc4b4d55bd963c38def0a8a3cb">rb_str2inum</a></div><div class="ttdeci">VALUE rb_str2inum(VALUE str, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04379">bignum.c:4379</a></div></div> <div class="ttc" id="bignum_8c_html_ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae6dee9b066c3fa4fc956e9b8d5683d3fa969a7f059e2dbd16685d97e3ab16a6bf">big_op_gt</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05420">bignum.c:5420</a></div></div> <div class="ttc" id="bignum_8c_html_ae8ba6f0e65c442333168ac2d8956cb4c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae8ba6f0e65c442333168ac2d8956cb4c">bary_mul_single</a></div><div class="ttdeci">static void bary_mul_single(BDIGIT *zds, size_t zn, BDIGIT x, BDIGIT y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01440">bignum.c:1440</a></div></div> <div class="ttc" id="missing_8h_html_a8a34ea96a46e86d80f06052188b4433f"><div class="ttname"><a href="../../d3/d90/missing_8h.html#a8a34ea96a46e86d80f06052188b4433f">round</a></div><div class="ttdeci">RUBY_EXTERN double round(double)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00092">numeric.c:92</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3c75bb398badb69c7577b21486f9963f"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3c75bb398badb69c7577b21486f9963f">SIZE_MAX</a></div><div class="ttdeci">#define SIZE_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00274">ruby.h:274</a></div></div> <div class="ttc" id="bignum_8c_html_a10c615980e731c17a233773ba502873c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a10c615980e731c17a233773ba502873c">rb_big_and</a></div><div class="ttdeci">VALUE rb_big_and(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06479">bignum.c:6479</a></div></div> <div class="ttc" id="bignum_8c_html_a351acec318b2006b66e421566e222a39"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a351acec318b2006b66e421566e222a39">nlz</a></div><div class="ttdeci">static int nlz(BDIGIT x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00159">bignum.c:159</a></div></div> <div class="ttc" id="bignum_8c_html_add931e6dfb8173f021133fe99046b053"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#add931e6dfb8173f021133fe99046b053">bary_2comp</a></div><div class="ttdeci">static int bary_2comp(BDIGIT *ds, size_t n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00449">bignum.c:449</a></div></div> <div class="ttc" id="bignum_8c_html_a43775d1107b5c81b027869eea4bd20cd"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a43775d1107b5c81b027869eea4bd20cd">bary_mul_precheck</a></div><div class="ttdeci">static int bary_mul_precheck(BDIGIT **zdsp, size_t *znp, const BDIGIT **xdsp, size_t *xnp, const BDIGIT **ydsp, size_t *ynp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02326">bignum.c:2326</a></div></div> <div class="ttc" id="bignum_8c_html_a0156e0a09bfff4c802111626efc876d2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0156e0a09bfff4c802111626efc876d2">BDIGIT_DBL_MAX</a></div><div class="ttdeci">#define BDIGIT_DBL_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00083">bignum.c:83</a></div></div> <div class="ttc" id="bignum_8c_html_ab8f9db71115a06f916d00a4a812428c7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ab8f9db71115a06f916d00a4a812428c7">base36_power_cache</a></div><div class="ttdeci">static VALUE base36_power_cache[35][MAX_BASE36_POWER_TABLE_ENTRIES]</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04484">bignum.c:4484</a></div></div> <div class="ttc" id="bignum_8c_html_ad6f90edf3d965ceec98697c6f8ff9e63"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad6f90edf3d965ceec98697c6f8ff9e63">power_cache_get_power</a></div><div class="ttdeci">static VALUE power_cache_get_power(int base, int power_level, size_t *numdigits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04499">bignum.c:4499</a></div></div> <div class="ttc" id="internal_8h_html_a230ba4a10a19fd06db52f5a5ed957d2b"><div class="ttname"><a href="../../db/dde/internal_8h.html#a230ba4a10a19fd06db52f5a5ed957d2b">swap16</a></div><div class="ttdeci">#define swap16(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dde/internal_8h_source.html#l00079">internal.h:79</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac54404aa353f0d6ef59ccc6be5f8c3e4"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac54404aa353f0d6ef59ccc6be5f8c3e4">FL_WB_PROTECTED</a></div><div class="ttdeci">#define FL_WB_PROTECTED</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01134">ruby.h:1134</a></div></div> <div class="ttc" id="bignum_8c_html_a73ec3ca7ba6b30d87fc01000092991be"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a73ec3ca7ba6b30d87fc01000092991be">bary_sq_fast</a></div><div class="ttdeci">static void bary_sq_fast(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01555">bignum.c:1555</a></div></div> <div class="ttc" id="bignum_8c_html_aaf40bb5e95abeb9dfe113a6cabe31c37"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aaf40bb5e95abeb9dfe113a6cabe31c37">get2comp</a></div><div class="ttdeci">static void get2comp(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03022">bignum.c:3022</a></div></div> <div class="ttc" id="bignum_8c_html_ad53a51b254adb838dd8bd67245214645"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad53a51b254adb838dd8bd67245214645">abs2twocomp</a></div><div class="ttdeci">static BDIGIT abs2twocomp(VALUE *xp, long *n_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03039">bignum.c:3039</a></div></div> <div class="ttc" id="bignum_8c_html_ac7a90b8e37b5cf33b8a1ea41557d39b7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac7a90b8e37b5cf33b8a1ea41557d39b7">rb_big_divrem_normal</a></div><div class="ttdeci">VALUE rb_big_divrem_normal(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02698">bignum.c:2698</a></div></div> <div class="ttc" id="bignum_8c_html_acde5e84214e597615d05433f495dc845"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#acde5e84214e597615d05433f495dc845">rb_big_norm</a></div><div class="ttdeci">VALUE rb_big_norm(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03136">bignum.c:3136</a></div></div> <div class="ttc" id="bignum_8c_html_a5e43bbb0b5abb7127a5e65b3f8a650fc"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5e43bbb0b5abb7127a5e65b3f8a650fc">RBIGNUM_SET_NEGATIVE_SIGN</a></div><div class="ttdeci">#define RBIGNUM_SET_NEGATIVE_SIGN(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00112">bignum.c:112</a></div></div> <div class="ttc" id="bignum_8c_html_a7f21aaca68d471ad46f55787ed5598aa"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7f21aaca68d471ad46f55787ed5598aa">roomof</a></div><div class="ttdeci">#define roomof(n, m)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00102">bignum.c:102</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a2ead2f64c81efed352e79e89f29b8fc8"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a2ead2f64c81efed352e79e89f29b8fc8">LONG2FIX</a></div><div class="ttdeci">#define LONG2FIX(i)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00232">ruby.h:232</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aee9b7ba3793585d33b6c1d1338b8169d"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aee9b7ba3793585d33b6c1d1338b8169d">SIZEOF_VALUE</a></div><div class="ttdeci">#define SIZEOF_VALUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00091">ruby.h:91</a></div></div> <div class="ttc" id="bigdecimal_8h_html_a083e8e1ce49b692113783af64010a70f"><div class="ttname"><a href="../../d0/da5/bigdecimal_8h.html#a083e8e1ce49b692113783af64010a70f">BDIGIT_DBL</a></div><div class="ttdeci">#define BDIGIT_DBL</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/da5/bigdecimal_8h_source.html#l00041">bigdecimal.h:41</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a7e07f4f937d300a4f0509b0c26526716"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a7e07f4f937d300a4f0509b0c26526716">ALLOCV</a></div><div class="ttdeci">#define ALLOCV(v, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01354">ruby.h:1354</a></div></div> <div class="ttc" id="bignum_8c_html_a2eca831268141bc720526436c74b2d33"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a2eca831268141bc720526436c74b2d33">rb_big_mul_toom3</a></div><div class="ttdeci">VALUE rb_big_mul_toom3(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02246">bignum.c:2246</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a117741045763c090b26e30a85bd0e0a6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a117741045763c090b26e30a85bd0e0a6">RTEST</a></div><div class="ttdeci">#define RTEST(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00437">ruby.h:437</a></div></div> <div class="ttc" id="intern_8h_html_a9c9bfa5b17b2be949b3ca843e6a0ee9e"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a9c9bfa5b17b2be949b3ca843e6a0ee9e">rb_thread_check_ints</a></div><div class="ttdeci">void rb_thread_check_ints(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l01143">thread.c:1143</a></div></div> <div class="ttc" id="bignum_8c_html_a0b74a40818aae2dd69157223fc1b069e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0b74a40818aae2dd69157223fc1b069e">rb_big_lshift</a></div><div class="ttdeci">VALUE rb_big_lshift(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06760">bignum.c:6760</a></div></div> <div class="ttc" id="bignum_8c_html_a992ef9095185105fb6fb192d6027195a"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a992ef9095185105fb6fb192d6027195a">rb_big2str0</a></div><div class="ttdeci">VALUE rb_big2str0(VALUE x, int base, int trim)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04980">bignum.c:4980</a></div></div> <div class="ttc" id="bignum_8c_html_ae532b50d717d3567bf15d59bf040bdb8"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae532b50d717d3567bf15d59bf040bdb8">rb_uint2inum</a></div><div class="ttdeci">VALUE rb_uint2inum(VALUE n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03185">bignum.c:3185</a></div></div> <div class="ttc" id="bignum_8c_html_a8f43bac3f4e5908a8a4400c1c94bab79"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a8f43bac3f4e5908a8a4400c1c94bab79">rb_big_hash</a></div><div class="ttdeci">static VALUE rb_big_hash(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06894">bignum.c:6894</a></div></div> <div class="ttc" id="bignum_8c_html_ae1dfe25a83c0e93ad732379587ed52f4"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae1dfe25a83c0e93ad732379587ed52f4">big_extend_carry</a></div><div class="ttdeci">static void big_extend_carry(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03014">bignum.c:3014</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ab1d46d187c4953f84fab360264c888f9"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ab1d46d187c4953f84fab360264c888f9">NEGFIXABLE</a></div><div class="ttdeci">#define NEGFIXABLE(f)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00349">ruby.h:349</a></div></div> <div class="ttc" id="bignum_8c_html_a232b4749e59b9fda84592b7e66091637"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a232b4749e59b9fda84592b7e66091637">bigadd</a></div><div class="ttdeci">static VALUE bigadd(VALUE x, VALUE y, int sign)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05833">bignum.c:5833</a></div></div> <div class="ttc" id="bignum_8c_html_aa8ee0929f2913179f2368ad8a71d9f23"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa8ee0929f2913179f2368ad8a71d9f23">big2str_find_n1</a></div><div class="ttdeci">static long big2str_find_n1(VALUE x, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04559">bignum.c:4559</a></div></div> <div class="ttc" id="bignum_8c_html_ad33288d89ada22c5fce5949d05273df7"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad33288d89ada22c5fce5949d05273df7">bary_mul_karatsuba_start</a></div><div class="ttdeci">static mulfunc_t bary_mul_karatsuba_start</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00145">bignum.c:145</a></div></div> <div class="ttc" id="bignum_8c_html_aab2517bed54c72e4047d06a8cc7a5308"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aab2517bed54c72e4047d06a8cc7a5308">bdigit_roomof</a></div><div class="ttdeci">#define bdigit_roomof(n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00103">bignum.c:103</a></div></div> <div class="ttc" id="bignum_8c_html_a22a538c97c7b21b2edd1eb2a9b54e196"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a22a538c97c7b21b2edd1eb2a9b54e196">rb_big_pow</a></div><div class="ttdeci">VALUE rb_big_pow(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06363">bignum.c:6363</a></div></div> <div class="ttc" id="bignum_8c_html_a8f8d1897d6a6b2ee8596120643520581"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a8f8d1897d6a6b2ee8596120643520581">str2big_scan_digits</a></div><div class="ttdeci">static void str2big_scan_digits(const char *s, const char *str, int base, int badcheck, size_t *num_digits_p, size_t *len_p)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03709">bignum.c:3709</a></div></div> <div class="ttc" id="bignum_8c_html_a4d13f72afe245927b1eea45acde5c842"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4d13f72afe245927b1eea45acde5c842">rb_absint_numwords</a></div><div class="ttdeci">size_t rb_absint_numwords(VALUE val, size_t word_numbits, size_t *nlz_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03366">bignum.c:3366</a></div></div> <div class="ttc" id="structbig__div__struct_html_ab1c7998034d583d05be018a28ee740e5"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html#ab1c7998034d583d05be018a28ee740e5">big_div_struct::yn</a></div><div class="ttdeci">size_t yn</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02519">bignum.c:2519</a></div></div> <div class="ttc" id="bignum_8c_html_a7a2b8c90e640fa26f4870d8a359552d9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7a2b8c90e640fa26f4870d8a359552d9">bary_divmod</a></div><div class="ttdeci">static void bary_divmod(BDIGIT *qds, size_t qn, BDIGIT *rds, size_t rn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02826">bignum.c:2826</a></div></div> <div class="ttc" id="bignum_8c_html_a1eec78abd0bb0cefe4ebf82d733a0388"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a1eec78abd0bb0cefe4ebf82d733a0388">rb_int2big</a></div><div class="ttdeci">VALUE rb_int2big(SIGNED_VALUE n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03164">bignum.c:3164</a></div></div> <div class="ttc" id="lex_8c_html_a5541f85ce416df233cce93949f0eeeca"><div class="ttname"><a href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a></div><div class="ttdeci">static unsigned int hash(const char *str, unsigned int len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/deb/lex_8c_source.html#l00056">lex.c:56</a></div></div> <div class="ttc" id="intern_8h_html_a2b974823d5421a24e886980c4eb41096"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2b974823d5421a24e886980c4eb41096">INTEGER_PACK_MSBYTE_FIRST</a></div><div class="ttdeci">#define INTEGER_PACK_MSBYTE_FIRST</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00144">intern.h:144</a></div></div> <div class="ttc" id="bignum_8c_html_a1b2178f547d44e73d5bb5e8cad36b24d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a1b2178f547d44e73d5bb5e8cad36b24d">rb_integer_float_eq</a></div><div class="ttdeci">VALUE rb_integer_float_eq(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05349">bignum.c:5349</a></div></div> <div class="ttc" id="bignum_8c_html_a83ac33c373462cc1d7c996be196cfb68"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a83ac33c373462cc1d7c996be196cfb68">bary_sub_one</a></div><div class="ttdeci">static int bary_sub_one(BDIGIT *zds, size_t zn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01370">bignum.c:1370</a></div></div> <div class="ttc" id="bignum_8c_html_a7038baceb00cd0d40808d9bca3c45303"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a7038baceb00cd0d40808d9bca3c45303">BIGUP</a></div><div class="ttdeci">#define BIGUP(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00079">bignum.c:79</a></div></div> <div class="ttc" id="ossl_8h_html_acdcc5aaebf3f273c1762f24a6ece2e5e"><div class="ttname"><a href="../../d5/dac/ossl_8h.html#acdcc5aaebf3f273c1762f24a6ece2e5e">assert</a></div><div class="ttdeci">#define assert(condition)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/dac/ossl_8h_source.html#l00045">ossl.h:45</a></div></div> <div class="ttc" id="bignum_8c_html_ab0ea4afa2707d7faefa3ff10f86e1fd9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ab0ea4afa2707d7faefa3ff10f86e1fd9">bary_mulsub_1xN</a></div><div class="ttdeci">static int bary_mulsub_1xN(BDIGIT *zds, size_t zn, BDIGIT x, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01513">bignum.c:1513</a></div></div> <div class="ttc" id="bignum_8c_html_a0fdd2d3b13ef87a4b97238d6cbcbb508"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a0fdd2d3b13ef87a4b97238d6cbcbb508">TAKE_LOWBITS</a></div><div class="ttdeci">#define TAKE_LOWBITS(n)</div></div> <div class="ttc" id="bignum_8c_html_a74e94262b7376f746c17baf90457d667"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a74e94262b7376f746c17baf90457d667">big2dbl</a></div><div class="ttdeci">static double big2dbl(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05219">bignum.c:5219</a></div></div> <div class="ttc" id="bigdecimal_8h_html_a01080d3205c9242c508393da18345c99"><div class="ttname"><a href="../../d0/da5/bigdecimal_8h.html#a01080d3205c9242c508393da18345c99">SIZEOF_BDIGITS</a></div><div class="ttdeci">#define SIZEOF_BDIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/da5/bigdecimal_8h_source.html#l00043">bigdecimal.h:43</a></div></div> <div class="ttc" id="defines_8h_html_a265962262d611ccce5c77f193bcc3a4a"><div class="ttname"><a href="../../d8/db0/defines_8h.html#a265962262d611ccce5c77f193bcc3a4a">PRIxBDIGIT</a></div><div class="ttdeci">#define PRIxBDIGIT</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/db0/defines_8h_source.html#l00187">defines.h:187</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9d3707fd42dad026e217ea7c9dfb4948"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9d3707fd42dad026e217ea7c9dfb4948">rb_eFloatDomainError</a></div><div class="ttdeci">RUBY_EXTERN VALUE rb_eFloatDomainError</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01621">ruby.h:1621</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a1fbb16336f995a710ccbaed87109bb11"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a1fbb16336f995a710ccbaed87109bb11">RBIGNUM_SET_SIGN</a></div><div class="ttdeci">#define RBIGNUM_SET_SIGN(b, sign)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01094">ruby.h:1094</a></div></div> <div class="ttc" id="bignum_8c_html_ad2beb8bef45e8b6f683ffd2679384337"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad2beb8bef45e8b6f683ffd2679384337">rb_int2inum</a></div><div class="ttdeci">VALUE rb_int2inum(SIGNED_VALUE n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03192">bignum.c:3192</a></div></div> <div class="ttc" id="bignum_8c_html_ac115cfc17fb230dc2e834e9afa201cc3"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac115cfc17fb230dc2e834e9afa201cc3">bary_mul_karatsuba</a></div><div class="ttdeci">static void bary_mul_karatsuba(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01680">bignum.c:1680</a></div></div> <div class="ttc" id="bignum_8c_html_a5fdc1340f1be7f365b761819afb18d73"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5fdc1340f1be7f365b761819afb18d73">BIGLO</a></div><div class="ttdeci">#define BIGLO(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00081">bignum.c:81</a></div></div> <div class="ttc" id="error_8c_html_afd461c64916576849b159b21a26123da"><div class="ttname"><a href="../../db/dcc/error_8c.html#afd461c64916576849b159b21a26123da">rb_warning</a></div><div class="ttdeci">void rb_warning(const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00236">error.c:236</a></div></div> <div class="ttc" id="structbig__div__struct_html_a31405d465016a84ca1b244b9959fe261"><div class="ttname"><a href="../../de/df0/structbig__div__struct.html#a31405d465016a84ca1b244b9959fe261">big_div_struct::stop</a></div><div class="ttdeci">volatile VALUE stop</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02521">bignum.c:2521</a></div></div> <div class="ttc" id="bignum_8c_html_aa096f4faaf8c4a1f90e4ca68f53d28cb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa096f4faaf8c4a1f90e4ca68f53d28cb">BARY_ADD</a></div><div class="ttdeci">#define BARY_ADD(z, x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00106">bignum.c:106</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad6856192451c57b81debeb24282a11c8"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad6856192451c57b81debeb24282a11c8">RBIGNUM_EMBED_FLAG</a></div><div class="ttdeci">#define RBIGNUM_EMBED_FLAG</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01100">ruby.h:1100</a></div></div> <div class="ttc" id="bignum_8c_html_adb96439043a2712fa81fbbe13ac6eceb"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#adb96439043a2712fa81fbbe13ac6eceb">rb_big_2comp</a></div><div class="ttdeci">void rb_big_2comp(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03033">bignum.c:3033</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a96dfe1b6f42144c6e852a38c9596f26b"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a96dfe1b6f42144c6e852a38c9596f26b">RBIGNUM_SIGN</a></div><div class="ttdeci">#define RBIGNUM_SIGN(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01093">ruby.h:1093</a></div></div> <div class="ttc" id="bignum_8c_html_af5f101d4b8bef72968ed7d03c733ee66"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af5f101d4b8bef72968ed7d03c733ee66">bary2bdigitdbl</a></div><div class="ttdeci">static BDIGIT_DBL bary2bdigitdbl(const BDIGIT *ds, size_t n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00360">bignum.c:360</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_af7ad03fdaa27fc55ae639d1da22758ad"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#af7ad03fdaa27fc55ae639d1da22758ad">RBIGNUM_NEGATIVE_P</a></div><div class="ttdeci">#define RBIGNUM_NEGATIVE_P(b)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01098">ruby.h:1098</a></div></div> <div class="ttc" id="bignum_8c_html_ad606505b6b476ddff0addf17454da732"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad606505b6b476ddff0addf17454da732">rb_big_rshift</a></div><div class="ttdeci">VALUE rb_big_rshift(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06798">bignum.c:6798</a></div></div> <div class="ttc" id="bignum_8c_html_ac9da14bc98da512a3886cccc1695ee17"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac9da14bc98da512a3886cccc1695ee17">validate_integer_pack_format</a></div><div class="ttdeci">static void validate_integer_pack_format(size_t numwords, size_t wordsize, size_t nails, int flags, int supported_flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00490">bignum.c:490</a></div></div> <div class="ttc" id="defines_8h_html_a6ff69f8866ae756cb246b3eebf7a4fce"><div class="ttname"><a href="../../d8/db0/defines_8h.html#a6ff69f8866ae756cb246b3eebf7a4fce">xfree</a></div><div class="ttdeci">void void xfree(void *)</div></div> <div class="ttc" id="bignum_8c_html_acdee5f53dc750ff2ae604232a6389031"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#acdee5f53dc750ff2ae604232a6389031">GMP_STR2BIG_DIGITS</a></div><div class="ttdeci">#define GMP_STR2BIG_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00140">bignum.c:140</a></div></div> <div class="ttc" id="bignum_8c_html_ad1cd4cd30b4ce5b52538392db6409651"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad1cd4cd30b4ce5b52538392db6409651">rb_cstr_to_inum</a></div><div class="ttdeci">VALUE rb_cstr_to_inum(const char *str, int base, int badcheck)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03963">bignum.c:3963</a></div></div> <div class="ttc" id="bignum_8c_html_a90d5bd45f73a443c9f0ab692626c70f5"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a90d5bd45f73a443c9f0ab692626c70f5">bigzero_p</a></div><div class="ttdeci">static int bigzero_p(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l02897">bignum.c:2897</a></div></div> <div class="ttc" id="bignum_8c_html_a005c59a29beff552cf8772c24580f78b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a005c59a29beff552cf8772c24580f78b">bary_muladd_1xN</a></div><div class="ttdeci">static int bary_muladd_1xN(BDIGIT *zds, size_t zn, BDIGIT x, const BDIGIT *yds, size_t yn)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01452">bignum.c:1452</a></div></div> <div class="ttc" id="array_8c_html_a9cfa42d4b79c89d68c53be8b2150a503"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a></div><div class="ttdeci">#define rb_intern(str)</div></div> <div class="ttc" id="bignum_8c_html_af2dd49350ab54e6b78997ce727e770f9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#af2dd49350ab54e6b78997ce727e770f9">conv_digit</a></div><div class="ttdeci">#define conv_digit(c)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03706">bignum.c:3706</a></div></div> <div class="ttc" id="intern_8h_html_aed107a4eacd5f626b554d2d341b58bd5"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aed107a4eacd5f626b554d2d341b58bd5">rb_usascii_str_new</a></div><div class="ttdeci">VALUE rb_usascii_str_new(const char *, long)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l00540">string.c:540</a></div></div> <div class="ttc" id="date__strftime_8c_html_aa84d960185b18347956518e4d00766b4"><div class="ttname"><a href="../../d1/d6f/date__strftime_8c.html#aa84d960185b18347956518e4d00766b4">mod</a></div><div class="ttdeci">#define mod(x, y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d6f/date__strftime_8c_source.html#l00028">date_strftime.c:28</a></div></div> <div class="ttc" id="bignum_8c_html_a321aafc27a7216d05c67c763661a6daa"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a321aafc27a7216d05c67c763661a6daa">str2big_karatsuba</a></div><div class="ttdeci">static VALUE str2big_karatsuba(int sign, const char *digits_start, const char *digits_end, size_t num_digits, size_t num_bdigits, int digits_per_bdigits_dbl, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03836">bignum.c:3836</a></div></div> <div class="ttc" id="__sdbm_8c_html_a070d2ce7b6bb7e5c05602aa8c308d0c4"><div class="ttname"><a href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a></div><div class="ttdeci">#define NULL</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/db0/__sdbm_8c_source.html#l00102">_sdbm.c:102</a></div></div> <div class="ttc" id="structbig2str__struct_html_a4b8bade51fd758241798e6b0725399b2"><div class="ttname"><a href="../../da/d6b/structbig2str__struct.html#a4b8bade51fd758241798e6b0725399b2">big2str_struct::hbase2_numdigits</a></div><div class="ttdeci">int hbase2_numdigits</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04601">bignum.c:4601</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae9390780cd6d04a2e0ac3d6282cdefea"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae9390780cd6d04a2e0ac3d6282cdefea">FIX2LONG</a></div><div class="ttdeci">#define FIX2LONG(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00345">ruby.h:345</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a2edf6990280eb2637623ccd421dee4f0"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a2edf6990280eb2637623ccd421dee4f0">Qundef</a></div><div class="ttdeci">#define Qundef</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00428">ruby.h:428</a></div></div> <div class="ttc" id="bignum_8c_html_a85f03bdf9d27e914e1853c388fd3023d"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a85f03bdf9d27e914e1853c388fd3023d">rb_str2big_karatsuba</a></div><div class="ttdeci">VALUE rb_str2big_karatsuba(VALUE arg, int base, int badcheck)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04233">bignum.c:4233</a></div></div> <div class="ttc" id="bignum_8c_html_abf1c9eae189f827c638082edd3f5ba62"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#abf1c9eae189f827c638082edd3f5ba62">bigsub</a></div><div class="ttdeci">static VALUE bigsub(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05626">bignum.c:5626</a></div></div> <div class="ttc" id="bignum_8c_html_a448656a616c06e036695dae156b0661b"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a448656a616c06e036695dae156b0661b">bigsq</a></div><div class="ttdeci">static VALUE bigsq(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05932">bignum.c:5932</a></div></div> <div class="ttc" id="bignum_8c_html_a2421d152f8df51f09e5c2f3cd2b4a363"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a2421d152f8df51f09e5c2f3cd2b4a363">INTEGER_PACK_BYTEORDER_MASK</a></div><div class="ttdeci">#define INTEGER_PACK_BYTEORDER_MASK</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00484">bignum.c:484</a></div></div> <div class="ttc" id="bignum_8c_html_aba4a162b1237a6a25e6e8b31af64b53c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aba4a162b1237a6a25e6e8b31af64b53c">TOOM3_MUL_DIGITS</a></div><div class="ttdeci">#define TOOM3_MUL_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00136">bignum.c:136</a></div></div> <div class="ttc" id="intern_8h_html_a64214faaee3299c7368b03511b697ee4"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a64214faaee3299c7368b03511b697ee4">INTEGER_PACK_FORCE_BIGNUM</a></div><div class="ttdeci">#define INTEGER_PACK_FORCE_BIGNUM</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00150">intern.h:150</a></div></div> <div class="ttc" id="group__defmethod_html_ga118dc7abcdb97f56fe35727ac0ff6eb8"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a></div><div class="ttdeci">void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01479">class.c:1479</a></div></div> <div class="ttc" id="bignum_8c_html_a3b189dbdc353401276d76e50f11b1a15"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3b189dbdc353401276d76e50f11b1a15">rb_quad_pack</a></div><div class="ttdeci">void rb_quad_pack(char *buf, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03691">bignum.c:3691</a></div></div> <div class="ttc" id="error_8c_html_aa5b1972d475e9a090c8ef607ce033008"><div class="ttname"><a href="../../db/dcc/error_8c.html#aa5b1972d475e9a090c8ef607ce033008">rb_warn</a></div><div class="ttdeci">void rb_warn(const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00223">error.c:223</a></div></div> <div class="ttc" id="error_8c_html_a8181cc6e05032f0d10c272a3556f306c"><div class="ttname"><a href="../../db/dcc/error_8c.html#a8181cc6e05032f0d10c272a3556f306c">rb_invalid_str</a></div><div class="ttdeci">void rb_invalid_str(const char *str, const char *type)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l01190">error.c:1190</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_af89e74d2dcf3eef15b29fa6015984af3"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#af89e74d2dcf3eef15b29fa6015984af3">SIZET2NUM</a></div><div class="ttdeci">#define SIZET2NUM(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00262">ruby.h:262</a></div></div> <div class="ttc" id="error_8c_html_ab5e2a9fec766c75176fbb262bfe6a596"><div class="ttname"><a href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a></div><div class="ttdeci">VALUE rb_eArgError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00549">error.c:549</a></div></div> <div class="ttc" id="bignum_8c_html_a11145f11c8614650e43ae9616c1caea9"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a11145f11c8614650e43ae9616c1caea9">rb_big_or</a></div><div class="ttdeci">VALUE rb_big_or(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06605">bignum.c:6605</a></div></div> <div class="ttc" id="compar_8c_html_a087ca087a20f74015a46cf31400c675e"><div class="ttname"><a href="../../de/d6d/compar_8c.html#a087ca087a20f74015a46cf31400c675e">cmp</a></div><div class="ttdeci">static ID cmp</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d6d/compar_8c_source.html#l00016">compar.c:16</a></div></div> <div class="ttc" id="bignum_8c_html_a76ae162226d88662980e103acc97d324"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a76ae162226d88662980e103acc97d324">big_ge</a></div><div class="ttdeci">static VALUE big_ge(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05484">bignum.c:5484</a></div></div> <div class="ttc" id="bignum_8c_html_a9e3c3097485d1c28752a2435b163058e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a9e3c3097485d1c28752a2435b163058e">rb_cstr2inum</a></div><div class="ttdeci">VALUE rb_cstr2inum(const char *str, int base)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l04373">bignum.c:4373</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aebbec3f6980955bf51d9962ef99a5c13"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aebbec3f6980955bf51d9962ef99a5c13">NUM2LONG</a></div><div class="ttdeci">#define NUM2LONG(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00600">ruby.h:600</a></div></div> <div class="ttc" id="compar_8c_html_ae167ee135d7bb4178188c2ad356dfcc7"><div class="ttname"><a href="../../de/d6d/compar_8c.html#ae167ee135d7bb4178188c2ad356dfcc7">rb_cmperr</a></div><div class="ttdeci">void rb_cmperr(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d6d/compar_8c_source.html#l00019">compar.c:19</a></div></div> <div class="ttc" id="bigdecimal_8h_html_aae70f10dc28a3f9db157d600d5ceab8b"><div class="ttname"><a href="../../d0/da5/bigdecimal_8h.html#aae70f10dc28a3f9db157d600d5ceab8b">BDIGIT</a></div><div class="ttdeci">#define BDIGIT</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/da5/bigdecimal_8h_source.html#l00040">bigdecimal.h:40</a></div></div> <div class="ttc" id="bignum_8c_html_a3727087568c786759bd96886ccaa236f"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a3727087568c786759bd96886ccaa236f">bigdivrem</a></div><div class="ttdeci">static VALUE bigdivrem(VALUE x, VALUE y, volatile VALUE *divp, volatile VALUE *modp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06015">bignum.c:6015</a></div></div> <div class="ttc" id="bignum_8c_html_a130eec71a0918d42228b7070b79ce0ae"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a130eec71a0918d42228b7070b79ce0ae">bigdivmod</a></div><div class="ttdeci">static void bigdivmod(VALUE x, VALUE y, volatile VALUE *divp, volatile VALUE *modp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06108">bignum.c:6108</a></div></div> <div class="ttc" id="bignum_8c_html_a5448c76e9b0d599ac85309c2c362d30c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a5448c76e9b0d599ac85309c2c362d30c">bary_pack</a></div><div class="ttdeci">static int bary_pack(int sign, BDIGIT *ds, size_t num_bdigits, void *words, size_t numwords, size_t wordsize, size_t nails, int flags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00627">bignum.c:627</a></div></div> <div class="ttc" id="bignum_8c_html_abc71b6113c9190d63ae6a94d6723657e"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#abc71b6113c9190d63ae6a94d6723657e">CLEAR_LOWBITS</a></div><div class="ttdeci">#define CLEAR_LOWBITS(d, numbits)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00070">bignum.c:70</a></div></div> <div class="ttc" id="bignum_8c_html_ac2b52d6f3f5895bc7bde9e667e26fff5"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ac2b52d6f3f5895bc7bde9e667e26fff5">rb_big_xor</a></div><div class="ttdeci">VALUE rb_big_xor(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l06705">bignum.c:6705</a></div></div> <div class="ttc" id="ruby_8c_html_af2efa898e9eed6fe6715279cb1ec35b0"><div class="ttname"><a href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a></div><div class="ttdeci">char ** argv</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d77/ruby_8c_source.html#l00132">ruby.c:132</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a4affd02e0f0fe17593cd4ecd78cf9064"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a4affd02e0f0fe17593cd4ecd78cf9064">DBL2NUM</a></div><div class="ttdeci">#define DBL2NUM(dbl)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00815">ruby.h:815</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae8cdc17e44905c826bddf416b7bf621c"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae8cdc17e44905c826bddf416b7bf621c">ISSPACE</a></div><div class="ttdeci">#define ISSPACE(c)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01778">ruby.h:1778</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a0e80f207eb41e9010ec9f0f5f9419fea"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a0e80f207eb41e9010ec9f0f5f9419fea">StringValue</a></div><div class="ttdeci">#define StringValue(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00539">ruby.h:539</a></div></div> <div class="ttc" id="internal_8h_html_afd3155042d9d7d93dfc9d3a81aba612a"><div class="ttname"><a href="../../db/dde/internal_8h.html#afd3155042d9d7d93dfc9d3a81aba612a">nlz_long</a></div><div class="ttdeci">static int nlz_long(unsigned long x)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dde/internal_8h_source.html#l00146">internal.h:146</a></div></div> <div class="ttc" id="bignum_8c_html_ae4da1fb07e4f56c24c99cd9313b5462c"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae4da1fb07e4f56c24c99cd9313b5462c">PUSH_BITS</a></div><div class="ttdeci">#define PUSH_BITS(data, numbits)</div></div> <div class="ttc" id="intern_8h_html_aa9ef0eef5110cc98ba79a40a876c3d1c"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aa9ef0eef5110cc98ba79a40a876c3d1c">rb_num_coerce_cmp</a></div><div class="ttdeci">VALUE rb_num_coerce_cmp(VALUE, VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l00292">numeric.c:292</a></div></div> <div class="ttc" id="bignum_8c_html_a4f9122a660ca1a473b6a55958a06adc2"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#a4f9122a660ca1a473b6a55958a06adc2">KARATSUBA_MUL_DIGITS</a></div><div class="ttdeci">#define KARATSUBA_MUL_DIGITS</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00135">bignum.c:135</a></div></div> <div class="ttc" id="bignum_8c_html_ae3c9337ee28a2564cb46cf602e41f315"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ae3c9337ee28a2564cb46cf602e41f315">big_gt</a></div><div class="ttdeci">static VALUE big_gt(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l05470">bignum.c:5470</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac1cf124db1e117ff7d61d608024f63ee"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac1cf124db1e117ff7d61d608024f63ee">SIGNED_VALUE</a></div><div class="ttdeci">#define SIGNED_VALUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00090">ruby.h:90</a></div></div> <div class="ttc" id="bignum_8c_html_aa0a44e8344b688921d4a8867013ee4fe"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#aa0a44e8344b688921d4a8867013ee4fe">BIGDN</a></div><div class="ttdeci">#define BIGDN(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l00080">bignum.c:80</a></div></div> <div class="ttc" id="bignum_8c_html_afa8905c9338ae9d2907f6adc1ef7ceb0"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#afa8905c9338ae9d2907f6adc1ef7ceb0">absint_numwords_generic</a></div><div class="ttdeci">static size_t absint_numwords_generic(size_t numbytes, int nlz_bits_in_msbyte, size_t word_numbits, size_t *nlz_bits_ret)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l03292">bignum.c:3292</a></div></div> </div><!-- fragment --></div><!-- contents --> <!-- start footer part --> <hr class="footer"/><address class="footer"><small> Generated by  <a href="http://www.doxygen.org/index.html"> <img class="footer" src="../../doxygen.png" alt="doxygen"/> </a> 1.8.14 </small></address> </body> </html>