public override object GetSymbol(string eventName)
{
eventName = eventName.ToLower();
Symbol s = Lisp.getCurrentPackage().findAccessibleSymbol(eventName);
return(s);
}
public override bool IsSubscriberOf(string eventName)
{
eventName = eventName.ToUpper();
Symbol s = Lisp.getCurrentPackage().findAccessibleSymbol(eventName);
LispObject fun = s.getSymbolFunction();
if (fun == null || fun == Lisp.NIL)
{
return(false);
}
return(true);
}