made fn() public, changed compiler to call it

1 files changed, 2 insertions, 2 deletions

diff --git a/src/lisp/clojure.lisp b/src/lisp/clojure.lisp
index 6975221f..1d9952de 100644
--- a/src/lisp/clojure.lisp
+++ b/src/lisp/clojure.lisp
@@ -839,7 +839,7 @@
     ((:expression :return)
      (format t "~A.getValue()" (var-member-name (@ :symbol expr))))
     (:fn
-     (format t "~A.fn" (var-member-name (@ :symbol expr))))
+     (format t "~A.fn()" (var-member-name (@ :symbol expr))))
     (:statement)))
 
 (defun emit-accessor (context expr)
@@ -1138,7 +1138,7 @@
 (defun emit-main (context expr)
   (ccase context
     (:top
-     (format t "static public void ~A(String[] args){~%try{~%~A.fn.invoke(args);~%}~%catch(Exception ex){}~%}~%"
+     (format t "static public void ~A(String[] args){~%try{~%~A.fn().invoke(args);~%}~%catch(Exception ex){}~%}~%"
              (main-string) (var-member-name (@ :fname expr))))))
 
 (defun main-string ()