Miroirs/fOOrth
1
0
Fork 0
mirror of https://github.com/PeterCamilleri/fOOrth synced 2024-11-16 07:47:56 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

UG update; Mutex class and snippet.

Browse source
This commit is contained in:
Peter Camilleri 2015-06-12 22:05:40 -04:00
parent 2fa48c8a92
commit 23b329818f
2 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
docs/The_fOOrth_User_Guide.odt
View file

Binary file not shown.

12
docs/snippets/mutex.foorth Normal file
View file

@ -0,0 +1,12 @@
( a_count test_mutex 100*a_count )
: test_mutex
0 var: ctr
Array .new{{
x .to_s Thread .new{{
0 100 do
Mutex .do{{ ctr @ 1+ ctr ! }}
0.001 .sleep
loop
}}
}} .each{{ v .join }}
ctr @ ;