aboutsummaryrefslogtreecommitdiff
path: root/src/exact_value.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/exact_value.cpp')
-rw-r--r--src/exact_value.cpp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/exact_value.cpp b/src/exact_value.cpp
index 9e22c0483..051b6d76a 100644
--- a/src/exact_value.cpp
+++ b/src/exact_value.cpp
@@ -945,7 +945,7 @@ bool compare_exact_values(TokenKind op, ExactValue x, ExactValue y) {
Entity *strip_entity_wrapping(Ast *expr);
Entity *strip_entity_wrapping(Entity *e);
-gbString write_expr_to_string(gbString str, Ast *node);
+gbString write_expr_to_string(gbString str, Ast *node, bool shorthand);
gbString write_exact_value_to_string(gbString str, ExactValue const &v, isize string_limit=36) {
switch (v.kind) {
@@ -981,9 +981,9 @@ gbString write_exact_value_to_string(gbString str, ExactValue const &v, isize st
case ExactValue_Pointer:
return str;
case ExactValue_Compound:
- return write_expr_to_string(str, v.value_compound);
+ return write_expr_to_string(str, v.value_compound, false);
case ExactValue_Procedure:
- return write_expr_to_string(str, v.value_procedure);
+ return write_expr_to_string(str, v.value_procedure, false);
}
return str;
};