OpenEuphoria

Size of bound files

• Posted by ChrisB (moderator) Nov 30, 2011
• 1219 views

Hi

Could I have this as a feature request for future development, of low urgency.

Size of bound files

I've just bound the following tiny program to quickly detect ip addresses

include std/io.e 
include std/filesys.e 
 
sequence ifile, thiscomp = {}, extaddr = {} 
 
system("/sbin/ifconfig > if.txt", 0) 
 
ifile = read_lines("if.txt") 
for i = 1 to length(ifile) do 
        if match("inet addr:", ifile[i]) > 0 then 
                thiscomp = "This computer " & ifile[i][match("inet addr:", ifile[i])..$] 
                exit 
        end if 
end for 
 
system("wget -q http://automation.whatismyip.com/n09230945.asp", 0) 
extaddr = read_lines("n09230945.asp") 
extaddr = "External ip = " & extaddr[1] 
 
puts(1, thiscomp & "\n") 
puts(1, extaddr & "\n") 
delete_file("wget.log") 
delete_file("n09230945.asp") 
delete_file("if.txt") 
 

and its come out at 3,476,272 Mb, ie 3.5 megs for a 22 line program.

I know a lot of stuff gets added on, and I could use UPX or gzexe, but even so! There must be a lot of 'useless' stuff that could be stripped out.

As I said, this is a low priority task, but if you could get round to it, it might make a few more fans ('produces tight compact executables')

Chris