File tree Expand file tree Collapse file tree 1 file changed +18
-3
lines changed
docs/libraries/concurrency Expand file tree Collapse file tree 1 file changed +18
-3
lines changed Original file line number Diff line number Diff line change @@ -11,7 +11,7 @@ outline: deep
11
11
12
12
Также активно используется в среде [ MirageOS] .
13
13
14
- ## Пример
14
+ ## Пример
15
15
16
16
Пример Lwt-программы, которая запрашивает первую страницу Google и терпит неудачу, если запрос не завершен в течение пяти секунд:
17
17
@@ -42,9 +42,13 @@ let () =
42
42
(* ocamlfind opt -package lwt.unix -linkpkg example.ml && ./a.out *)
43
43
```
44
44
45
+ > [ !NOTE] Смотрите также
46
+ > - [ Примеры по работе с TCP/IP] ( ../../in-examples/tcp-ip.md#с-помощью-lwt )
47
+
48
+
45
49
## Ppx
46
50
47
- Препроцессинг для ` do ` -подобного синтаксиса ([ ` ppx_lwt ` ] ( https://ocsigen.org/lwt/4.1.0/api/Ppx_lwt ) ):
51
+ Препроцессинг для do -подобного синтаксиса ([ ` ppx_lwt ` ] ( https://ocsigen.org/lwt/4.1.0/api/Ppx_lwt ) ). Настоятельно рекомендуется к использованию!
48
52
``` ocaml
49
53
let%lwt user = get_user_from_api "dad" in
50
54
(* ... *)
@@ -80,4 +84,15 @@ let _ =
80
84
81
85
[ MirageOS] : https://mirage.io/
82
86
[ Ocsigen ] : https://ocsigen.org/home/intro.html
83
- [ libev ] : http://software.schmorp.de/pkg/libev.html
87
+ [ libev ] : http://software.schmorp.de/pkg/libev.html
88
+
89
+ ## Трюки
90
+
91
+ ### Бесконечный цикл
92
+
93
+ Тут мы создаем промис, что никогда не будет зарелзовин, а значит последовательность
94
+ не продолжится.
95
+
96
+ ``` ocaml
97
+ let%lwt _ = fst (Lwt.task ()) in (* ... *)
98
+ ```
You can’t perform that action at this time.
0 commit comments