summaryrefslogtreecommitdiff
path: root/contrib
diff options
context:
space:
mode:
authorG. Branden Robinson <g.branden.robinson@gmail.com>2023-01-24 02:30:25 -0600
committerG. Branden Robinson <g.branden.robinson@gmail.com>2023-01-25 14:08:58 -0600
commitab79e7eaa987f49a8148f672963016ceff03f1fd (patch)
treee4ec76d559744e3ae00895977d4e3c63ea96cc98 /contrib
parentd30340ec10f8d52e4ece48249a970b7d5be726af (diff)
downloadgroff-git-ab79e7eaa987f49a8148f672963016ceff03f1fd.tar.gz
[mm]: Eliminate spew at high debug levels.
* contrib/mm/m.tmac (df@print-float): Eliminate spew at high debug levels. This macro gets called even when there aren't any floating displays pending, so we cannot assume that related registers are defined.
Diffstat (limited to 'contrib')
-rw-r--r--contrib/mm/ChangeLog7
-rw-r--r--contrib/mm/m.tmac7
2 files changed, 13 insertions, 1 deletions
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 38fa5a794..e515eb600 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,5 +1,12 @@
2023-01-24 G. Branden Robinson <g.branden.robinson@gmail.com>
+ * m.tmac (df@print-float): Eliminate spew at high debug levels.
+ This macro gets called even when there aren't any floating
+ displays pending, so we cannot assume that related registers are
+ defined.
+
+2023-01-24 G. Branden Robinson <g.branden.robinson@gmail.com>
+
* m.tmac (P): Fix missing backslash after brace escape sequence.
Problem introduced by me in 3b1afbdb8e, 6 January.
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index 1ade51665..42eaf349c 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -2012,7 +2012,12 @@ within DF/DE
.if !\\n[ds*float-busy] \{\
. nr ds*float-busy 1
.\" at .DE
-. if \\n[D]>3 .tm print-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]]
+. if \\n[D]>3 \{\
+. tmc print-float: .t=\\n[.t]
+. if r df*height!\\n[df*o-fnr] \
+. tmc , h=\\n[df*height!\\n[df*o-fnr]]
+. tm
+. \}
. \" Df = 1 or 5
. if (\\$1=1)&((\\n[Df]=1):(\\n[Df]=5)) \{\
. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\