!7

// function: func(S) -> bool (true = handled)
srecord VoiceTarget(S moduleID, JComponent guiComponent, O function) {}

module VoiceTargets > DynObjectTable<VoiceTarget> {
  // API
  
  void addVoiceTarget(S moduleID, JComponent guiComponent, O function) enter {
    final VoiceTarget vt = new(moduleID, guiComponent, function);
    bindToComponent(guiComponent,
      r { add(vt) },
      r { remove(vt) });
  }
  
  L<VoiceTarget> getVoiceTargets() enter {
    ret cloneList(data);
  }
}