aboutsummaryrefslogtreecommitdiff
path: root/src/interp/format.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/format.boot')
-rw-r--r--src/interp/format.boot2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot
index d3d6fbc9..9e2c9416 100644
--- a/src/interp/format.boot
+++ b/src/interp/format.boot
@@ -291,6 +291,7 @@ dollarPercentTran x ==
EQ(y, y1) and EQ(z, z1) => x
[y1, :z1]
x = "$" or x = '"$" => "%%"
+ x = "T$" or x = '"T$" => "T"
x
formatSignatureAsTeX sig ==
@@ -632,6 +633,7 @@ application2String(op,argl, linkInfo) ==
null argl =>
(op' := isInternalFunctionName(op)) => op'
app2StringWrap(formWrapId op, linkInfo)
+ op = "[||]" => concat("[|",concat(prefix2String0 argl,"|]"))
1=#argl =>
arg := first argl
arg is ["<",:.] or arg is ["(",:.] => concat(op,arg)