(define-record-type xglyphinfo :xglyphinfo (make-xglyphinfo c-pointer) xglyphinfo? (c-pointer xglyphinfo-c-pointer)) (define-exported-binding "xglyphinfo" :xglyphinfo) (import-lambda-definition scx-xglyphinfo-width (xglyphinfo) "scx_xglyphinfo_width_get") (import-lambda-definition scx-xglyphinfo-height (xglyphinfo) "scx_xglyphinfo_height_get") (import-lambda-definition scx-xglyphinfo-x (xglyphinfo) "scx_xglyphinfo_x_get") (import-lambda-definition scx-xglyphinfo-y (xglyphinfo) "scx_xglyphinfo_y_get") (import-lambda-definition scx-xglyphinfo-xOff (xglyphinfo) "scx_xglyphinfo_xOff_get") (import-lambda-definition scx-xglyphinfo-yOff (xglyphinfo) "scx_xglyphinfo_yOff_get") (import-lambda-definition set-scx-xglyphinfo-width! (xglyphinfo new-value) "scx_xglyphinfo_width_set") (import-lambda-definition set-scx-xglyphinfo-height! (xglyphinfo new-value) "scx_xglyphinfo_height_set") (import-lambda-definition set-scx-xglyphinfo-x! (xglyphinfo new-value) "scx_xglyphinfo_x_set") (import-lambda-definition set-scx-xglyphinfo-y! (xglyphinfo new-value) "scx_xglyphinfo_y_set") (import-lambda-definition set-scx-xglyphinfo-xOff! (xglyphinfo new-value) "scx_xglyphinfo_xOff_set") (import-lambda-definition set-scx-xglyphinfo-yOff! (xglyphinfo new-value) "scx_xglyphinfo_yOff_set")