http://www.jianshu.com/p/d1aa6e3920f1

	

		
		

			Clojure使用Java方法
		

		

			Clojure有个很强大的功能,就是你可以使用Lisp语言风格无缝调用java api(java interop).这无疑是如虎添翼.
		

		

			调用一个Java对象的方法
		

		

			语法:
		

.method-name object-value args ...
user=> (.toUpperCase "hello,clojure")
"HELLO,CLOJURE"
user=> (.indexOf "hello,clojure" "j")
9
user=> (. "hello,clojure" indexOf "j")
9

com.lightsword=> (.. System (getProperties)(get "os.name"))
"Mac OS X"

com.lightsword=> (.substring "hello,clojure" 6)
"clojure"
		

			其实都使用的是dot operator,形如：
		
(. object-expr-or-classname-symbol method-or-member-symbol optional-args*)
		

			设置一个Java对象的公有成员变量
		
		

			语法如下：
		
(set! (.member-variable object-variable) new-value)
		

			比如
		
user=> (import java.awt.Point)
java.awt.Point
user=> (let [pt (Point. 0 10)]
  #_=> (set! (.y pt) 100)
  #_=> (.y pt));
100
		

			调用静态公有成员变量/函数
		
		

			用/分开类和成员
		
user=> (java.lang.Math/abs -3)
3
user=> (java.lang.Math/pow 2 10)
1024.0
		

			创建一个对象
		
		

			两种方法
		
(Class-name. arg1 arg2 ...)
		

			注意，类名后面有个.(a dot)这个最常用;
		
		

			还有就是
		
(new Class-name arg1 arg2 ...)
		

			new的后面类名,构造函数里面的参数不需要使用括号()
		
user=> (String. "Clojure!")
"Clojure!"
user=> (new String("Clojure"))

ClassCastException java.lang.String cannot be cast to clojure.lang.IFn  user/eval1266 (form-init7793881567968869401.clj:1)
user=> (new String "Clojure")
"Clojure"
		

			连续调用一个对象的方法
		
		

			将多个操作（多行代码）通过点号"."链接在一起成为一句代码,我们称之为"链式编程风格"。 链式代码通常要求操作有返回值， 但对于很多操作大都是void型，什么也不返回，这样就很难链起来了.
		
		

			我们在Clojure中这样来写
		
user=> (doto (java.util.Stack.)
  #_=> (.push "Hello!")
  #_=> (.push "Clojure.")
  #_=> )
["Hello!" "Clojure."]

com.lightsword=> (doto (java.util.HashMap.)(.put "k" 1)(.put "v" 2))
{"v" 2, "k" 1}
		

			import java package
		
		

			语法
		
(import [package.name1 ClassName1 ClassName2]  
        [package.name2 ClassName3 ClassName4])
		

			实例
		
user=> (import [java.util Date Stack]
  #_=> [java.net Proxy URI])
java.net.URI
user=> (Date.)
#inst "2016-06-28T15:19:05.923-00:00"
		

			放入namespace中是推荐的写法，也就是前面加上ns:
		
user=> (ns com.lightsword
  #_=> (:import [java.util Date Stack]
  #_=>  [java.net Proxy URI])
  #_=> )
nil
com.lightsword=> (Date.)
#inst "2016-06-28T15:21:43.048-00:00"
		

			访问一个类的内部类
		
		

			用如下形式：
		
package.class-name$inner-class
	


作者：东海陈光剑

链接：http://www.jianshu.com/p/d1aa6e3920f1

來源：简书

著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注明出处。