Hello!
Also, sometimes trying to run
USE: my-thd start-thd
I get a message box saying "Memory protection fault at address 0x<hexnum>",
and then I can inspect things at the Factor's console window. In these cases I
see something like this on the Data Stack:
1057
{ 64199 16 8 f }
The number in the first line randomly changes in the range about 1050..1115.
The second to last number in the sequence (8 in the example above) is the
same number that is the address of the memory protection fault in the message
box.
The first and last items of the sequence (64199 and f) are always the same.
In place of 16 I saw similarly small even numbers: 10, 12, 16, 8.
28.05.2016, 13:26, "Alexander Ilin" <ajs...@yandex.ru>:
> Hello!
>
> A fun observation. Sometimes, when the Factor application is not
> immediately terminated and an error dialog is shown on screen, I can inspect
> it with the Process Explorer and see that my busy-loop thread is in there,
> created and running.
>
> 27.05.2016, 23:16, "Alexander Ilin" <ajs...@yandex.ru>:
>> Hello!
>>
>> 27.05.2016, 20:00, "Björn Lindqvist" <bjou...@gmail.com>:
>>> Try defining <ThreadProc> like this:
>>>
>>> : <ThreadProc> ( -- alien ) DWORD { LPVOID } stdcall [ ] alien-callback ;
>>
>> Tried this, see below.
>>
>> I'm now at home, trying these things on Win 8.1 64-bit, on a freshly
>> bootstrapped Factor. (For some reason the build.cmd produced a 32-bit
>> executable, even though I'm on a 64-bit system.) The Windows Error Reporting
>> tool (WerFault.exe) says that an exception is happening. Sometimes I get to
>> see some kind of dumps in the console, sometimes not.
>>
>> Here's my code:
>>
>> USING: kernel windows.kernel32
>> alien alien.data alien.syntax windows.types ;
>> IN: my-thd
>>
>> LIBRARY: kernel32
>>
>> FUNCTION: HANDLE CreateThread ( LPSECURITY_ATTRIBUTES lpThreadAttributes,
>> SIZE_T dwStackSize,
>> LPVOID lpStartAddress,
>> LPVOID lpParameter,
>> DWORD dwCreationFlags,
>> LPDWORD lpThreadId )
>>
>> CALLBACK: DWORD ThreadProc ( LPVOID lpParameter )
>>
>> : <ThreadProc> ( -- alien )
>> [ [ t ] [ ] while ] ThreadProc ;
>>
>> : <ThreadProc-2> ( -- alien )
>> DWORD { LPVOID } stdcall [ ] alien-callback ;
>>
>> : <ThreadProc-3> ( -- alien )
>> DWORD { LPVOID } stdcall [ [ t ] [ ] while ] alien-callback ;
>>
>> : start-thd ( -- hnd )
>> f 0 <ThreadProc> f 0 f CreateThread ;
>>
>> : start-thd-2 ( -- hnd )
>> f 0 <ThreadProc-2> f 0 f CreateThread ;
>>
>> : start-thd-3 ( -- hnd )
>> f 0 <ThreadProc-3> f 0 f CreateThread ;
>>
>> Test runs and results:
>> start-thd: the app sometimes dies with no output. WerFault sometimes
>> reports Exception Code c0000409, which Googles to "Stack buffer overflow",
>> and sometimes c0000005, which is "access violation". Sometimes I see a
>> console dump, which starts with "fatal_error: Memory protection fault during
>> gc: <hex-value>".
>>
>> start-thd-2: most of the time dies with no output, but once I saw the
>> text "Error in print-error!" on the console.
>>
>> start-thd-3: most of the time dies with no output, but once I saw a
>> message box with "Memory protection fault at address 0x105" in it.
>>
>> Can you help me? I need more code to try.
>
> ---=====---
> Александр
>
> ------------------------------------------------------------------------------
> What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
> patterns at an interface-level. Reveals which users, apps, and protocols are
> consuming the most bandwidth. Provides multi-vendor support for NetFlow,
> J-Flow, sFlow and other flows. Make informed decisions using capacity
> planning reports. https://ad.doubleclick.net/ddm/clk/305295220;132659582;e
> _______________________________________________
> Factor-talk mailing list
> Factor-talk@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/factor-talk
---=====---
Александр
------------------------------------------------------------------------------
What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
patterns at an interface-level. Reveals which users, apps, and protocols are
consuming the most bandwidth. Provides multi-vendor support for NetFlow,
J-Flow, sFlow and other flows. Make informed decisions using capacity
planning reports. https://ad.doubleclick.net/ddm/clk/305295220;132659582;e
_______________________________________________
Factor-talk mailing list
Factor-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/factor-talk
