OpenEuphoria

Re: Why is EXW Win 3.1 application ?

• Posted by Robert Craig <rds at RapidEuphoria.com> Jan 18, 2002
• 477 views

Brian Broker writes:
> Rob, I see that 2.3 beta of exw.exe's subsystem version is 
> still set to 3.10.

Yes it is.

> 1.) Will you be fixing this for the final release of 2.3?

I don't think so. I didn't notice much of a difference, but maybe
I wasn't looking at the right programs. It seems like a risky thing to
do just before an official release. It seems to me that patching
executables is asking for trouble.

> 2.) Will you be releasing an 'official' patch for version 2.2 of exw.exe?

Probably not, but I've enclosed a program you can run 
with 2.2 or 2.3 if you want. See below.

> 3.) If the answer to #2 is no, then do you have a problem with anybody 
> releasing a hacked version of pdexw.exe with the version set to 4.00?  

If that's all you change, then it's ok with me.

-- set Windows GUI version
include file.e
include get.e

constant new_version = {4,0,0}   -- or {3, 0, 10} for 3.1

integer fn

fn = open("exw.exe", "ub")

if seek(fn, #C8) != 0 then
    puts(2, "1st seek failed\n")
    abort(1)
end if

puts(2, "Initially:\n")
? get_bytes(fn, 3)

if seek(fn, #C8) != 0 then
    puts(2, "2nd seek failed\n")
    abort(1)
end if

puts(fn, new_version) 
puts(1, "Now:\n")
? new_version
close(fn)

Regards,
   Rob Craig
   Rapid Deployment Software
   http://www.RapidEuphoria.com