From 4ea70bf39971eeb742a5de689a9ad8ba63559ecb Mon Sep 17 00:00:00 2001 From: Andrey Orst Date: Sat, 14 Nov 2020 16:51:51 +0300 Subject: Feature(doc): upload autogenerated documentation. --- tests/fn.fnl | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'tests') diff --git a/tests/fn.fnl b/tests/fn.fnl index e0af7cb..aa86b12 100644 --- a/tests/fn.fnl +++ b/tests/fn.fnl @@ -7,21 +7,21 @@ "docstring" [x] x) (assert-eq (meta f) (when-meta {:fnl/docstring "docstring" - :fnl/arglist ["x"]})) + :fnl/arglist ["[x]"]})) (fn* f "docstring" ([x] x)) (assert-eq (meta f) (when-meta {:fnl/docstring "docstring" - :fnl/arglist ["x"]})) + :fnl/arglist ["([x])"]})) (fn* f "docstring" ([x] x) ([x y] (+ x y))) (assert-eq (meta f) (when-meta {:fnl/docstring "docstring" - :fnl/arglist ["\n [x]" - "\n [x y]"]})) + :fnl/arglist ["\n ([x])" + "\n ([x y])"]})) (fn* f "docstring" @@ -29,9 +29,9 @@ ([x y] (+ x y)) ([x y & z] (+ x y))) (assert-eq (meta f) (when-meta {:fnl/docstring "docstring" - :fnl/arglist ["\n [x]" - "\n [x y]" - "\n [x y & z]"]})))) + :fnl/arglist ["\n ([x])" + "\n ([x y])" + "\n ([x y & z])"]})))) (deftest fn+ (testing "fn+ meta" -- cgit v1.2.3