aboutsummaryrefslogtreecommitdiff
path: root/src/compile/binops.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/compile/binops.c')
-rw-r--r--src/compile/binops.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/compile/binops.c b/src/compile/binops.c
index acf1e031..89111a5f 100644
--- a/src/compile/binops.c
+++ b/src/compile/binops.c
@@ -228,8 +228,10 @@ Text_t compile_binary_op(env_t *env, ast_t *ast) {
type_to_text(rhs_t), " values");
}
case Concat: {
- if (overall_t == PATH_TYPE) return Texts("Path$concat(", lhs, ", ", rhs, ")");
switch (overall_t->tag) {
+ case PathType: {
+ return Texts("Path$concat(", lhs, ", ", rhs, ")");
+ }
case TextType: {
return Texts("Text$concat(", lhs, ", ", rhs, ")");
}