/
spirzen
/
it-code-examples
Обзор
Документация
Войти
/
spirzen
/
it-code-examples
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
examples/ocaml/code-404-2-002/main.ml
17 строк
315 B
Spirzen
Code migration pack
09 июн 2026, 01:41
09 июн 2026, 01:41
cebc284
Код
Авторство
О чём код?
(* LOGGING.mli *) module type LOG = sig type t val log : t -> string -> unit end (* CONSOLE.ml *) module Console : LOG = struct type t = unit let log () msg = print_endline msg end (* PREFIXED.ml *) module Make (L : LOG) = struct let log_with_prefix prefix x msg = L.log x (prefix ^ ": " ^ msg) end