1 21 22 package org.armedbear.lisp; 23 24 public abstract class ClosureTemplateFunction extends Closure 25 { 26 public ClosureTemplateFunction(LispObject lambdaList) 27 throws ConditionThrowable 28 { 29 super(lambdaList, NIL, null); 30 } 31 32 public final LispObject execute() throws ConditionThrowable 33 { 34 return notImplemented(); 35 } 36 37 public final LispObject execute(LispObject arg) throws ConditionThrowable 38 { 39 return notImplemented(); 40 } 41 42 public final LispObject execute(LispObject first, LispObject second) 43 throws ConditionThrowable 44 { 45 return notImplemented(); 46 } 47 48 public final LispObject execute(LispObject first, LispObject second, 49 LispObject third) 50 throws ConditionThrowable 51 { 52 return notImplemented(); 53 } 54 55 public final LispObject execute(LispObject first, LispObject second, 56 LispObject third, LispObject fourth) 57 throws ConditionThrowable 58 { 59 return notImplemented(); 60 } 61 62 public final LispObject execute(LispObject[] args) throws ConditionThrowable 63 { 64 return notImplemented(); 65 } 66 67 private static final LispObject notImplemented() throws ConditionThrowable 68 { 69 return signal(new LispError("ClosureTemplateFunction.execute(): not implemented")); 70 } 71 72 public abstract LispObject execute(LispObject[] args, LispObject[][] context) 73 throws ConditionThrowable; 74 } 75 | Popular Tags |