On Mon, 09 Dec 2013, Jussi Lahtinen wrote:
> Can someone try to reproduce this with other system?
>
> Jussi
>
>
> On Sun, Dec 8, 2013 at 7:18 PM, Jussi Lahtinen
> <jussi.lahti...@gmail.com>wrote:
>
> > Oh sorry, problem occurs with Gambas 3 rev 5988 on Xubuntu 13.04 64bit.
> >
> > Jussi
> >
> >
> > On Sun, Dec 8, 2013 at 7:06 PM, Jussi Lahtinen
> > <jussi.lahti...@gmail.com>wrote:
> >
> >> See attached project. If event is raised something corrupts/event is
> >> missed.
> >>
> >>
> >> Jussi
> >>
> >
Although I don't know what you expect me to report, I get exactly one line
asking "what went wrong".
I attached a patch that fixes this without having to comment the Raise line
out. Seems like Raise is taken by the interpreter as an opportunity to
process pending events? I don't know.
Regards,
Tobi
diff -urNaX /tmp/gambas-patch-ignore a/.src/Class1.class b/.src/Class1.class
--- a/.src/Class1.class 2013-12-08 17:58:22.000000000 +0100
+++ b/.src/Class1.class 2013-12-09 19:28:47.000000000 +0100
@@ -26,7 +26,9 @@
Inc iByteCount
+ Object.Lock(hProcess)
Raise Something() ''<-- Disable this and everything works as expected.
+ Object.Unlock(hProcess)
Main.sWord &= sStr
End Select
------------------------------------------------------------------------------
Sponsored by Intel(R) XDK
Develop, test and display web and hybrid apps with a single code base.
Download it for free now!
http://pubads.g.doubleclick.net/gampad/clk?id=111408631&iu=/4140/ostg.clktrk
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
