15.4.1466  src/lib/x-kit/widget/lib/ro-pixmap-port.pkg

## ro-pixmap-port.pkg
#

# Compiled by:
#     src/lib/x-kit/widget/xkit-widget.sublib



stipulate
    include package   threadkit;                                                                # threadkit             is from   src/lib/src/lib/thread-kit/src/core-thread-kit/threadkit.pkg
    #
    package qk  =  quark;                                                                       # quark                 is from   src/lib/x-kit/style/quark.pkg
    package xc  =  xclient;                                                                     # xclient               is from   src/lib/x-kit/xclient/xclient.pkg
    package rpm =  ro_pixmap;                                                                   # ro_pixmap             is from   src/lib/x-kit/xclient/src/window/ro-pixmap.pkg
herein


    # This port is implemented in:
    #
    #     src/lib/x-kit/widget/lib/ro-pixmap-ximp.pkg
    #
    package ro_pixmap_port {
        #
        Ro_Pixmap_Port   =    {
                                get_ro_pixmap:  String -> Null_Or( rpm::Ro_Pixmap )
                                    #
                                    # Return X server ro_pixmap,
                                    # creating it if necessary.
                                    #
                                    # Argument is a name string giving
                                    # the source for the required pixel data.
                                    #
                                    # If the name starts with an '@' the
                                    # remainder is interpreted as a filename
                                    # to be loaded via
                                    #
                                    #     bitmap_io::read_bitmap
                                    #
                                    # If the name does not start with a '@'
                                    # it is interpreted as naming a clientside
                                    # window to be located using the lookup
                                    # function given to our originating
                                    #
                                    #     make_readonly_pixmap_ximp
                                    #
                                    # We raise BAD_NAME if unable to convert
                                    # the given name into a ro_pixmap:  
                                    #
                              };
    };                                                                                          # package ro_pixmap_port
end;