Searched refs:lhs_val (Results 1 – 25 of 26) sorted by relevance
12
21 let lhs_val = codegen_expr lhs in25 | '+' -> build_add lhs_val rhs_val "addtmp" builder26 | '-' -> build_sub lhs_val rhs_val "subtmp" builder27 | '*' -> build_mul lhs_val rhs_val "multmp" builder30 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in
21 let lhs_val = codegen_expr lhs in25 | '+' -> build_fadd lhs_val rhs_val "addtmp" builder26 | '-' -> build_fsub lhs_val rhs_val "subtmp" builder27 | '*' -> build_fmul lhs_val rhs_val "multmp" builder30 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in
30 let lhs_val = codegen_expr lhs in34 | '+' -> build_fadd lhs_val rhs_val "addtmp" builder35 | '-' -> build_fsub lhs_val rhs_val "subtmp" builder36 | '*' -> build_fmul lhs_val rhs_val "multmp" builder39 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in50 build_call callee [|lhs_val; rhs_val|] "binop" builder
59 let lhs_val = codegen_expr lhs in63 | '+' -> build_fadd lhs_val rhs_val "addtmp" builder64 | '-' -> build_fsub lhs_val rhs_val "subtmp" builder65 | '*' -> build_fmul lhs_val rhs_val "multmp" builder68 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in79 build_call callee [|lhs_val; rhs_val|] "binop" builder
123 let lhs_val = codegen_expr lhs in127 | '+' -> build_fadd lhs_val rhs_val "addtmp" builder128 | '-' -> build_fsub lhs_val rhs_val "subtmp" builder129 | '*' -> build_fmul lhs_val rhs_val "multmp" builder132 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in806 let lhs_val = codegen_expr lhs in810 | '+' -> build_add lhs_val rhs_val "addtmp" builder811 | '-' -> build_sub lhs_val rhs_val "subtmp" builder812 | '*' -> build_mul lhs_val rhs_val "multmp" builder815 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in
205 let lhs_val = codegen_expr lhs in209 | '+' -> build_add lhs_val rhs_val "addtmp" builder210 | '-' -> build_sub lhs_val rhs_val "subtmp" builder211 | '*' -> build_mul lhs_val rhs_val "multmp" builder214 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in225 build_call callee [|lhs_val; rhs_val|] "binop" builder1089 let lhs_val = codegen_expr lhs in1093 | '+' -> build_add lhs_val rhs_val "addtmp" builder1094 | '-' -> build_sub lhs_val rhs_val "subtmp" builder1095 | '*' -> build_mul lhs_val rhs_val "multmp" builder[all …]
709 let lhs_val = codegen_expr lhs in713 | '+' -> build_add lhs_val rhs_val "addtmp" builder714 | '-' -> build_sub lhs_val rhs_val "subtmp" builder715 | '*' -> build_mul lhs_val rhs_val "multmp" builder718 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in
1021 let lhs_val = codegen_expr lhs in1025 | '+' -> build_add lhs_val rhs_val "addtmp" builder1026 | '-' -> build_sub lhs_val rhs_val "subtmp" builder1027 | '*' -> build_mul lhs_val rhs_val "multmp" builder1030 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in
1278 let lhs_val = codegen_expr lhs in1282 | '+' -> build_add lhs_val rhs_val "addtmp" builder1283 | '-' -> build_sub lhs_val rhs_val "subtmp" builder1284 | '*' -> build_mul lhs_val rhs_val "multmp" builder1287 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in1298 build_call callee [|lhs_val; rhs_val|] "binop" builder
1033 let lhs_val = codegen_expr lhs in1037 | '+' -> build_add lhs_val rhs_val "addtmp" builder1038 | '-' -> build_sub lhs_val rhs_val "subtmp" builder1039 | '*' -> build_mul lhs_val rhs_val "multmp" builder1042 let i = build_fcmp Fcmp.Ult lhs_val rhs_val "cmptmp" builder in