diff options
Diffstat (limited to 'src/lisp/test.lisp')
| -rw-r--r-- | src/lisp/test.lisp | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp index 171cb1aa..b5a82a98 100644 --- a/src/lisp/test.lisp +++ b/src/lisp/test.lisp @@ -1,7 +1,7 @@ (in-module "clojure") -#+:JVM(import "java.lang" '(String Class Math)) -#+:CLI(import "System, mscorlib" '(String Type Math)) +#+:JVM(import "java.lang" '(String Class Math System)) +#+:CLI(import "System, mscorlib" '(String Type Math Console)) (defn f0 ()) @@ -135,4 +135,13 @@ (if (Type.GetType "Object") (String.Intern "fred") Math.PI) - (set Math.PI 3.14))
\ No newline at end of file + (set Math.PI 3.14)) + +(defn prn (x) + #+:JVM (.println System.out x) + #+:CLI (Console.WriteLine x)) + +(defn fmain (args) + (prn "Hello World!")) + +(defmain fmain)
\ No newline at end of file |