We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 891f88b commit 5633c16Copy full SHA for 5633c16
backend/selectgen.ml
@@ -412,7 +412,7 @@ method is_simple_expr = function
412
| Csequence(e1, e2) -> self#is_simple_expr e1 && self#is_simple_expr e2
413
| Cop(op, args, _) ->
414
begin match op with
415
- (* Cextcall without effects and coeffects is simple
+ (* Cextcall with neither effects nor coeffects is simple
416
if its arguments are *)
417
| Cextcall { effects = No_effects; coeffects = No_coeffects; } ->
418
List.for_all self#is_simple_expr args
0 commit comments