OpenEuphoria

Here's an attempt to determine 32/64 bit dlls programatically. I've tested it with a few, it seems to work. Needs to be run from the folder where the dll lives:

constant dllname = "atl.dll" -- or whatever; 
 
include std/io.e 
include std/filesys.e 
include std/console.e 
include std/sequence.e 
 
if not file_exists(dllname) then  
    display("[] can't be found!",{dllname}) 
    abort(1)  
end if 
 
object buffer = {} 
 
atom fn = open(dllname,"rb") 
if fn then 
  buffer = get_bytes(fn,1000) 
  integer x = match({80,69},buffer) 
  if find('L',buffer[x..$]) = 5 then display("x86 (32-bit)") end if 
  if match({#64,#86},buffer[x..$]) = 5 then display("x64 (64-bit)") end if 
else 
  display("Failed to open []",{dllname}) 
end if