===================================================================
RCS file: /cvs/mandoc/out.c,v
retrieving revision 1.70
retrieving revision 1.71
diff -u -p -r1.70 -r1.71
--- mandoc/out.c	2017/06/27 18:25:02	1.70
+++ mandoc/out.c	2018/08/18 16:44:55	1.71
@@ -1,7 +1,7 @@
-/*	$Id: out.c,v 1.70 2017/06/27 18:25:02 schwarze Exp $ */
+/*	$Id: out.c,v 1.71 2018/08/18 16:44:55 schwarze Exp $ */
 /*
  * Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
- * Copyright (c) 2011, 2014, 2015, 2017 Ingo Schwarze <schwarze@openbsd.org>
+ * Copyright (c) 2011,2014,2015,2017,2018 Ingo Schwarze <schwarze@openbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -320,7 +320,7 @@ tblcalc_number(struct rofftbl *tbl, struct roffcol *co
 		const struct tbl_opts *opts, const struct tbl_dat *dp)
 {
 	int		 i;
-	size_t		 sz, psz, ssz, d;
+	size_t		 sz, ssz, d;
 	const char	*str;
 	char		*cp;
 	char		 buf[2];
@@ -342,17 +342,15 @@ tblcalc_number(struct rofftbl *tbl, struct roffcol *co
 	buf[0] = opts->decimal;
 	buf[1] = '\0';
 
-	psz = (*tbl->slen)(buf, tbl->arg);
-
 	if (NULL != (cp = strrchr(str, opts->decimal))) {
 		buf[1] = '\0';
 		for (ssz = 0, i = 0; cp != &str[i]; i++) {
 			buf[0] = str[i];
 			ssz += (*tbl->slen)(buf, tbl->arg);
 		}
-		d = ssz + psz;
+		d = ssz;
 	} else
-		d = sz + psz;
+		d = sz;
 
 	/* Adjust the settings for this column. */