mirror of
https://github.com/CatalaLang/catala.git
synced 2024-11-08 07:51:43 +03:00
Fix some documentation comments formatting
This commit is contained in:
parent
98f712365e
commit
8920564f9e
@ -27,7 +27,7 @@ type 'm ctx = {
|
||||
|
||||
let tys_as_tanys tys = List.map (fun x -> Mark.map (fun _ -> TAny) x) tys
|
||||
|
||||
(** { 1 Transforming closures}*)
|
||||
(** {1 Transforming closures}*)
|
||||
|
||||
(** Returns the expression with closed closures and the set of free variables
|
||||
inside this new expression. Implementation guided by
|
||||
@ -572,7 +572,7 @@ let hoist_closures_program (p : 'm program) : 'm program Bindlib.box =
|
||||
(fun new_code_items -> { p with code_items = new_code_items })
|
||||
new_code_items
|
||||
|
||||
(** { 1 Closure conversion }*)
|
||||
(** {1 Closure conversion}*)
|
||||
|
||||
let closure_conversion (p : 'm program) : 'm program Bindlib.box =
|
||||
let new_p = transform_closures_program p in
|
||||
|
@ -21,7 +21,10 @@
|
||||
|
||||
type nonrec unit = unit
|
||||
type nonrec bool = bool
|
||||
type money = Z.t (** Number of cents *)
|
||||
|
||||
type money = Z.t
|
||||
(** Number of cents *)
|
||||
|
||||
type integer = Z.t
|
||||
type decimal = Q.t
|
||||
type date = Dates_calc.Dates.date
|
||||
|
Loading…
Reference in New Issue
Block a user