file_chooser class">>
    class file_chooser : public toplevel {              // toplevel 
  
      file_chooser() : toplevel( gensym("filechooser") ) { init(); }
  
      int operator()();
      char* get() { return e->get(); }
  
    protected:
      button* b; button *c;                          // OK and CANCEL 
      entry* e; listbox* l;
      int install(char* s, binding* a, char* opts);
      void init();
      void list();
    };