IN: ui.backend.gtk

[..]

! This word gets replaced when deploying. See 'Vocabulary icons'
! in the docs and tools.deploy.shaker.gtk-icon
: get-icon-data ( -- byte-array )
    "vocab:ui/backend/gtk/icon.png" binary file-contents ;

============

in file tools.deploy.shaker.gtk-icon :

USING: kernel tools.deploy.shaker literals namespaces
vocabs.loader io.pathnames io.files io.encodings.binary ;
IN: ui.backend.gtk

CONSTANT: get-icon-data
    $[
        deploy-vocab get
        dup vocab-dir "icon.png" append-path vocab-append-path
        [ exists? ] keep "vocab:ui/backend/gtk/icon.png" ?
        binary file-contents
    ]