Lines Matching full:codegen_expr
448 let rec codegen_expr = function
461 <tt>codegen_expr Ast.For ...</tt> (see the <a href="#code">full code listing</a>
473 let start_val = codegen_expr start in
491 let end_cond = codegen_expr end_ in
702 let rec codegen_expr = function
726 let val_ = codegen_expr rhs in
869 let rec codegen_expr = function
894 | Some init -> codegen_expr init
926 let body_val = codegen_expr body in
1396 let rec codegen_expr = function
1405 let operand = codegen_expr operand in
1425 let val_ = codegen_expr rhs in
1434 let lhs_val = codegen_expr lhs in
1435 let rhs_val = codegen_expr rhs in
1469 let args = Array.map codegen_expr args in
1472 let cond = codegen_expr cond in
1487 let then_val = codegen_expr then_ in
1497 let else_val = codegen_expr else_ in
1549 let start_val = codegen_expr start in
1576 ignore (codegen_expr body);
1581 | Some step -> codegen_expr step
1587 let end_cond = codegen_expr end_ in
1630 | Some init -> codegen_expr init
1652 let body_val = codegen_expr body in
1731 let ret_val = codegen_expr body in
