long ( dc-set-font long dc-id long font-id)
Sets the current font for the device context. font-id is an ID returned from a call to font-create.