From acd3f2d39edb2cc306632a19a1eb4b7b0ba02836 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Thu, 26 Dec 2024 17:31:33 -0500
Subject: Add text indexing

---
 typecheck.c | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'typecheck.c')

diff --git a/typecheck.c b/typecheck.c
index 2b5dd701..0bca1e3a 100644
--- a/typecheck.c
+++ b/typecheck.c
@@ -779,6 +779,8 @@ type_t *get_type(env_t *env, ast_t *ast)
                 return Type(OptionalType, table_type->value_type);
             else
                 code_err(indexing->indexed, "This type doesn't have a value type or a default value");
+        } else if (value_t->tag == TextType) {
+            return value_t;
         } else {
             code_err(ast, "I don't know how to index %T values", indexed_t);
         }
-- 
cgit v1.2.3