From 25a42c0838e4cbd613e6367b3befd48b404ce852 Mon Sep 17 00:00:00 2001
From: "Jakob L. Kreuze" <zerodaysfordays@sdf.lonestar.org>
Date: Sun, 19 May 2019 20:32:39 -0400
Subject: Add docstrings

---
 build.hy | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/build.hy b/build.hy
index 1737d98..8546518 100644
--- a/build.hy
+++ b/build.hy
@@ -31,6 +31,7 @@
 (import [DUCK.Tools [buildhelper]])
 
 (defn walk-ast [node]
+  "Normalize the syntax tree for compatibility with DUCK."
   (when (and (isinstance node Return)
              (= node.value.id "None"))
     (setv node.value.id None))
@@ -39,6 +40,7 @@
       (walk-ast child))))
 
 (defn my-hy-compile [source]
+  "Return a normalized syntax tree for SOURCE."
   (let [ast (hy-compile (hy-parse source) "<unknown>")]
     (walk-ast ast)
     ast))
-- 
cgit v1.3