Using defineop

This page applies to Harlequin v13.1r0 and later; both Harlequin Core and Harlequin MultiRIP.

Here defineop is used to create a new operator called CurrentResolution which returns the X resolution of the device:

TEXT

            <<
                /CurrentResolution {
                        currentpagedevice /HWResolution get 0 get
                } bind
            >> 1183615869 internaldict /defineop get exec