OpenEuphoria

euGtk in windows

• Posted by jacques deschênes <desja at globetr?tter.net> Dec 31, 2007
• 801 views

I'm testing euGTK library. 
The following sample code run ok in puppylinux but it crash in windows when I
click the button.

--test euGTK
include wrapper.e

constant app_win=window("test")
when(app_win,"destroy",quit,0)
constant b = button("_Crash")
function btn_clicked(atom btnRef, atom data)
   return 1
end function
constant cb_btn_clicked = call_back(routine_id("btn_clicked"))
when(b,"clicked",cb_btn_clicked,0)
addto(app_win,b)
show(app_win)
gtkmain()