Oberon Community Platform Forum

Development => General => Topic started by: soren renner on September 21, 2012, 02:39:30 PM



Title: VNC bug
Post by: soren renner on September 21, 2012, 02:39:30 PM
VNC.Mod and VNCTetrisServer.Mod do not work properly. VNC.Mod needs a slight code change to be able to connect to the server. Once connected, a window of the correct size appears (so the server and client must be talking) but nothing appears in the window (besides a cursor).

I have placed the relevant modules here:

https://github.com/harrisonpartch/a2vnc


Title: Re: VNC bug
Post by: soren renner on September 24, 2012, 07:39:31 PM
VNC.Mod:

Code:
PROCEDURE SendEvents;
[b](* HERE IS THE BUG! THIS PROCEDURE DOES NOT RETURN! *)[/b]
BEGIN
IF middle >= head THEN
c.pcb.Send(buf, head, middle-head, FALSE, res)
ELSE (* split buffer *)
c.pcb.Send(buf, head, LEN(buf)-head, FALSE, res);
IF res = Ok THEN c.pcb.Send(buf, 0, middle, FALSE, res) END
END;
head := middle
END SendEvents;

TCP.Connection.Send is not returning.