Add graphics primitives:

Add graphics primitives:

  X-FONT-STRUCTURE
    Given an X display and the name of a font, return a Scheme
    equivalent of the X font structure, which describes the dimensions
    of each character, etc.

  X-GRAPHICS-COPY-AREA
    Given an X window and coordinates describing two rectangles in it,
    move the contents of the first rectangle to the other.