From 2ea40ef66a15f58f26b1485880bb32c3b873c2b7 Mon Sep 17 00:00:00 2001
From: Jukka Aho <ahojukka5@gmail.com>
Date: Mon, 6 Jul 2015 22:24:15 +0300
Subject: [PATCH] added separate script for doing doctests and reporting them
 to web site

---
 docs/build_doctest.jl | 46 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 46 insertions(+)
 create mode 100644 docs/build_doctest.jl

diff --git a/docs/build_doctest.jl b/docs/build_doctest.jl
new file mode 100644
index 0000000..d0d9ca7
--- /dev/null
+++ b/docs/build_doctest.jl
@@ -0,0 +1,46 @@
+using Docile, Lexicon, JuliaFEM
+
+"""
+Searches recursively all the modules from packages. As documentation grows, it's a bit
+troublesome to add all the new modules manually, so this function searches all the modules
+automatically. 
+
+Parameters
+----------
+    module_: Module
+        Module where we want to search modules inside
+    append_list: Array{Module, 1}
+        Array, where we append Modules as we find them
+
+Returns
+-------
+    None. Void function, which manipulates the append_list 
+"""
+function search_modules!(module_::Module, append_list::Array{Module, 1})
+    all_names = names(module_, true)
+    for each in all_names
+        inner_module = module_.(each)
+        if (typeof(inner_module) == Module) && !(inner_module in append_list)
+            push!(append_list, inner_module)
+            search_modules!(inner_module, append_list)
+        end
+    end
+end
+
+append_list = Array(Module, 0)
+search_modules!(JuliaFEM, append_list)
+
+const modules = append_list
+
+cd(dirname(@__FILE__)) do
+    # Run the doctests *before* we start to generate *any* documentation.
+    for m in modules
+        failures = failed(doctest(m))
+        if !isempty(failures.results)
+            println("\nDoctests failed, aborting commit.\n")
+            display(failures)
+            exit(1) # Bail when doctests fail.
+        end
+    end
+
+end