diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 0e90565d..4bea5031 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -4530,6 +4530,25 @@ public static Object compile(Reader rdr, String sourcePath, String sourceName) t clinitgen.returnValue(); clinitgen.endMethod(); +// //main +// GeneratorAdapter maingen = new GeneratorAdapter(ACC_PUBLIC + ACC_STATIC, +// Method.getMethod("void main (String[])"), +// null, +// null, +// cv); +// maingen.visitCode(); +// maingen.push(fn.internalName.replace('/', '.')); +// maingen.push("main"); +// maingen.invokeStatic(RT_TYPE, Method.getMethod("clojure.lang.Var var(String,String)")); +// maingen.loadArgs(); +// maingen.invokeStatic(RT_TYPE,Method.getMethod("clojure.lang.ISeq seq(Object)")); +// maingen.invokeInterface(IFN_TYPE, new Method("applyTo",OBJECT_TYPE,new Type[]{Type.getType(ISeq.class)})); +// maingen.pop(); +// +// //end of main +// maingen.returnValue(); +// maingen.endMethod(); + //end of class cv.visitEnd(); |