RosettaCodeData/Task/Higher-order-functions/PostScript/higher-order-functions.ps

11 lines
259 B
PostScript

% operator example
% 'ifelse' is passed a boolean and two procedures
/a 5 def
a 0 gt { (Hello!) } { (World?) } ifelse ==
% procedure example
% 'bar' is loaded onto the stack and passed to 'foo'
/foo { exec } def
/bar { (Hello, world!) } def
/bar load foo ==