Add'l test cases

Author: chrisrink10

CHANGELOG.md

@@ -11,6 +11,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Fixed
  * Fix a bug where `basilisp.lang.compiler.exception.CompilerException` would nearly always suppress line information in it's `data` map (#845)
+ * Fix a bug where the function returned by `partial` retained the meta, arities, and `with_meta` method of the wrapped function rather than creating new ones (#847)
 
 ## [v0.1.0b1]
 ### Added

tests/basilisp/test_core_fns.lpy

@@ -599,10 +599,12 @@
         (is (= #{1 3 :rest} (.-arities new-f)))
         (is (nil? (meta new-f)))
         (is (= {:different-tag :yes} (meta new-f-meta)))
+        (is (= [:a :c] (new-f-meta :c)))
 
         (let [partial-of-partial (partial new-f-meta :b)]
           (is (= #{2 :rest} (.-arities partial-of-partial)))
-          (is (nil? (meta partial-of-partial))))))))
+          (is (nil? (meta partial-of-partial)))
+          (is (= [:a :b :e :f '(:g :h)] (partial-of-partial :e :f :g :h))))))))
 
 (deftest reduce-test
   (testing "with no init"