/*
 * To be called by the "demo6" C example
 */
parse arg what .

say
say '*************************************'
say 'demo6: called with "'what'" argument.'

'Sent to the MYENV callback routine'

select
  when what = 1 then exit
  when what = 2 then exit 12**1.001
  when what = 3 then return 'Exit String'
  otherwise nop
end
