Add builtins for typetests

1 files changed, 8 insertions, 0 deletions

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