Mercurial > hg > xemacs-beta

comparison src/number-mp.c @ 4833:4dd2389173fc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author Ben Wing <ben@xemacs.org>
date Sun, 10 Jan 2010 01:06:15 -0600
parents 2fc0e2f18322
children 16112448d484
comparison
equal deleted inserted replaced
4832:07fa38c30fdf 4833:4dd2389173fc
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 for more details. 14 for more details.
15 15
16 You should have received a copy of the GNU General Public License 16 You should have received a copy of the GNU General Public License
17 along with XEmacs; see the file COPYING. If not, write to 17 along with XEmacs; see the file COPYING. If not, write to
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, 18 the Free Software Foundation, Inc., 51 Franklin St - Fifth Floor,
19 Boston, MA 02111-1307, USA. */ 19 Boston, MA 02111-1301, USA. */
20 20
21 /* Synched up with: Not in FSF. */ 21 /* Synched up with: Not in FSF. */
22 22
23 #include <config.h> 23 #include <config.h>
24 #include <limits.h> 24 #include <limits.h>
219 neg = 1; 219 neg = 1;
220 } 220 }
221 221
222 mbase = MP_ITOM ((short) base); 222 mbase = MP_ITOM ((short) base);
223 MP_MOVE (bignum_zero, b); 223 MP_MOVE (bignum_zero, b);
224 224
225 for (digit = char_to_number (*s); digit >= 0 && digit < base; 225 for (digit = char_to_number (*s); digit >= 0 && digit < base;
226 digit = char_to_number (*++s)) 226 digit = char_to_number (*++s))
227 { 227 {
228 MINT *temp; 228 MINT *temp;
229 229