15.3.770  src/lib/x-kit/xclient/src/window/keymap-ximp.api

## keymap-ximp.api
#
# For the big picture see the imp dataflow diagrams in
#
#     src/lib/x-kit/xclient/src/window/xclient-ximps.pkg
#
# Use protocol is:
#
# Next up is parameter support for:
#    error_sink
#    to_x_sink
#    from_x_mailqueue
#
#   {   (make_run_gun  ())   ->   { run_gun',  fire_run_gun  };
#       (make_end_gun ())   ->   { end_gun', fire_end_gun };
#
#       sx_state = sx::make_keymap_ximp_state ();
#       sx_ports = sx::make_keymap_ximp "Some name";
#       sx       = sx_ports.clientport;                                                         # The clientport represents the imp for most purposes.
#
#       ...                                                                                     # Create other app imps.
#
#       sx::configure_keymap_imp
#         (sxports.configstate, sx_state, { ... }, run_gun', end_gun' );                                # Wire imp to other imps.
#                                                                                               # All imps will start when run_gun' fires.
#
#       ...                                                                                     # Wire up other app imps similarly.
#
#       fire_run_gun ();                                                                        # Start all app imps running.
#
#       sx.send_xrequest(...);                                                                  # Many calls like this over lifetime of imp.
#       ...                                                                                     # Similar calls to other app imps.
#
#       fire_end_gun ();                                                                        # Shut the imp down cleanly.
#   };

# Compiled by:
#     src/lib/x-kit/xclient/xclient-internals.sublib


stipulate
    include package   threadkit;                                                                # threadkit                                     is from   src/lib/src/lib/thread-kit/src/core-thread-kit/threadkit.pkg
    #
    package x2s =  xclient_to_sequencer;                                                        # xclient_to_sequencer                          is from   src/lib/x-kit/xclient/src/wire/xclient-to-sequencer.pkg
    package dy  =  display;                                                                     # display                                       is from   src/lib/x-kit/xclient/src/wire/display.pkg
    package r2k =  xevent_router_to_keymap;                                                     # xevent_router_to_keymap                       is from   src/lib/x-kit/xclient/src/window/xevent-router-to-keymap.pkg

#   oldworld -- do not use:
#   package dy  =  display_old;                                                                 # display_old                                   is from   src/lib/x-kit/xclient/src/wire/display-old.pkg

herein


    # This api is implemented in:
    #
    #     src/lib/x-kit/xclient/src/window/keymap-ximp.pkg
    #
    api Keymap_Ximp
    {
        Exports = {                                                                             # Ports we export for use by other imps.
                      xevent_router_to_keymap:  r2k::Xevent_Router_To_Keymap                    # Requests from widget/application code.
                  };

        Imports   = {                                                                           # Ports we use which are exported by other imps.
                      xclient_to_sequencer:     x2s::Xclient_To_Sequencer                       # Send requests to X server.
                    };

        Option = MICROTHREAD_NAME String;                                                       # 

        Keymap_Egg =  Void -> (Exports,   (Imports, Run_Gun, End_Gun) -> Void);

        make_keymap_egg:   (dy::Xdisplay, List(Option)) -> Keymap_Egg;                          # 
    };                                                                                          # api Keymap_Ximp
end;