From 8b8afefc458810da516272d679b5a9de1f0daa17 Mon Sep 17 00:00:00 2001
From: Joel Martin <github@martintribe.org>
Date: Sat, 4 Oct 2014 23:16:19 -0500
Subject: go: step2_eval vector/hash-map in eval_ast

---
 go/src/types/types.go | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'go/src/types')

diff --git a/go/src/types/types.go b/go/src/types/types.go
index e3d8163..9fcc78c 100644
--- a/go/src/types/types.go
+++ b/go/src/types/types.go
@@ -34,3 +34,19 @@ func List_Q(obj MalType) bool {
     default:   return false
     }
 }
+
+// Vectors
+func Vector_Q(obj MalType) bool {
+    switch obj.(type) {
+    case Vector: return true
+    default:     return false
+    }
+}
+
+// Hash Maps
+func Hash_Map_Q(obj MalType) bool {
+    switch obj.(type) {
+    case map[string]MalType: return true
+    default:                 return false
+    }
+}
-- 
cgit v1.2.3