aboutsummaryrefslogtreecommitdiff
path: root/test2.lang
blob: 8f64f672b2b8b438de5c0b998d27f53a217cf355 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
(import java.lang.System)
(require "./another" as another)

(ann-class java.lang.String)

(ann-class java.io.PrintStream
           methods
           (: println (-> [java.lang.String] Void)))

(ann-class java.lang.System
           fields
           (: out java.io.PrintStream))

(defclass Tagged [[java.lang.String tag] [java.lang.Object value]])

(definterface Function
  (: apply (-> [java.lang.Object] java.lang.Object)))

(def const "IDENTITY")

(def sample (#Tag "value"))

(def (main args)
  (if true
    (_. (_.. System out) (println (another/id "YOLO")))
    (_. (_.. System out) (println "FALSE"))))