Copyright (C) 1994, Digital Equipment Corp.
INTERFACE GEFLisp;
IMPORT GEFClass, RefList, SLisp;
PROCEDURE RegisterPO(interp: SLisp.T; name: TEXT; po: GEFClass.ParseObject);
Register in interp
a lisp function named name
that will create an element of
type po
PROCEDURE RegisterFuns(interp: SLisp.T);
Register in interp
the GEF functions - get
set
and delete
.
Also do ZeusifyInterp.
PROCEDURE ZeusifyInterp(interp: SLisp.T);
Register zeus specific functions for print and backtrace +
variants of True and False
PROCEDURE EvalList(interp: SLisp.T; list: RefList.T): RefList.T RAISES {SLisp.Error};
return a list consisting of the evaluated value of each element of list
PROCEDURE QuoteList(list: RefList.T): RefList.T;
return a list consisting of each element of list
quoted. i.e.
QuoteList((a b c)) yields ((quote a) (quote b) (quote c))
END GEFLisp.