test: module docs

tests/lean/moduleDoc.lean

@@ -0,0 +1,13 @@
+import Lean
+
+/-! Testing module documentation. -/
+
+open Lean
+
+def tst : MetaM Unit := do
+  let docs := getMainModuleDoc (← getEnv)
+  IO.println <| docs.toList.map repr
+
+/-! Another module doc. -/
+
+#eval tst

tests/lean/moduleDoc.lean.expected.out

@@ -0,0 +1 @@
+["Testing module documentation. ", "Another module doc. "]