OpenEuphoria

RE: EuAllegro

• Posted by Brian Broker <bkb at cnw.com> Jan 10, 2004
• 478 views

Hi Lewis,

I'm not sure why Ray links some routines from his own "euAlleg40.dll" 
but you can fix this problem in "euallegro.ew" (pre-release 0.21) by 
linking to the functions in "alleg40.dll":

----------------------------- line 2360 in "euallegro.ew"
-- vline   
-----------------------------
integer my_vline
my_vline = link_proc(AllegroLib, "vline",
		 {C_POINTER, C_INT, C_INT, C_INT, C_INT} )
global procedure vline(atom bmp, integer x, integer y1,  
			 integer y2, integer color)
   c_proc(my_vline, {bmp, x, y1, y2, color})
end procedure

-----------------------------
-- hline   
-----------------------------
integer my_hline
my_hline = link_proc(AllegroLib, "hline",
		 {C_POINTER, C_INT, C_INT, C_INT, C_INT} )
global procedure hline(atom bmp, integer x1, integer y,
			 integer x2, integer color)
   c_proc(my_hline, {bmp, x1, y, x2, color})
end procedure

-- Brian

Lewis Townsend wrote:
> 
> 
> Hello,
> I am playing with EuAllegro and I discovered a problem.
> vline() and hline() both draw horizontal lines.
> I looked at the .ew file and it looks ok so it must be the dll maybe?
> 
> LewyT
>