branch: externals/caml
commit 43a83dce80efaf4d6229c127884d22ab6fab6f5f
Author: Damien Doligez <damien.doligez-inria.fr>
Commit: Damien Doligez <damien.doligez-inria.fr>

    bug string-to-number
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@8990 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/caml.el b/caml.el
index 113fce0..c68d109 100644
--- a/caml.el
+++ b/caml.el
@@ -814,7 +814,7 @@ from an error message produced by camlc.")
 (defvar caml-next-error-skip-warnings-flag nil)
 
 (defun caml-string-to-int (x)
-  (if boundp 'string-to-number (string-to-number x) (string-to-int x)))
+  (if (fboundp 'string-to-number) (string-to-number x) (string-to-int x)))
 
 ;;itz 04-21-96 somebody didn't get the documetation for next-error
 ;;right. When the optional argument is a number n, it should move

Reply via email to