annotate src/samer/silk/JavaProcedure.java @ 8:5e3cbbf173aa tip

Reorganise some more
author samer
date Fri, 05 Apr 2019 22:41:58 +0100
parents bf79fb79ee13
children
rev   line source
samer@0 1 package samer.silk;
samer@0 2 import samer.core.*;
samer@0 3 import jscheme.*;
samer@0 4 import jsint.*;
samer@0 5
samer@0 6 //public class JavaProcedure implements SchemeProcedure {
samer@0 7 public class JavaProcedure extends Procedure {
samer@0 8 public Object apply(Object [] args) {
samer@0 9 for (int i=0; i<args.length; i++) {
samer@0 10 Shell.trace("arg "+i+"="+args[i]);
samer@0 11 }
samer@0 12 return null;
samer@0 13 }
samer@0 14
samer@0 15 public Object apply(Pair args) {
samer@0 16 Shell.trace("apply to Pair");
samer@0 17 return apply(U.listToVector(args));
samer@0 18 }
samer@0 19 public Object apply(SchemePair args) {
samer@0 20 Shell.trace("apply to SchemePair");
samer@0 21 return apply(U.listToVector(args));
samer@0 22 }
samer@0 23
samer@0 24
samer@0 25 // public void run() { Shell.print("run!"); }
samer@0 26 }
samer@0 27