Commit bb587a37 authored by POTTIER Francois's avatar POTTIER Francois
Browse files

Comment.

parent f2f8dd2a
...@@ -198,10 +198,10 @@ let expand_round f action = ...@@ -198,10 +198,10 @@ let expand_round f action =
KeywordSet.fold f (Action.keywords action) action KeywordSet.fold f (Action.keywords action) action
(* [expand_action] performs macro-expansion in [action]. We do this in several (* [expand_action] performs macro-expansion in [action]. We do this in several
rounds: first, expand the [loc] keywords away, then expand the [ofs] rounds: first, expand the [loc] keywords away; then, expand the [ofs]
keywords away; then, expand [symbolstart] away; then, expand the rest. We do keywords away; then, expand [symbolstart] away; then, expand the rest. We
this in this order because each round can cause new keywords to appear, which do this in this order because each round can cause new keywords to appear,
must eliminated by the following rounds. *) which must eliminated by the following rounds. *)
let expand_action analysis producers action = let expand_action analysis producers action =
let n = List.length producers in let n = List.length producers in
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment