Master is merged into the dyn crossing lane again.
This commit is contained in:
commit
e85ca2c431
@ -1706,9 +1706,9 @@ let macro_loc tbl name = try Hashtbl.find tbl name with Not_found -> ""
|
||||
|
||||
(* The prelude's [defmacro] forms, read once. [Macro.prelude_macros] holds only
|
||||
the names and [defs] wants the parameter vectors too, so the forms are kept
|
||||
here — and kept lazily for the reason that one is: [Prelude.forms] re-reads
|
||||
and re-parses the whole prelude on every call, and [defs] is asked on connect
|
||||
and again after every accepted evaluation. *)
|
||||
here, lazily: [Prelude.forms] reads the prelude once but still rebuilds its
|
||||
forms on every call, and [defs] is asked on connect and again after every
|
||||
accepted evaluation. *)
|
||||
let prelude_macro_forms =
|
||||
lazy
|
||||
(List.filter (fun f -> Macro.macro_name f <> None) (Prelude.forms ()))
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user