cw forces app quit when launched via click in 64 bit

The following code works differently according to a combination of launch method and bitness;

      i=winio$('%ww[no_border,no_maxbox]&')
      i=winio$('%ca[window caption]&')
      i=winio$('%pv&')
C *** At present under 64 bit when launched by double clicking, this crashes.
      i=winio$('%53.10cw[hscroll,vscroll]&',2)
      i=winio$('%hw',information)

Works: 32 bit - launched from cmd 32 bit - launched from double click 64 bit - launched from cmd

Fails with a silent process exit: 64 bit - launched from double click

I'm guessing that ClearWin sets the default I/O units up differently between 32 and 64 bit. Another guess is that by running from a command prompt the default units are initialised somehow, bypassing the double click bug.

Can anyone throw any light on this behaviour?

Regards

Ryan

Thank you for the feedback. I will make a note that this should be investigated.

Ryan

Your code works for me but it may be because I am using the latest DLLs. Issues relating to %cw have been raised elsewhere and have been fixed.

Here is my version...

      winapp
      integer i,winio$
      integer,external::start
      integer(7) information
      i=winio$('%ww[no_border,no_maxbox]&') 
      i=winio$('%ca[window caption]&') 
      i=winio$('%sc&', start)
      i=winio$('%pv&') 
      i=winio$('%53.10cw[hscroll,vscroll]&',2) 
      i=winio$('%hw',information) 
      end

      integer function start()
      write(2,*) 'Hello'
      start = 2
      end function

The latest beta release may have the relevant fixes. See https://forums.silverfrost.com/Forum/Topic/3375