From a8b1fadd149126e9c8d3081a56d206812211f1e6 Mon Sep 17 00:00:00 2001
From: Peter Mikkelsen <peter@pmikkelsen.com>
Date: Wed, 30 Jun 2021 19:33:55 +0000
Subject: Add builtins for typetests

---
 misc.c | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'misc.c')

diff --git a/misc.c b/misc.c
index c047159..261cc99 100644
--- a/misc.c
+++ b/misc.c
@@ -90,3 +90,11 @@ mknumber(int type, vlong ival, double dval)
 	t->dval = dval;
 	return t;
 }
+
+Term *
+mkstring(Rune *text)
+{
+	Term *t = mkterm(StringTerm);
+	t->text = text;
+	return t;
+}
\ No newline at end of file
-- 
cgit v1.2.3