Copyright (C) 1994, Digital Equipment Corp. INTERFACEGEFAlg ; IMPORT Algorithm, RefList, SLisp; TYPE Interp <: PublicInterp; PublicInterp = SLisp.T OBJECT METHODS init(alg: Algorithm.T): Interp; END; PROCEDURE Feedback(interp: Interp; name: TEXT; args: RefList.T);
call the functionname
ininterp
(if it exists) withargs
END GEFAlg.