OpenEuphoria

Re: Euphoria and Xwindows

• Posted by "Cuny, David" <David.Cuny at DSS.CA.GOV> Jul 22, 1999
• 341 views

Irv:

I took a look at your GRAPHAPP.E file, and noticed you are wrapping the
calls as:

   global procedure fill_arc (sequence coords, integer start, integer fini)
      atom fa
      fa =
      c_proc(fa, {coords[1], coords[2], coords[3], coords[4], start, fini})
   end procedure --void fillarc(rect r, int start_angle, int end_angle);

You only need to declare the C proc once, like this:

   constant fill_arc_ =
   global procedure fill_arc (sequence coords, integer start, integer fini)
      c_proc(fill_arc_, {coords[1], coords[2], coords[3], coords[4], start,
fini})
   end procedure

That should speed up your calls a bit.

-- David Cuny