From 139225dd14f9069c6df9397f39a882e82cc0ce4e Mon Sep 17 00:00:00 2001
From: hellerve <veit@veitheller.de>
Date: Mon, 22 May 2017 18:23:06 -0400
Subject: [PATCH] types: added native function type

---
 src/BC/Types.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/BC/Types.hs b/src/BC/Types.hs
index 3ccb1cc..d47ba17 100644
--- a/src/BC/Types.hs
+++ b/src/BC/Types.hs
@@ -10,6 +10,7 @@ data Value = BNum Number
            | BWhile [Value] [[Value]]
            | BDef Value [Value]
            | BFun String [String] [[Value]]
+           | BNative ([Value] -> Value)
            | BCall Value [[Value]]
            | BBraced [Value]
            | BErr String