see #42: a test for serializing a map of functions, checking deep rec…

…ursion on bindings.

project.clj

@@ -51,6 +51,7 @@
                                                    flambo.rdd.hadoopAvro
                                                    flambo.rdd.jdbc
                                                    flambo.api-test
+                                                   flambo.function-test
                                                    flambo.conf-test
                                                    flambo.rdd.hadoopAvro-test
                                                    flambo.rdd.jdbc-test

test/flambo/function_test.clj

@@ -1,3 +1,25 @@
 (ns flambo.function-test
-  (:use clojure.test)
-  (:require [flambo.function :as func]))
+  (:require [flambo.function :as func]
+            [flambo.kryoserializer :as ks]
+            [clojure.test :refer :all]
+            ))
+
+
+(deftest serializable-functions
+
+  (let [kryo (ks/kryo-serializer)
+        myfn (fn [x] (* 2 x))]
+
+    (testing
+      "we can serialize and deserialize it to a function"
+      (is (fn? (ks/round-trip kryo myfn))))
+
+    (testing (is (= 6
+                    ((ks/round-trip kryo myfn) 3))))
+
+
+    (let [x {:f identity :g (fn [s] (identity s))}] ;; check discussion on https://github.com/yieldbot/flambo/issues/42
+      (testing (is (= 'test-symbol
+                      (((ks/round-trip kryo x) :g)
+                       'test-symbol)
+                      ))))))