diff --git a/janet/interpreter.janet b/janet/interpreter.janet
index 8b460c3..eaad40d 100644
--- a/janet/interpreter.janet
+++ b/janet/interpreter.janet
@@ -358,8 +358,8 @@
 # Depends on: good string representation of patterns
 # For now, this should be enough to tall the thing
 (defn- fnn [ast ctx]
-  (def {:name name :data clauses} ast)
-  (def the-fn @{:name name :^type :fn :body clauses :ctx ctx})
+  (def {:name name :data clauses :doc doc} ast)
+  (def the-fn @{:name name :^type :fn :body clauses :ctx ctx :doc doc})
   (set (ctx name) the-fn))
 
 (defn- is_placeholder [x] (= x :_))