# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1115062887 0
# Node ID 729b3756f34778684a4d20eb8d664a1c218d7a64
# Parent  e570688e1d80e3f1ea835e202c6ebfd3e96196a3
(calc-word-size): Replace string-to-int by string-to-number.

diff -r e570688e1d80 -r 729b3756f347 lisp/calc/calc-bin.el
--- a/lisp/calc/calc-bin.el	Mon May 02 19:40:50 2005 +0000
+++ b/lisp/calc/calc-bin.el	Mon May 02 19:41:27 2005 +0000
@@ -1,6 +1,6 @@
 ;;; calc-bin.el --- binary functions for Calc
 
-;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1991, 1992, 1993, 2001, 2005 Free Software Foundation, Inc.
 
 ;; Author: David Gillespie <daveg@synaptics.com>
 ;; Maintainer: Jay Belanger <belanger@truman.edu>
@@ -135,7 +135,7 @@
 	       (if (equal n "")
 		   calc-word-size
 		 (if (string-match "\\`[-+]?[0-9]+\\'" n)
-		     (string-to-int n)
+		     (string-to-number n)
 		   (error "Expected an integer")))
 	     (prefix-numeric-value n)))
    (or (= n calc-word-size)