File tree Expand file tree Collapse file tree
Clojure/Clojure.Tests/clojure Expand file tree Collapse file tree Original file line number Diff line number Diff line change 1717
1818(ns clojure.test-helper
1919 (:use clojure.test)
20- (:import (System.Reflection BindingFlags))) ; ;; added import
20+ (:import (System.Reflection BindingFlags))) ; ;; added import
2121
22- (let [nl Environment/NewLine] ; ;; (System/getProperty "line.separator")]
23- (defn platform-newlines [s] (.Replace s " \n " nl))) ; ;; .replace
22+ (let [nl Environment/NewLine] ; ;; (System/getProperty "line.separator")]
23+ (defn platform-newlines [s] (.Replace ^String s " \n " nl))) ; ;; .replace, add type hint
2424
2525(defn temp-ns
2626 " Create and return a temporary ns, using clojure.core + uses"
6868 ([klass field-name]
6969 (get-field klass field-name nil ))
7070 ([klass field-name inst]
71- (-> klass (.GetField (name field-name) (enum-or BindingFlags/Public BindingFlags/NonPublic BindingFlags/DeclaredOnly BindingFlags/Instance BindingFlags/Static)) ; ;; (.getDeclaredField (name field-name))
71+ (-> ^Type klass (.GetField (name field-name) (enum-or BindingFlags/Public BindingFlags/NonPublic BindingFlags/DeclaredOnly BindingFlags/Instance BindingFlags/Static)) ; ;; (.getDeclaredField (name field-name)) add type hint
7272 ; ;;(doto (.setAccessible true))
7373 (.GetValue inst)))) ; ;; .get
7474
You can’t perform that action at this time.
0 commit comments