[Spf-dev] Создание потоков внутри слов

[витя ерыгин]

Есть лО МарабПткО пП ПргаМОзацОО пПтПкПв вМутрО слПв. НаЎПелП уже пОсать :noname .... ;  task: zad
ХПчется чегП-тП врПЎе такПгП:
: word
...
...
potok{ 10 0 do i . cr loop } \ О сразу же пПтПк ОЎёт Ма выпПлМеМОе
potok{ massiv massiv 400 + sort } \ аМалПгОчМП
...
...
;

[Ruvim Pinka]

Post by витя ерыгин
Есть лО МарабПткО пП ПргаМОзацОО пПтПкПв вМутрО слПв. НаЎПелП уже пОсать
:noname .... ; task: zad
: word
...
...
potok{ 10 0 do i . cr loop } \ О сразу же пПтПк ОЎёт Ма выпПлМеМОе
potok{ massiv massiv 400 + sort } \ аМалПгОчМП
...
...
;

REQUIRE LAMBDA{ ~pinka/lib/lambda.f
REQUIRE LAUNCH ~pinka/lib/multi/launch.f

: test
LAMBDA{ 10 0 DO I . CR LOOP } LAUNCH
;

\ ОлО так

: T{ POSTPONE LAMBDA{ ; IMMEDIATE
: }T POSTPONE } POSTPONE LAUNCH ; IMMEDIATE

: test T{ 10 0 DO I . CR LOOP }T ;


СЌ. также http://spf.sourceforge.net/docs/devel.ru.html#techniques

[витя ерыгин]

REQUIRE LAUNCH   ~pinka/lib/multi/launch.f
У ЌеМя в devel Мет такПгП. ГЎе взять?

Post by витя ерыгин
Есть лО МарабПткО пП ПргаМОзацОО пПтПкПв вМутрО слПв. НаЎПелП уже пОсать :noname .... ;  task: zad
: word
...
...
potok{ 10 0 do i . cr loop } \ О сразу же пПтПк ОЎёт Ма выпПлМеМОе
potok{ massiv massiv 400 + sort } \ аМалПгОчМП
...
...
;

REQUIRE LAMBDA{  ~pinka/lib/lambda.f
REQUIRE LAUNCH   ~pinka/lib/multi/launch.f
: test
    LAMBDA{ 10 0 DO I . CR LOOP } LAUNCH
;
\ ОлО так
: T{  POSTPONE LAMBDA{  ; IMMEDIATE
: }T  POSTPONE }  POSTPONE LAUNCH  ; IMMEDIATE
: test T{ 10 0 DO I . CR LOOP }T ;
СЌ. также http://spf.sourceforge.net/docs/devel.ru.html#techniques
--
Ruvim
------------------------------------------------------------------------------
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.http://sdm.link/zohodev2dev
_______________________________________________
Spf-dev mailing list
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Ruvim Pinka]

*REQUIRE LAUNCH ~pinka/lib/multi/launch.f*
У ЌеМя в devel Мет такПгП. ГЎе взять?

А разве Ме ваЌ я уже Птвечал?

https://ru.stackoverflow.com/a/512649/200053 — сЌ. таЌ втПрПй кПЌЌеМтарОй:

ОбМПвОтесь Оз репПзОтПрОя <http://spf.cvs.sourceforge.net/viewvc/spf/>:
скачайте О распакуйте tarball
<http://spf.cvs.sourceforge.net/viewvc/spf/?view=tar>. Т.к. таЌ юМОксПвые
перевПЎы стрПк, тП прПпОшОте в МачалП spf4.ini кПЌаМЎу UNIX-LINES
И ПпреЎелеМОе LAUNCH тПже былП ПпублОкПваММП, сЌ.
https://ru.stackoverflow.com/a/510790/200053