diff options
Diffstat (limited to 'src/interp/i-syscmd.boot')
| -rw-r--r-- | src/interp/i-syscmd.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot index d45895b2..21abc32b 100644 --- a/src/interp/i-syscmd.boot +++ b/src/interp/i-syscmd.boot @@ -942,7 +942,7 @@ displayMacro name == null args => nil null rest args => first args ["tuple",:args] - mathprint ['MAP,[args,:body]] + mathprint ["%Map",[args,:body]] displayWorkspaceNames() == imacs := getInterpMacroNames() @@ -1103,7 +1103,7 @@ displayType($op,u,omitVariableNameIfTrue) == displayValue($op,u,omitVariableNameIfTrue) == null u => sayMSG [" Value of ",fixObjectForPrinting PNAME $op,'": (none)"] expr := objValUnwrap(u) - expr is [op,:.] and (op = 'MAP) or objMode(u) = $EmptyMode => + expr is [op,:.] and (op = "%Map") or objMode(u) = $EmptyMode => displayRule($op,expr) label:= omitVariableNameIfTrue => |