Attention une mise à jour du serveur va être effectuée le lundi 17 mai entre 13h et 13h30. Cette mise à jour va générer une interruption du service de quelques minutes.

Commit d892da7e authored by POTTIER Francois's avatar POTTIER Francois

Use [Printer.print_expr] in [Action].

parent 22c483a6
......@@ -136,15 +136,10 @@ let keywords action =
action.keywords
let print f action =
let module P = Printer.Make (struct let f = f
let locate_stretches = None
end)
in
P.expr action.expr
Printer.print_expr f action.expr
let has_syntaxerror action =
KeywordSet.mem SyntaxError (keywords action)
let has_beforeend action =
KeywordSet.mem (Position (Before, WhereEnd, FlavorPosition)) action.keywords
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