lib/lisp/tests/pretty-print-tests.nydp in nydp-0.4.2 vs lib/lisp/tests/pretty-print-tests.nydp in nydp-0.4.3

- old
+ new

@@ -204,31 +204,28 @@ ("something with a plain string literal" (pp '(def yoohoo (it) (wrangle "foobar" it))) "(def yoohoo (it) (wrangle \"foobar\" it))") - ("a 'let form" - (pp '(let acc nil - (rfnwith flattenize (x things) - (if (pair? x) - (eachr flattenize x) - (push x acc))) - acc)) + ("something with a nil and t literal" + (pp '(def yoohoo (it) (wrangle nil t it))) + "(def yoohoo (it) (wrangle nil t it))") + + ("a 'let form squished into one line" + (pp '(let acc nil (rfnwith flattenize (x things) (if (pair? x) (eachr flattenize x) (push x acc))) acc)) "(let acc nil (rfnwith flattenize (x things) (if (pair? x) (eachr flattenize x) (push x acc))) acc)") - ("a real-life example from utils" + ("a real-life example from utils with improper 'if formatting" (pp '(def flatten (things) (let acc nil (rfnwith flattenize (x things) - (if (pair? x) - (eachr flattenize x) - (push x acc))) + (if (pair? x) (eachr flattenize x) (push x acc))) acc))) "(def flatten (things) (let acc nil (rfnwith flattenize (x things) (if (pair? x)