15.3.763  src/lib/x-kit/xclient/src/window/font-imp-old.api

## font-imp-old.api
#
# The font imp is responsible for mapping
# font names to fonts.
#
# If two different threads open the same font
# they will be able to share the representation.
#
# Eventually, we will do some kind
# of finalization of fonts.                             XXX BUGGO FIXME

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

stipulate
    package dy  =  display_old;                                 # display_old   is from   src/lib/x-kit/xclient/src/wire/display-old.pkg
    package fb  =  font_base_old;                               # font_base_old is from   src/lib/x-kit/xclient/src/window/font-base-old.pkg
herein

    # This api is implemented in:
    #
    #     src/lib/x-kit/xclient/src/window/font-imp-old.pkg

    api Font_Imp_Old {
        #
        Font_Imp;

        exception FONT_NOT_FOUND;

        make_font_imp:  dy::Xdisplay -> Font_Imp;

        open_a_font:    Font_Imp -> String -> fb::Font;
            #
            # Returns the opened font.
            # Raises exception FONT_NOT_FOUND
            # if the font cannot be found on the
            # X server's font path.
    };

end;

## COPYRIGHT (c) 1990, 1991 by John H. Reppy.  See SMLNJ-COPYRIGHT file for details.
## Subsequent changes by Jeff Prothero Copyright (c) 2010-2015,
## released per terms of SMLNJ-COPYRIGHT.