From 88add732c7f7607d8bad739a1a4560c9c8af87cb Mon Sep 17 00:00:00 2001
From: Bruce Hill <bitbucket@bruce-hill.com>
Date: Mon, 9 Oct 2017 19:51:55 -0700
Subject: [PATCH] Added type function.

---
 lib/metaprogramming.nom | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/metaprogramming.nom b/lib/metaprogramming.nom
index a2cf4bf..408726c 100644
--- a/lib/metaprogramming.nom
+++ b/lib/metaprogramming.nom
@@ -53,6 +53,8 @@ rule [%tree as value] =:
     lua expr "nomsu:tree_to_value(\(%tree), vars)"
 compile [repr %obj] to:
     "nomsu:repr(\(%obj as lua))"
+compile [type %obj] to:
+    "type(\(%obj as lua))"
 
 parse [lua block %block] as: lua code ".."
     |do;