# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1004247816 0
# Node ID 894b9bc4ca7a257b1c4b68c4863b39c84f94200a
# Parent  704bd7bfd084d6cd56a68ac8e6152a3a3f2e7c78
(syntax-ppss-stats): Be more robust when dividing by 0.

diff -r 704bd7bfd084 -r 894b9bc4ca7a lisp/emacs-lisp/syntax.el
--- a/lisp/emacs-lisp/syntax.el	Sun Oct 28 04:48:16 2001 +0000
+++ b/lisp/emacs-lisp/syntax.el	Sun Oct 28 05:43:36 2001 +0000
@@ -92,7 +92,10 @@
 (defvar syntax-ppss-stats
   [(0 . 0.0) (0 . 0.0) (0 . 0.0) (0 . 0.0) (0 . 0.0) (1 . 2500.0)])
 (defun syntax-ppss-stats ()
-  (mapcar (lambda (x) (cons (car x) (truncate (/ (cdr x) (car x)))))
+  (mapcar (lambda (x)
+	    (condition-case nil
+		(cons (car x) (truncate (/ (cdr x) (car x))))
+	      (error nil)))
 	  syntax-ppss-stats))
 
 ;;;###autoload